qtah-qt5-0.8.0: src/Graphics/UI/Qtah/Generated/Gui/QPixmap.hs
{-# LANGUAGE FlexibleContexts, FlexibleInstances, ForeignFunctionInterface, MonoLocalBinds, MultiParamTypeClasses, ScopedTypeVariables, TypeSynonymInstances, UndecidableInstances #-}
---------- GENERATED FILE, EDITS WILL BE LOST ----------
module Graphics.UI.Qtah.Generated.Gui.QPixmap (
castQPixmapToQPaintDevice,
castQPaintDeviceToQPixmap,
QPixmapValue (..),
QPixmapConstPtr (..),
cacheKey,
copyRect,
copyRaw,
depth,
devicePixelRatio,
hasAlpha,
hasAlphaChannel,
height,
isNull,
isQBitmap,
rect,
save,
scaledRaw,
scaledRawAll,
scaledSize,
scaledSizeAll,
scaledToHeight,
scaledToHeightAll,
scaledToWidth,
scaledToWidthAll,
size,
toImage,
transformed,
transformedAll,
width,
QPixmapPtr (..),
convertFromImage,
convertFromImageAll,
detach,
setDevicePixelRatio,
fill,
fillWithColor,
load,
scrollRaw,
scrollRawAll,
scrollRect,
scrollRectAll,
swap,
aSSIGN,
defaultDepth,
fromImage,
fromImageAll,
trueMatrixTransform,
QPixmapConst (..),
castQPixmapToConst,
QPixmap (..),
castQPixmapToNonconst,
new,
newWithSize,
newWithSizeRaw,
newWithFile,
newCopy,
QPixmapSuper (..),
QPixmapSuperConst (..),
) where
import Control.Monad ((>=>))
import qualified Data.Int as HoppyDI
import qualified Foreign as HoppyF
import qualified Foreign.C as HoppyFC
import qualified Foreign.Hoppy.Runtime as HoppyFHR
import qualified Graphics.UI.Qtah.Core.HRect as HRect
import qualified Graphics.UI.Qtah.Core.HSize as HSize
import qualified Graphics.UI.Qtah.Flags as QtahFlags
import qualified Graphics.UI.Qtah.Generated.Core.QRect as M122
import qualified Graphics.UI.Qtah.Generated.Core.QSize as M134
import qualified Graphics.UI.Qtah.Generated.Core.QString as M142
import qualified Graphics.UI.Qtah.Generated.Core.Types as M190
import qualified Graphics.UI.Qtah.Generated.Gui.QColor as M252
import {-# SOURCE #-} qualified Graphics.UI.Qtah.Generated.Gui.QImage as M292
import qualified Graphics.UI.Qtah.Generated.Gui.QPaintDevice as M304
import qualified Graphics.UI.Qtah.Generated.Gui.QRegion as M324
import qualified Graphics.UI.Qtah.Generated.Gui.QTransform as M336
import Prelude (($), (.), (/=), (=<<), (==), (>>), (>>=))
import qualified Prelude as HoppyP
import qualified Prelude as QtahP
foreign import ccall "genpop__QPixmap_new" new' :: HoppyP.IO (HoppyF.Ptr QPixmap)
foreign import ccall "genpop__QPixmap_newWithSize" newWithSize' :: HoppyF.Ptr M134.QSizeConst -> HoppyP.IO (HoppyF.Ptr QPixmap)
foreign import ccall "genpop__QPixmap_newWithSizeRaw" newWithSizeRaw' :: HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QPixmap)
foreign import ccall "genpop__QPixmap_newWithFile" newWithFile' :: HoppyF.Ptr M142.QStringConst -> HoppyP.IO (HoppyF.Ptr QPixmap)
foreign import ccall "genpop__QPixmap_newCopy" newCopy' :: HoppyF.Ptr QPixmapConst -> HoppyP.IO (HoppyF.Ptr QPixmap)
foreign import ccall "genpop__QPixmap_cacheKey" cacheKey' :: HoppyF.Ptr QPixmapConst -> HoppyP.IO HoppyDI.Int64
foreign import ccall "genpop__QPixmap_convertFromImage" convertFromImage' :: HoppyF.Ptr QPixmap -> HoppyF.Ptr M292.QImageConst -> HoppyP.IO HoppyFC.CBool
foreign import ccall "genpop__QPixmap_convertFromImageAll" convertFromImageAll' :: HoppyF.Ptr QPixmap -> HoppyF.Ptr M292.QImageConst -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CBool
foreign import ccall "genpop__QPixmap_copyRect" copyRect' :: HoppyF.Ptr QPixmapConst -> HoppyF.Ptr M122.QRectConst -> HoppyP.IO (HoppyF.Ptr QPixmapConst)
foreign import ccall "genpop__QPixmap_copyRaw" copyRaw' :: HoppyF.Ptr QPixmapConst -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QPixmapConst)
foreign import ccall "genpop__QPixmap_defaultDepth" defaultDepth' :: HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QPixmap_depth" depth' :: HoppyF.Ptr QPixmapConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QPixmap_detach" detach' :: HoppyF.Ptr QPixmap -> HoppyP.IO ()
foreign import ccall "genpop__QPixmap_devicePixelRatio" devicePixelRatio' :: HoppyF.Ptr QPixmapConst -> HoppyP.IO HoppyFC.CDouble
foreign import ccall "genpop__QPixmap_setDevicePixelRatio" setDevicePixelRatio' :: HoppyF.Ptr QPixmap -> HoppyFC.CDouble -> HoppyP.IO ()
foreign import ccall "genpop__QPixmap_fill" fill' :: HoppyF.Ptr QPixmap -> HoppyP.IO ()
foreign import ccall "genpop__QPixmap_fillWithColor" fillWithColor' :: HoppyF.Ptr QPixmap -> HoppyF.Ptr M252.QColorConst -> HoppyP.IO ()
foreign import ccall "genpop__QPixmap_fromImage" fromImage' :: HoppyF.Ptr M292.QImageConst -> HoppyP.IO (HoppyF.Ptr QPixmapConst)
foreign import ccall "genpop__QPixmap_fromImageAll" fromImageAll' :: HoppyF.Ptr M292.QImageConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QPixmapConst)
foreign import ccall "genpop__QPixmap_hasAlpha" hasAlpha' :: HoppyF.Ptr QPixmapConst -> HoppyP.IO HoppyFC.CBool
foreign import ccall "genpop__QPixmap_hasAlphaChannel" hasAlphaChannel' :: HoppyF.Ptr QPixmapConst -> HoppyP.IO HoppyFC.CBool
foreign import ccall "genpop__QPixmap_height" height' :: HoppyF.Ptr QPixmapConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QPixmap_isNull" isNull' :: HoppyF.Ptr QPixmapConst -> HoppyP.IO HoppyFC.CBool
foreign import ccall "genpop__QPixmap_isQBitmap" isQBitmap' :: HoppyF.Ptr QPixmapConst -> HoppyP.IO HoppyFC.CBool
foreign import ccall "genpop__QPixmap_load" load' :: HoppyF.Ptr QPixmap -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO HoppyFC.CBool
foreign import ccall "genpop__QPixmap_rect" rect' :: HoppyF.Ptr QPixmapConst -> HoppyP.IO (HoppyF.Ptr M122.QRectConst)
foreign import ccall "genpop__QPixmap_save" save' :: HoppyF.Ptr QPixmapConst -> HoppyF.Ptr M142.QStringConst -> HoppyP.IO HoppyFC.CBool
foreign import ccall "genpop__QPixmap_scaledRaw" scaledRaw' :: HoppyF.Ptr QPixmapConst -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QPixmapConst)
foreign import ccall "genpop__QPixmap_scaledRawAll" scaledRawAll' :: HoppyF.Ptr QPixmapConst -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QPixmapConst)
foreign import ccall "genpop__QPixmap_scaledSize" scaledSize' :: HoppyF.Ptr QPixmapConst -> HoppyF.Ptr M134.QSizeConst -> HoppyP.IO (HoppyF.Ptr QPixmapConst)
foreign import ccall "genpop__QPixmap_scaledSizeAll" scaledSizeAll' :: HoppyF.Ptr QPixmapConst -> HoppyF.Ptr M134.QSizeConst -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QPixmapConst)
foreign import ccall "genpop__QPixmap_scaledToHeight" scaledToHeight' :: HoppyF.Ptr QPixmapConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QPixmapConst)
foreign import ccall "genpop__QPixmap_scaledToHeightAll" scaledToHeightAll' :: HoppyF.Ptr QPixmapConst -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QPixmapConst)
foreign import ccall "genpop__QPixmap_scaledToWidth" scaledToWidth' :: HoppyF.Ptr QPixmapConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QPixmapConst)
foreign import ccall "genpop__QPixmap_scaledToWidthAll" scaledToWidthAll' :: HoppyF.Ptr QPixmapConst -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QPixmapConst)
foreign import ccall "genpop__QPixmap_scrollRaw" scrollRaw' :: HoppyF.Ptr QPixmap -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QPixmap_scrollRawAll" scrollRawAll' :: HoppyF.Ptr QPixmap -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyF.Ptr M324.QRegion -> HoppyP.IO ()
foreign import ccall "genpop__QPixmap_scrollRect" scrollRect' :: HoppyF.Ptr QPixmap -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyF.Ptr M122.QRectConst -> HoppyP.IO ()
foreign import ccall "genpop__QPixmap_scrollRectAll" scrollRectAll' :: HoppyF.Ptr QPixmap -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyF.Ptr M122.QRectConst -> HoppyF.Ptr M324.QRegion -> HoppyP.IO ()
foreign import ccall "genpop__QPixmap_size" size' :: HoppyF.Ptr QPixmapConst -> HoppyP.IO (HoppyF.Ptr M134.QSizeConst)
foreign import ccall "genpop__QPixmap_swap" swap' :: HoppyF.Ptr QPixmap -> HoppyF.Ptr QPixmap -> HoppyP.IO ()
foreign import ccall "genpop__QPixmap_toImage" toImage' :: HoppyF.Ptr QPixmapConst -> HoppyP.IO (HoppyF.Ptr M292.QImageConst)
foreign import ccall "genpop__QPixmap_transformed" transformed' :: HoppyF.Ptr QPixmapConst -> HoppyF.Ptr M336.QTransformConst -> HoppyP.IO (HoppyF.Ptr QPixmapConst)
foreign import ccall "genpop__QPixmap_transformedAll" transformedAll' :: HoppyF.Ptr QPixmapConst -> HoppyF.Ptr M336.QTransformConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr QPixmapConst)
foreign import ccall "genpop__QPixmap_trueMatrixTransform" trueMatrixTransform' :: HoppyF.Ptr M336.QTransformConst -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr M336.QTransformConst)
foreign import ccall "genpop__QPixmap_width" width' :: HoppyF.Ptr QPixmapConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QPixmap_ASSIGN" aSSIGN' :: HoppyF.Ptr QPixmap -> HoppyF.Ptr QPixmapConst -> HoppyP.IO (HoppyF.Ptr QPixmap)
foreign import ccall "gencast__QPixmap__QPaintDevice" castQPixmapToQPaintDevice :: HoppyF.Ptr QPixmapConst -> HoppyF.Ptr M304.QPaintDeviceConst
foreign import ccall "gencast__QPaintDevice__QPixmap" castQPaintDeviceToQPixmap :: HoppyF.Ptr M304.QPaintDeviceConst -> HoppyF.Ptr QPixmapConst
foreign import ccall "gendel__QPixmap" delete'QPixmap :: HoppyF.Ptr QPixmapConst -> HoppyP.IO ()
foreign import ccall "&gendel__QPixmap" deletePtr'QPixmap :: HoppyF.FunPtr (HoppyF.Ptr QPixmapConst -> HoppyP.IO ())
class QPixmapValue a where
withQPixmapPtr :: a -> (QPixmapConst -> HoppyP.IO b) -> HoppyP.IO b
instance {-# OVERLAPPABLE #-} QPixmapConstPtr a => QPixmapValue a where
withQPixmapPtr = HoppyP.flip ($) . toQPixmapConst
class (M304.QPaintDeviceConstPtr this) => QPixmapConstPtr this where
toQPixmapConst :: this -> QPixmapConst
cacheKey :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyDI.Int64)
cacheKey arg'1 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(cacheKey' arg'1')
copyRect :: (QPixmapValue this, M122.QRectValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO QPixmap)
copyRect arg'1 arg'2 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
M122.withQRectPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(HoppyFHR.decodeAndDelete . QPixmapConst) =<<
(copyRect' arg'1' arg'2')
copyRaw :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO QPixmap)
copyRaw arg'1 arg'2 arg'3 arg'4 arg'5 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'4 >>= \arg'4' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'5 >>= \arg'5' ->
(HoppyFHR.decodeAndDelete . QPixmapConst) =<<
(copyRaw' arg'1' arg'2' arg'3' arg'4' arg'5')
depth :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int)
depth arg'1 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(depth' arg'1')
devicePixelRatio :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Double)
devicePixelRatio arg'1 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyP.realToFrac
) =<<
(devicePixelRatio' arg'1')
hasAlpha :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Bool)
hasAlpha arg'1 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
(HoppyP.return . (/= 0))
) =<<
(hasAlpha' arg'1')
hasAlphaChannel :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Bool)
hasAlphaChannel arg'1 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
(HoppyP.return . (/= 0))
) =<<
(hasAlphaChannel' arg'1')
height :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int)
height arg'1 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(height' arg'1')
isNull :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Bool)
isNull arg'1 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
(HoppyP.return . (/= 0))
) =<<
(isNull' arg'1')
isQBitmap :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Bool)
isQBitmap arg'1 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
(HoppyP.return . (/= 0))
) =<<
(isQBitmap' arg'1')
rect :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.IO HRect.HRect)
rect arg'1 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(HoppyFHR.decodeAndDelete . M122.QRectConst) =<<
(rect' arg'1')
save :: (QPixmapValue this, M142.QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool)
save arg'1 arg'2 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(
(HoppyP.return . (/= 0))
) =<<
(save' arg'1' arg'2')
scaledRaw :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO QPixmap)
scaledRaw arg'1 arg'2 arg'3 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(HoppyFHR.decodeAndDelete . QPixmapConst) =<<
(scaledRaw' arg'1' arg'2' arg'3')
scaledRawAll :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (M190.QtAspectRatioMode) -> (M190.QtTransformationMode) -> (HoppyP.IO QPixmap)
scaledRawAll arg'1 arg'2 arg'3 arg'4 arg'5 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(
HoppyP.return . HoppyFHR.fromCppEnum
) arg'4 >>= \arg'4' ->
(
HoppyP.return . HoppyFHR.fromCppEnum
) arg'5 >>= \arg'5' ->
(HoppyFHR.decodeAndDelete . QPixmapConst) =<<
(scaledRawAll' arg'1' arg'2' arg'3' arg'4' arg'5')
scaledSize :: (QPixmapValue this, M134.QSizeValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO QPixmap)
scaledSize arg'1 arg'2 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
M134.withQSizePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(HoppyFHR.decodeAndDelete . QPixmapConst) =<<
(scaledSize' arg'1' arg'2')
scaledSizeAll :: (QPixmapValue this, M134.QSizeValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (M190.QtAspectRatioMode) -> (M190.QtTransformationMode) -> (HoppyP.IO QPixmap)
scaledSizeAll arg'1 arg'2 arg'3 arg'4 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
M134.withQSizePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(
HoppyP.return . HoppyFHR.fromCppEnum
) arg'3 >>= \arg'3' ->
(
HoppyP.return . HoppyFHR.fromCppEnum
) arg'4 >>= \arg'4' ->
(HoppyFHR.decodeAndDelete . QPixmapConst) =<<
(scaledSizeAll' arg'1' arg'2' arg'3' arg'4')
scaledToHeight :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO QPixmap)
scaledToHeight arg'1 arg'2 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(HoppyFHR.decodeAndDelete . QPixmapConst) =<<
(scaledToHeight' arg'1' arg'2')
scaledToHeightAll :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (M190.QtTransformationMode) -> (HoppyP.IO QPixmap)
scaledToHeightAll arg'1 arg'2 arg'3 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.fromCppEnum
) arg'3 >>= \arg'3' ->
(HoppyFHR.decodeAndDelete . QPixmapConst) =<<
(scaledToHeightAll' arg'1' arg'2' arg'3')
scaledToWidth :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO QPixmap)
scaledToWidth arg'1 arg'2 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(HoppyFHR.decodeAndDelete . QPixmapConst) =<<
(scaledToWidth' arg'1' arg'2')
scaledToWidthAll :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (M190.QtTransformationMode) -> (HoppyP.IO QPixmap)
scaledToWidthAll arg'1 arg'2 arg'3 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.fromCppEnum
) arg'3 >>= \arg'3' ->
(HoppyFHR.decodeAndDelete . QPixmapConst) =<<
(scaledToWidthAll' arg'1' arg'2' arg'3')
size :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.IO HSize.HSize)
size arg'1 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(HoppyFHR.decodeAndDelete . M134.QSizeConst) =<<
(size' arg'1')
toImage :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.IO M292.QImage)
toImage arg'1 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(HoppyFHR.decodeAndDelete . M292.QImageConst) =<<
(toImage' arg'1')
transformed :: (QPixmapValue this, M336.QTransformValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO QPixmap)
transformed arg'1 arg'2 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
M336.withQTransformPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(HoppyFHR.decodeAndDelete . QPixmapConst) =<<
(transformed' arg'1' arg'2')
transformedAll :: (QPixmapValue this, M336.QTransformValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (M190.QtTransformationMode) -> (HoppyP.IO QPixmap)
transformedAll arg'1 arg'2 arg'3 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
M336.withQTransformPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(
HoppyP.return . HoppyFHR.fromCppEnum
) arg'3 >>= \arg'3' ->
(HoppyFHR.decodeAndDelete . QPixmapConst) =<<
(transformedAll' arg'1' arg'2' arg'3')
width :: (QPixmapValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int)
width arg'1 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(width' arg'1')
class (QPixmapConstPtr this, M304.QPaintDevicePtr this) => QPixmapPtr this where
toQPixmap :: this -> QPixmap
convertFromImage :: (QPixmapPtr this, M292.QImageValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool)
convertFromImage arg'1 arg'2 =
HoppyFHR.withCppPtr (toQPixmap arg'1) $ \arg'1' ->
M292.withQImagePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(
(HoppyP.return . (/= 0))
) =<<
(convertFromImage' arg'1' arg'2')
convertFromImageAll :: (QPixmapPtr this, M292.QImageValue arg'2, M190.IsQtImageConversionFlags arg'3) => (this) {- ^ this -} -> (arg'2) -> (arg'3) -> (HoppyP.IO HoppyP.Bool)
convertFromImageAll arg'1 arg'2 arg'3 =
HoppyFHR.withCppPtr (toQPixmap arg'1) $ \arg'1' ->
M292.withQImagePtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(
QtahP.return . QtahFlags.flagsToNum . M190.toQtImageConversionFlags
) arg'3 >>= \arg'3' ->
(
(HoppyP.return . (/= 0))
) =<<
(convertFromImageAll' arg'1' arg'2' arg'3')
detach :: (QPixmapPtr this) => (this) {- ^ this -} -> (HoppyP.IO ())
detach arg'1 =
HoppyFHR.withCppPtr (toQPixmap arg'1) $ \arg'1' ->
(detach' arg'1')
setDevicePixelRatio :: (QPixmapPtr this) => (this) {- ^ this -} -> (HoppyP.Double) -> (HoppyP.IO ())
setDevicePixelRatio arg'1 arg'2 =
HoppyFHR.withCppPtr (toQPixmap arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyP.realToFrac
) arg'2 >>= \arg'2' ->
(setDevicePixelRatio' arg'1' arg'2')
fill :: (QPixmapPtr this) => (this) {- ^ this -} -> (HoppyP.IO ())
fill arg'1 =
HoppyFHR.withCppPtr (toQPixmap arg'1) $ \arg'1' ->
(fill' arg'1')
fillWithColor :: (QPixmapPtr this, M252.QColorValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
fillWithColor arg'1 arg'2 =
HoppyFHR.withCppPtr (toQPixmap arg'1) $ \arg'1' ->
M252.withQColorPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(fillWithColor' arg'1' arg'2')
load :: (QPixmapPtr this, M142.QStringValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Bool)
load arg'1 arg'2 =
HoppyFHR.withCppPtr (toQPixmap arg'1) $ \arg'1' ->
M142.withQStringPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
(
(HoppyP.return . (/= 0))
) =<<
(load' arg'1' arg'2')
scrollRaw :: (QPixmapPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO ())
scrollRaw arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 arg'7 =
HoppyFHR.withCppPtr (toQPixmap arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'4 >>= \arg'4' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'5 >>= \arg'5' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'6 >>= \arg'6' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'7 >>= \arg'7' ->
(scrollRaw' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6' arg'7')
scrollRawAll :: (QPixmapPtr this, M324.QRegionPtr arg'8) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (arg'8) -> (HoppyP.IO ())
scrollRawAll arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 arg'7 arg'8 =
HoppyFHR.withCppPtr (toQPixmap arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'4 >>= \arg'4' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'5 >>= \arg'5' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'6 >>= \arg'6' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'7 >>= \arg'7' ->
HoppyFHR.withCppPtr (M324.toQRegion arg'8) $ \arg'8' ->
(scrollRawAll' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6' arg'7' arg'8')
scrollRect :: (QPixmapPtr this, M122.QRectValue arg'4) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (arg'4) -> (HoppyP.IO ())
scrollRect arg'1 arg'2 arg'3 arg'4 =
HoppyFHR.withCppPtr (toQPixmap arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
M122.withQRectPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' ->
(scrollRect' arg'1' arg'2' arg'3' arg'4')
scrollRectAll :: (QPixmapPtr this, M122.QRectValue arg'4, M324.QRegionPtr arg'5) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (arg'4) -> (arg'5) -> (HoppyP.IO ())
scrollRectAll arg'1 arg'2 arg'3 arg'4 arg'5 =
HoppyFHR.withCppPtr (toQPixmap arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
M122.withQRectPtr arg'4 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'4' ->
HoppyFHR.withCppPtr (M324.toQRegion arg'5) $ \arg'5' ->
(scrollRectAll' arg'1' arg'2' arg'3' arg'4' arg'5')
swap :: (QPixmapPtr this, QPixmapPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ())
swap arg'1 arg'2 =
HoppyFHR.withCppPtr (toQPixmap arg'1) $ \arg'1' ->
HoppyFHR.withCppPtr (toQPixmap arg'2) $ \arg'2' ->
(swap' arg'1' arg'2')
aSSIGN :: (QPixmapPtr this, QPixmapValue arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO QPixmap)
aSSIGN arg'1 arg'2 =
HoppyFHR.withCppPtr (toQPixmap arg'1) $ \arg'1' ->
withQPixmapPtr arg'2 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'2' ->
HoppyP.fmap QPixmap
(aSSIGN' arg'1' arg'2')
defaultDepth :: (HoppyP.IO HoppyP.Int)
defaultDepth =
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(defaultDepth')
fromImage :: (M292.QImageValue arg'1) => (arg'1) -> (HoppyP.IO QPixmap)
fromImage arg'1 =
M292.withQImagePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(HoppyFHR.decodeAndDelete . QPixmapConst) =<<
(fromImage' arg'1')
fromImageAll :: (M292.QImageValue arg'1, M190.IsQtImageConversionFlags arg'2) => (arg'1) -> (arg'2) -> (HoppyP.IO QPixmap)
fromImageAll arg'1 arg'2 =
M292.withQImagePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
QtahP.return . QtahFlags.flagsToNum . M190.toQtImageConversionFlags
) arg'2 >>= \arg'2' ->
(HoppyFHR.decodeAndDelete . QPixmapConst) =<<
(fromImageAll' arg'1' arg'2')
trueMatrixTransform :: (M336.QTransformValue arg'1) => (arg'1) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO M336.QTransform)
trueMatrixTransform arg'1 arg'2 arg'3 =
M336.withQTransformPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(HoppyFHR.decodeAndDelete . M336.QTransformConst) =<<
(trueMatrixTransform' arg'1' arg'2' arg'3')
data QPixmapConst =
QPixmapConst (HoppyF.Ptr QPixmapConst)
| QPixmapConstGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QPixmapConst)
deriving (HoppyP.Show)
instance HoppyP.Eq QPixmapConst where
x == y = HoppyFHR.toPtr x == HoppyFHR.toPtr y
instance HoppyP.Ord QPixmapConst where
compare x y = HoppyP.compare (HoppyFHR.toPtr x) (HoppyFHR.toPtr y)
castQPixmapToConst :: QPixmap -> QPixmapConst
castQPixmapToConst (QPixmap ptr') = QPixmapConst $ HoppyF.castPtr ptr'
castQPixmapToConst (QPixmapGc fptr' ptr') = QPixmapConstGc fptr' $ HoppyF.castPtr ptr'
instance HoppyFHR.CppPtr QPixmapConst where
nullptr = QPixmapConst HoppyF.nullPtr
withCppPtr (QPixmapConst ptr') f' = f' ptr'
withCppPtr (QPixmapConstGc fptr' ptr') f' = HoppyF.withForeignPtr fptr' $ \_ -> f' ptr'
toPtr (QPixmapConst ptr') = ptr'
toPtr (QPixmapConstGc _ ptr') = ptr'
touchCppPtr (QPixmapConst _) = HoppyP.return ()
touchCppPtr (QPixmapConstGc fptr' _) = HoppyF.touchForeignPtr fptr'
instance HoppyFHR.Deletable QPixmapConst where
delete (QPixmapConst ptr') = delete'QPixmap ptr'
delete (QPixmapConstGc _ _) = HoppyP.fail $ HoppyP.concat ["Deletable.delete: Asked to delete a GC-managed ", "QPixmapConst", " object."]
toGc this'@(QPixmapConst ptr') = if ptr' == HoppyF.nullPtr then HoppyP.return this' else HoppyP.fmap (HoppyP.flip QPixmapConstGc ptr') $ HoppyF.newForeignPtr (HoppyF.castFunPtr deletePtr'QPixmap :: HoppyF.FunPtr (HoppyF.Ptr () -> HoppyP.IO ())) (HoppyF.castPtr ptr' :: HoppyF.Ptr ())
toGc this'@(QPixmapConstGc {}) = HoppyP.return this'
instance HoppyFHR.Copyable QPixmapConst QPixmap where copy = newCopy
instance QPixmapConstPtr QPixmapConst where
toQPixmapConst = HoppyP.id
instance M304.QPaintDeviceConstPtr QPixmapConst where
toQPaintDeviceConst (QPixmapConst ptr') = M304.QPaintDeviceConst $ castQPixmapToQPaintDevice ptr'
toQPaintDeviceConst (QPixmapConstGc fptr' ptr') = M304.QPaintDeviceConstGc fptr' $ castQPixmapToQPaintDevice ptr'
data QPixmap =
QPixmap (HoppyF.Ptr QPixmap)
| QPixmapGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QPixmap)
deriving (HoppyP.Show)
instance HoppyP.Eq QPixmap where
x == y = HoppyFHR.toPtr x == HoppyFHR.toPtr y
instance HoppyP.Ord QPixmap where
compare x y = HoppyP.compare (HoppyFHR.toPtr x) (HoppyFHR.toPtr y)
castQPixmapToNonconst :: QPixmapConst -> QPixmap
castQPixmapToNonconst (QPixmapConst ptr') = QPixmap $ HoppyF.castPtr ptr'
castQPixmapToNonconst (QPixmapConstGc fptr' ptr') = QPixmapGc fptr' $ HoppyF.castPtr ptr'
instance HoppyFHR.CppPtr QPixmap where
nullptr = QPixmap HoppyF.nullPtr
withCppPtr (QPixmap ptr') f' = f' ptr'
withCppPtr (QPixmapGc fptr' ptr') f' = HoppyF.withForeignPtr fptr' $ \_ -> f' ptr'
toPtr (QPixmap ptr') = ptr'
toPtr (QPixmapGc _ ptr') = ptr'
touchCppPtr (QPixmap _) = HoppyP.return ()
touchCppPtr (QPixmapGc fptr' _) = HoppyF.touchForeignPtr fptr'
instance HoppyFHR.Deletable QPixmap where
delete (QPixmap ptr') = delete'QPixmap $ (HoppyF.castPtr ptr' :: HoppyF.Ptr QPixmapConst)
delete (QPixmapGc _ _) = HoppyP.fail $ HoppyP.concat ["Deletable.delete: Asked to delete a GC-managed ", "QPixmap", " object."]
toGc this'@(QPixmap ptr') = if ptr' == HoppyF.nullPtr then HoppyP.return this' else HoppyP.fmap (HoppyP.flip QPixmapGc ptr') $ HoppyF.newForeignPtr (HoppyF.castFunPtr deletePtr'QPixmap :: HoppyF.FunPtr (HoppyF.Ptr () -> HoppyP.IO ())) (HoppyF.castPtr ptr' :: HoppyF.Ptr ())
toGc this'@(QPixmapGc {}) = HoppyP.return this'
instance HoppyFHR.Copyable QPixmap QPixmap where copy = newCopy
instance QPixmapConstPtr QPixmap where
toQPixmapConst (QPixmap ptr') = QPixmapConst $ (HoppyF.castPtr :: HoppyF.Ptr QPixmap -> HoppyF.Ptr QPixmapConst) ptr'
toQPixmapConst (QPixmapGc fptr' ptr') = QPixmapConstGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr QPixmap -> HoppyF.Ptr QPixmapConst) ptr'
instance QPixmapPtr QPixmap where
toQPixmap = HoppyP.id
instance M304.QPaintDeviceConstPtr QPixmap where
toQPaintDeviceConst (QPixmap ptr') = M304.QPaintDeviceConst $ castQPixmapToQPaintDevice $ (HoppyF.castPtr :: HoppyF.Ptr QPixmap -> HoppyF.Ptr QPixmapConst) ptr'
toQPaintDeviceConst (QPixmapGc fptr' ptr') = M304.QPaintDeviceConstGc fptr' $ castQPixmapToQPaintDevice $ (HoppyF.castPtr :: HoppyF.Ptr QPixmap -> HoppyF.Ptr QPixmapConst) ptr'
instance M304.QPaintDevicePtr QPixmap where
toQPaintDevice (QPixmap ptr') = M304.QPaintDevice $ (HoppyF.castPtr :: HoppyF.Ptr M304.QPaintDeviceConst -> HoppyF.Ptr M304.QPaintDevice) $ castQPixmapToQPaintDevice $ (HoppyF.castPtr :: HoppyF.Ptr QPixmap -> HoppyF.Ptr QPixmapConst) ptr'
toQPaintDevice (QPixmapGc fptr' ptr') = M304.QPaintDeviceGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr M304.QPaintDeviceConst -> HoppyF.Ptr M304.QPaintDevice) $ castQPixmapToQPaintDevice $ (HoppyF.castPtr :: HoppyF.Ptr QPixmap -> HoppyF.Ptr QPixmapConst) ptr'
new :: (HoppyP.IO QPixmap)
new =
HoppyP.fmap QPixmap
(new')
newWithSize :: (M134.QSizeValue arg'1) => (arg'1) -> (HoppyP.IO QPixmap)
newWithSize arg'1 =
M134.withQSizePtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
HoppyP.fmap QPixmap
(newWithSize' arg'1')
newWithSizeRaw :: (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO QPixmap)
newWithSizeRaw arg'1 arg'2 =
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'1 >>= \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
HoppyP.fmap QPixmap
(newWithSizeRaw' arg'1' arg'2')
newWithFile :: (M142.QStringValue arg'1) => (arg'1) -> (HoppyP.IO QPixmap)
newWithFile arg'1 =
M142.withQStringPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
HoppyP.fmap QPixmap
(newWithFile' arg'1')
newCopy :: (QPixmapValue arg'1) => (arg'1) -> (HoppyP.IO QPixmap)
newCopy arg'1 =
withQPixmapPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
HoppyP.fmap QPixmap
(newCopy' arg'1')
class QPixmapSuper a where
downToQPixmap :: a -> QPixmap
instance QPixmapSuper M304.QPaintDevice where
downToQPixmap = castQPixmapToNonconst . cast' . M304.castQPaintDeviceToConst
where
cast' (M304.QPaintDeviceConst ptr') = QPixmapConst $ castQPaintDeviceToQPixmap ptr'
cast' (M304.QPaintDeviceConstGc fptr' ptr') = QPixmapConstGc fptr' $ castQPaintDeviceToQPixmap ptr'
class QPixmapSuperConst a where
downToQPixmapConst :: a -> QPixmapConst
instance QPixmapSuperConst M304.QPaintDeviceConst where
downToQPixmapConst = cast'
where
cast' (M304.QPaintDeviceConst ptr') = QPixmapConst $ castQPaintDeviceToQPixmap ptr'
cast' (M304.QPaintDeviceConstGc fptr' ptr') = QPixmapConstGc fptr' $ castQPaintDeviceToQPixmap ptr'
instance HoppyFHR.Assignable (HoppyF.Ptr (HoppyF.Ptr QPixmap)) QPixmap where
assign ptr' value' = HoppyF.poke ptr' $ HoppyFHR.toPtr value'
instance QPixmapValue a => HoppyFHR.Assignable QPixmap a where
assign x' y' = aSSIGN x' y' >> HoppyP.return ()
instance HoppyFHR.Decodable (HoppyF.Ptr (HoppyF.Ptr QPixmap)) QPixmap where
decode = HoppyP.fmap QPixmap . HoppyF.peek
instance HoppyFHR.Decodable QPixmap (QPixmap) where
decode = HoppyFHR.decode . toQPixmapConst
instance HoppyFHR.Decodable QPixmapConst (QPixmap) where
decode =
HoppyFHR.copy >=> HoppyFHR.toGc