{-# LANGUAGE ImplicitParams, RankNTypes, TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Clutter.Objects.CairoTexture
(
CairoTexture(..) ,
IsCairoTexture ,
toCairoTexture ,
#if defined(ENABLE_OVERLOADING)
ResolveCairoTextureMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
CairoTextureClearMethodInfo ,
#endif
cairoTextureClear ,
#if defined(ENABLE_OVERLOADING)
CairoTextureCreateMethodInfo ,
#endif
cairoTextureCreate ,
#if defined(ENABLE_OVERLOADING)
CairoTextureCreateRegionMethodInfo ,
#endif
cairoTextureCreateRegion ,
#if defined(ENABLE_OVERLOADING)
CairoTextureGetAutoResizeMethodInfo ,
#endif
cairoTextureGetAutoResize ,
#if defined(ENABLE_OVERLOADING)
CairoTextureGetSurfaceSizeMethodInfo ,
#endif
cairoTextureGetSurfaceSize ,
#if defined(ENABLE_OVERLOADING)
CairoTextureInvalidateMethodInfo ,
#endif
cairoTextureInvalidate ,
#if defined(ENABLE_OVERLOADING)
CairoTextureInvalidateRectangleMethodInfo,
#endif
cairoTextureInvalidateRectangle ,
cairoTextureNew ,
#if defined(ENABLE_OVERLOADING)
CairoTextureSetAutoResizeMethodInfo ,
#endif
cairoTextureSetAutoResize ,
#if defined(ENABLE_OVERLOADING)
CairoTextureSetSurfaceSizeMethodInfo ,
#endif
cairoTextureSetSurfaceSize ,
#if defined(ENABLE_OVERLOADING)
CairoTextureAutoResizePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cairoTextureAutoResize ,
#endif
constructCairoTextureAutoResize ,
getCairoTextureAutoResize ,
setCairoTextureAutoResize ,
#if defined(ENABLE_OVERLOADING)
CairoTextureSurfaceHeightPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cairoTextureSurfaceHeight ,
#endif
constructCairoTextureSurfaceHeight ,
getCairoTextureSurfaceHeight ,
setCairoTextureSurfaceHeight ,
#if defined(ENABLE_OVERLOADING)
CairoTextureSurfaceWidthPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
cairoTextureSurfaceWidth ,
#endif
constructCairoTextureSurfaceWidth ,
getCairoTextureSurfaceWidth ,
setCairoTextureSurfaceWidth ,
CairoTextureCreateSurfaceCallback ,
#if defined(ENABLE_OVERLOADING)
CairoTextureCreateSurfaceSignalInfo ,
#endif
afterCairoTextureCreateSurface ,
onCairoTextureCreateSurface ,
CairoTextureDrawCallback ,
#if defined(ENABLE_OVERLOADING)
CairoTextureDrawSignalInfo ,
#endif
afterCairoTextureDraw ,
onCairoTextureDraw ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GHashTable as B.GHT
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Coerce as Coerce
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GHC.Records as R
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.Cairo.Structs.Context as Cairo.Context
import qualified GI.Cairo.Structs.RectangleInt as Cairo.RectangleInt
import qualified GI.Cairo.Structs.Surface as Cairo.Surface
import {-# SOURCE #-} qualified GI.Clutter.Interfaces.Animatable as Clutter.Animatable
import {-# SOURCE #-} qualified GI.Clutter.Interfaces.Container as Clutter.Container
import {-# SOURCE #-} qualified GI.Clutter.Interfaces.Scriptable as Clutter.Scriptable
import {-# SOURCE #-} qualified GI.Clutter.Objects.Actor as Clutter.Actor
import {-# SOURCE #-} qualified GI.Clutter.Objects.Texture as Clutter.Texture
import qualified GI.GObject.Objects.Object as GObject.Object
newtype CairoTexture = CairoTexture (SP.ManagedPtr CairoTexture)
deriving (CairoTexture -> CairoTexture -> Bool
(CairoTexture -> CairoTexture -> Bool)
-> (CairoTexture -> CairoTexture -> Bool) -> Eq CairoTexture
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: CairoTexture -> CairoTexture -> Bool
== :: CairoTexture -> CairoTexture -> Bool
$c/= :: CairoTexture -> CairoTexture -> Bool
/= :: CairoTexture -> CairoTexture -> Bool
Eq)
instance SP.ManagedPtrNewtype CairoTexture where
toManagedPtr :: CairoTexture -> ManagedPtr CairoTexture
toManagedPtr (CairoTexture ManagedPtr CairoTexture
p) = ManagedPtr CairoTexture
p
foreign import ccall "clutter_cairo_texture_get_type"
c_clutter_cairo_texture_get_type :: IO B.Types.GType
instance B.Types.TypedObject CairoTexture where
glibType :: IO GType
glibType = IO GType
c_clutter_cairo_texture_get_type
instance B.Types.GObject CairoTexture
class (SP.GObject o, O.IsDescendantOf CairoTexture o) => IsCairoTexture o
instance (SP.GObject o, O.IsDescendantOf CairoTexture o) => IsCairoTexture o
instance O.HasParentTypes CairoTexture
type instance O.ParentTypes CairoTexture = '[Clutter.Texture.Texture, Clutter.Actor.Actor, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Clutter.Animatable.Animatable, Clutter.Container.Container, Clutter.Scriptable.Scriptable]
toCairoTexture :: (MIO.MonadIO m, IsCairoTexture o) => o -> m CairoTexture
toCairoTexture :: forall (m :: * -> *) o.
(MonadIO m, IsCairoTexture o) =>
o -> m CairoTexture
toCairoTexture = IO CairoTexture -> m CairoTexture
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO CairoTexture -> m CairoTexture)
-> (o -> IO CairoTexture) -> o -> m CairoTexture
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr CairoTexture -> CairoTexture) -> o -> IO CairoTexture
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr CairoTexture -> CairoTexture
CairoTexture
instance B.GValue.IsGValue (Maybe CairoTexture) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_clutter_cairo_texture_get_type
gvalueSet_ :: Ptr GValue -> Maybe CairoTexture -> IO ()
gvalueSet_ Ptr GValue
gv Maybe CairoTexture
P.Nothing = Ptr GValue -> Ptr CairoTexture -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr CairoTexture
forall a. Ptr a
FP.nullPtr :: FP.Ptr CairoTexture)
gvalueSet_ Ptr GValue
gv (P.Just CairoTexture
obj) = CairoTexture -> (Ptr CairoTexture -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr CairoTexture
obj (Ptr GValue -> Ptr CairoTexture -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe CairoTexture)
gvalueGet_ Ptr GValue
gv = do
Ptr CairoTexture
ptr <- Ptr GValue -> IO (Ptr CairoTexture)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr CairoTexture)
if Ptr CairoTexture
ptr Ptr CairoTexture -> Ptr CairoTexture -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr CairoTexture
forall a. Ptr a
FP.nullPtr
then CairoTexture -> Maybe CairoTexture
forall a. a -> Maybe a
P.Just (CairoTexture -> Maybe CairoTexture)
-> IO CairoTexture -> IO (Maybe CairoTexture)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr CairoTexture -> CairoTexture)
-> Ptr CairoTexture -> IO CairoTexture
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr CairoTexture -> CairoTexture
CairoTexture Ptr CairoTexture
ptr
else Maybe CairoTexture -> IO (Maybe CairoTexture)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe CairoTexture
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveCairoTextureMethod (t :: Symbol) (o :: *) :: * where
ResolveCairoTextureMethod "addAction" o = Clutter.Actor.ActorAddActionMethodInfo
ResolveCairoTextureMethod "addActionWithName" o = Clutter.Actor.ActorAddActionWithNameMethodInfo
ResolveCairoTextureMethod "addActor" o = Clutter.Container.ContainerAddActorMethodInfo
ResolveCairoTextureMethod "addChild" o = Clutter.Actor.ActorAddChildMethodInfo
ResolveCairoTextureMethod "addConstraint" o = Clutter.Actor.ActorAddConstraintMethodInfo
ResolveCairoTextureMethod "addConstraintWithName" o = Clutter.Actor.ActorAddConstraintWithNameMethodInfo
ResolveCairoTextureMethod "addEffect" o = Clutter.Actor.ActorAddEffectMethodInfo
ResolveCairoTextureMethod "addEffectWithName" o = Clutter.Actor.ActorAddEffectWithNameMethodInfo
ResolveCairoTextureMethod "addTransition" o = Clutter.Actor.ActorAddTransitionMethodInfo
ResolveCairoTextureMethod "allocate" o = Clutter.Actor.ActorAllocateMethodInfo
ResolveCairoTextureMethod "allocateAlignFill" o = Clutter.Actor.ActorAllocateAlignFillMethodInfo
ResolveCairoTextureMethod "allocateAvailableSize" o = Clutter.Actor.ActorAllocateAvailableSizeMethodInfo
ResolveCairoTextureMethod "allocatePreferredSize" o = Clutter.Actor.ActorAllocatePreferredSizeMethodInfo
ResolveCairoTextureMethod "animateProperty" o = Clutter.Animatable.AnimatableAnimatePropertyMethodInfo
ResolveCairoTextureMethod "animateWithAlphav" o = Clutter.Actor.ActorAnimateWithAlphavMethodInfo
ResolveCairoTextureMethod "animateWithTimelinev" o = Clutter.Actor.ActorAnimateWithTimelinevMethodInfo
ResolveCairoTextureMethod "animatev" o = Clutter.Actor.ActorAnimatevMethodInfo
ResolveCairoTextureMethod "applyRelativeTransformToPoint" o = Clutter.Actor.ActorApplyRelativeTransformToPointMethodInfo
ResolveCairoTextureMethod "applyTransformToPoint" o = Clutter.Actor.ActorApplyTransformToPointMethodInfo
ResolveCairoTextureMethod "bindModel" o = Clutter.Actor.ActorBindModelMethodInfo
ResolveCairoTextureMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveCairoTextureMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveCairoTextureMethod "childGetProperty" o = Clutter.Container.ContainerChildGetPropertyMethodInfo
ResolveCairoTextureMethod "childNotify" o = Clutter.Container.ContainerChildNotifyMethodInfo
ResolveCairoTextureMethod "childSetProperty" o = Clutter.Container.ContainerChildSetPropertyMethodInfo
ResolveCairoTextureMethod "clear" o = CairoTextureClearMethodInfo
ResolveCairoTextureMethod "clearActions" o = Clutter.Actor.ActorClearActionsMethodInfo
ResolveCairoTextureMethod "clearConstraints" o = Clutter.Actor.ActorClearConstraintsMethodInfo
ResolveCairoTextureMethod "clearEffects" o = Clutter.Actor.ActorClearEffectsMethodInfo
ResolveCairoTextureMethod "contains" o = Clutter.Actor.ActorContainsMethodInfo
ResolveCairoTextureMethod "continuePaint" o = Clutter.Actor.ActorContinuePaintMethodInfo
ResolveCairoTextureMethod "create" o = CairoTextureCreateMethodInfo
ResolveCairoTextureMethod "createChildMeta" o = Clutter.Container.ContainerCreateChildMetaMethodInfo
ResolveCairoTextureMethod "createPangoContext" o = Clutter.Actor.ActorCreatePangoContextMethodInfo
ResolveCairoTextureMethod "createPangoLayout" o = Clutter.Actor.ActorCreatePangoLayoutMethodInfo
ResolveCairoTextureMethod "createRegion" o = CairoTextureCreateRegionMethodInfo
ResolveCairoTextureMethod "destroy" o = Clutter.Actor.ActorDestroyMethodInfo
ResolveCairoTextureMethod "destroyAllChildren" o = Clutter.Actor.ActorDestroyAllChildrenMethodInfo
ResolveCairoTextureMethod "destroyChildMeta" o = Clutter.Container.ContainerDestroyChildMetaMethodInfo
ResolveCairoTextureMethod "detachAnimation" o = Clutter.Actor.ActorDetachAnimationMethodInfo
ResolveCairoTextureMethod "event" o = Clutter.Actor.ActorEventMethodInfo
ResolveCairoTextureMethod "findChildByName" o = Clutter.Container.ContainerFindChildByNameMethodInfo
ResolveCairoTextureMethod "findProperty" o = Clutter.Animatable.AnimatableFindPropertyMethodInfo
ResolveCairoTextureMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveCairoTextureMethod "foreach" o = Clutter.Container.ContainerForeachMethodInfo
ResolveCairoTextureMethod "foreachWithInternals" o = Clutter.Container.ContainerForeachWithInternalsMethodInfo
ResolveCairoTextureMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveCairoTextureMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveCairoTextureMethod "grabKeyFocus" o = Clutter.Actor.ActorGrabKeyFocusMethodInfo
ResolveCairoTextureMethod "hasActions" o = Clutter.Actor.ActorHasActionsMethodInfo
ResolveCairoTextureMethod "hasAllocation" o = Clutter.Actor.ActorHasAllocationMethodInfo
ResolveCairoTextureMethod "hasClip" o = Clutter.Actor.ActorHasClipMethodInfo
ResolveCairoTextureMethod "hasConstraints" o = Clutter.Actor.ActorHasConstraintsMethodInfo
ResolveCairoTextureMethod "hasEffects" o = Clutter.Actor.ActorHasEffectsMethodInfo
ResolveCairoTextureMethod "hasKeyFocus" o = Clutter.Actor.ActorHasKeyFocusMethodInfo
ResolveCairoTextureMethod "hasOverlaps" o = Clutter.Actor.ActorHasOverlapsMethodInfo
ResolveCairoTextureMethod "hasPointer" o = Clutter.Actor.ActorHasPointerMethodInfo
ResolveCairoTextureMethod "hide" o = Clutter.Actor.ActorHideMethodInfo
ResolveCairoTextureMethod "hideAll" o = Clutter.Actor.ActorHideAllMethodInfo
ResolveCairoTextureMethod "insertChildAbove" o = Clutter.Actor.ActorInsertChildAboveMethodInfo
ResolveCairoTextureMethod "insertChildAtIndex" o = Clutter.Actor.ActorInsertChildAtIndexMethodInfo
ResolveCairoTextureMethod "insertChildBelow" o = Clutter.Actor.ActorInsertChildBelowMethodInfo
ResolveCairoTextureMethod "interpolateValue" o = Clutter.Animatable.AnimatableInterpolateValueMethodInfo
ResolveCairoTextureMethod "invalidate" o = CairoTextureInvalidateMethodInfo
ResolveCairoTextureMethod "invalidateRectangle" o = CairoTextureInvalidateRectangleMethodInfo
ResolveCairoTextureMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveCairoTextureMethod "isInClonePaint" o = Clutter.Actor.ActorIsInClonePaintMethodInfo
ResolveCairoTextureMethod "isMapped" o = Clutter.Actor.ActorIsMappedMethodInfo
ResolveCairoTextureMethod "isRealized" o = Clutter.Actor.ActorIsRealizedMethodInfo
ResolveCairoTextureMethod "isRotated" o = Clutter.Actor.ActorIsRotatedMethodInfo
ResolveCairoTextureMethod "isScaled" o = Clutter.Actor.ActorIsScaledMethodInfo
ResolveCairoTextureMethod "isVisible" o = Clutter.Actor.ActorIsVisibleMethodInfo
ResolveCairoTextureMethod "lower" o = Clutter.Actor.ActorLowerMethodInfo
ResolveCairoTextureMethod "lowerBottom" o = Clutter.Actor.ActorLowerBottomMethodInfo
ResolveCairoTextureMethod "lowerChild" o = Clutter.Container.ContainerLowerChildMethodInfo
ResolveCairoTextureMethod "map" o = Clutter.Actor.ActorMapMethodInfo
ResolveCairoTextureMethod "moveAnchorPoint" o = Clutter.Actor.ActorMoveAnchorPointMethodInfo
ResolveCairoTextureMethod "moveAnchorPointFromGravity" o = Clutter.Actor.ActorMoveAnchorPointFromGravityMethodInfo
ResolveCairoTextureMethod "moveBy" o = Clutter.Actor.ActorMoveByMethodInfo
ResolveCairoTextureMethod "needsExpand" o = Clutter.Actor.ActorNeedsExpandMethodInfo
ResolveCairoTextureMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveCairoTextureMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveCairoTextureMethod "paint" o = Clutter.Actor.ActorPaintMethodInfo
ResolveCairoTextureMethod "parseCustomNode" o = Clutter.Scriptable.ScriptableParseCustomNodeMethodInfo
ResolveCairoTextureMethod "popInternal" o = Clutter.Actor.ActorPopInternalMethodInfo
ResolveCairoTextureMethod "pushInternal" o = Clutter.Actor.ActorPushInternalMethodInfo
ResolveCairoTextureMethod "queueRedraw" o = Clutter.Actor.ActorQueueRedrawMethodInfo
ResolveCairoTextureMethod "queueRedrawWithClip" o = Clutter.Actor.ActorQueueRedrawWithClipMethodInfo
ResolveCairoTextureMethod "queueRelayout" o = Clutter.Actor.ActorQueueRelayoutMethodInfo
ResolveCairoTextureMethod "raise" o = Clutter.Actor.ActorRaiseMethodInfo
ResolveCairoTextureMethod "raiseChild" o = Clutter.Container.ContainerRaiseChildMethodInfo
ResolveCairoTextureMethod "raiseTop" o = Clutter.Actor.ActorRaiseTopMethodInfo
ResolveCairoTextureMethod "realize" o = Clutter.Actor.ActorRealizeMethodInfo
ResolveCairoTextureMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveCairoTextureMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveCairoTextureMethod "removeAction" o = Clutter.Actor.ActorRemoveActionMethodInfo
ResolveCairoTextureMethod "removeActionByName" o = Clutter.Actor.ActorRemoveActionByNameMethodInfo
ResolveCairoTextureMethod "removeActor" o = Clutter.Container.ContainerRemoveActorMethodInfo
ResolveCairoTextureMethod "removeAllChildren" o = Clutter.Actor.ActorRemoveAllChildrenMethodInfo
ResolveCairoTextureMethod "removeAllTransitions" o = Clutter.Actor.ActorRemoveAllTransitionsMethodInfo
ResolveCairoTextureMethod "removeChild" o = Clutter.Actor.ActorRemoveChildMethodInfo
ResolveCairoTextureMethod "removeClip" o = Clutter.Actor.ActorRemoveClipMethodInfo
ResolveCairoTextureMethod "removeConstraint" o = Clutter.Actor.ActorRemoveConstraintMethodInfo
ResolveCairoTextureMethod "removeConstraintByName" o = Clutter.Actor.ActorRemoveConstraintByNameMethodInfo
ResolveCairoTextureMethod "removeEffect" o = Clutter.Actor.ActorRemoveEffectMethodInfo
ResolveCairoTextureMethod "removeEffectByName" o = Clutter.Actor.ActorRemoveEffectByNameMethodInfo
ResolveCairoTextureMethod "removeTransition" o = Clutter.Actor.ActorRemoveTransitionMethodInfo
ResolveCairoTextureMethod "reparent" o = Clutter.Actor.ActorReparentMethodInfo
ResolveCairoTextureMethod "replaceChild" o = Clutter.Actor.ActorReplaceChildMethodInfo
ResolveCairoTextureMethod "restoreEasingState" o = Clutter.Actor.ActorRestoreEasingStateMethodInfo
ResolveCairoTextureMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveCairoTextureMethod "saveEasingState" o = Clutter.Actor.ActorSaveEasingStateMethodInfo
ResolveCairoTextureMethod "shouldPickPaint" o = Clutter.Actor.ActorShouldPickPaintMethodInfo
ResolveCairoTextureMethod "show" o = Clutter.Actor.ActorShowMethodInfo
ResolveCairoTextureMethod "showAll" o = Clutter.Actor.ActorShowAllMethodInfo
ResolveCairoTextureMethod "sortDepthOrder" o = Clutter.Container.ContainerSortDepthOrderMethodInfo
ResolveCairoTextureMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveCairoTextureMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveCairoTextureMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveCairoTextureMethod "transformStagePoint" o = Clutter.Actor.ActorTransformStagePointMethodInfo
ResolveCairoTextureMethod "unmap" o = Clutter.Actor.ActorUnmapMethodInfo
ResolveCairoTextureMethod "unparent" o = Clutter.Actor.ActorUnparentMethodInfo
ResolveCairoTextureMethod "unrealize" o = Clutter.Actor.ActorUnrealizeMethodInfo
ResolveCairoTextureMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveCairoTextureMethod "unsetFlags" o = Clutter.Actor.ActorUnsetFlagsMethodInfo
ResolveCairoTextureMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveCairoTextureMethod "getAbsAllocationVertices" o = Clutter.Actor.ActorGetAbsAllocationVerticesMethodInfo
ResolveCairoTextureMethod "getAccessible" o = Clutter.Actor.ActorGetAccessibleMethodInfo
ResolveCairoTextureMethod "getAction" o = Clutter.Actor.ActorGetActionMethodInfo
ResolveCairoTextureMethod "getActions" o = Clutter.Actor.ActorGetActionsMethodInfo
ResolveCairoTextureMethod "getAllocationBox" o = Clutter.Actor.ActorGetAllocationBoxMethodInfo
ResolveCairoTextureMethod "getAllocationGeometry" o = Clutter.Actor.ActorGetAllocationGeometryMethodInfo
ResolveCairoTextureMethod "getAllocationVertices" o = Clutter.Actor.ActorGetAllocationVerticesMethodInfo
ResolveCairoTextureMethod "getAnchorPoint" o = Clutter.Actor.ActorGetAnchorPointMethodInfo
ResolveCairoTextureMethod "getAnchorPointGravity" o = Clutter.Actor.ActorGetAnchorPointGravityMethodInfo
ResolveCairoTextureMethod "getAnimation" o = Clutter.Actor.ActorGetAnimationMethodInfo
ResolveCairoTextureMethod "getAutoResize" o = CairoTextureGetAutoResizeMethodInfo
ResolveCairoTextureMethod "getBackgroundColor" o = Clutter.Actor.ActorGetBackgroundColorMethodInfo
ResolveCairoTextureMethod "getBaseSize" o = Clutter.Texture.TextureGetBaseSizeMethodInfo
ResolveCairoTextureMethod "getChildAtIndex" o = Clutter.Actor.ActorGetChildAtIndexMethodInfo
ResolveCairoTextureMethod "getChildMeta" o = Clutter.Container.ContainerGetChildMetaMethodInfo
ResolveCairoTextureMethod "getChildTransform" o = Clutter.Actor.ActorGetChildTransformMethodInfo
ResolveCairoTextureMethod "getChildren" o = Clutter.Actor.ActorGetChildrenMethodInfo
ResolveCairoTextureMethod "getClip" o = Clutter.Actor.ActorGetClipMethodInfo
ResolveCairoTextureMethod "getClipToAllocation" o = Clutter.Actor.ActorGetClipToAllocationMethodInfo
ResolveCairoTextureMethod "getCoglMaterial" o = Clutter.Texture.TextureGetCoglMaterialMethodInfo
ResolveCairoTextureMethod "getCoglTexture" o = Clutter.Texture.TextureGetCoglTextureMethodInfo
ResolveCairoTextureMethod "getConstraint" o = Clutter.Actor.ActorGetConstraintMethodInfo
ResolveCairoTextureMethod "getConstraints" o = Clutter.Actor.ActorGetConstraintsMethodInfo
ResolveCairoTextureMethod "getContent" o = Clutter.Actor.ActorGetContentMethodInfo
ResolveCairoTextureMethod "getContentBox" o = Clutter.Actor.ActorGetContentBoxMethodInfo
ResolveCairoTextureMethod "getContentGravity" o = Clutter.Actor.ActorGetContentGravityMethodInfo
ResolveCairoTextureMethod "getContentRepeat" o = Clutter.Actor.ActorGetContentRepeatMethodInfo
ResolveCairoTextureMethod "getContentScalingFilters" o = Clutter.Actor.ActorGetContentScalingFiltersMethodInfo
ResolveCairoTextureMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveCairoTextureMethod "getDefaultPaintVolume" o = Clutter.Actor.ActorGetDefaultPaintVolumeMethodInfo
ResolveCairoTextureMethod "getDepth" o = Clutter.Actor.ActorGetDepthMethodInfo
ResolveCairoTextureMethod "getEasingDelay" o = Clutter.Actor.ActorGetEasingDelayMethodInfo
ResolveCairoTextureMethod "getEasingDuration" o = Clutter.Actor.ActorGetEasingDurationMethodInfo
ResolveCairoTextureMethod "getEasingMode" o = Clutter.Actor.ActorGetEasingModeMethodInfo
ResolveCairoTextureMethod "getEffect" o = Clutter.Actor.ActorGetEffectMethodInfo
ResolveCairoTextureMethod "getEffects" o = Clutter.Actor.ActorGetEffectsMethodInfo
ResolveCairoTextureMethod "getFilterQuality" o = Clutter.Texture.TextureGetFilterQualityMethodInfo
ResolveCairoTextureMethod "getFirstChild" o = Clutter.Actor.ActorGetFirstChildMethodInfo
ResolveCairoTextureMethod "getFixedPositionSet" o = Clutter.Actor.ActorGetFixedPositionSetMethodInfo
ResolveCairoTextureMethod "getFlags" o = Clutter.Actor.ActorGetFlagsMethodInfo
ResolveCairoTextureMethod "getGeometry" o = Clutter.Actor.ActorGetGeometryMethodInfo
ResolveCairoTextureMethod "getGid" o = Clutter.Actor.ActorGetGidMethodInfo
ResolveCairoTextureMethod "getHeight" o = Clutter.Actor.ActorGetHeightMethodInfo
ResolveCairoTextureMethod "getId" o = Clutter.Scriptable.ScriptableGetIdMethodInfo
ResolveCairoTextureMethod "getInitialState" o = Clutter.Animatable.AnimatableGetInitialStateMethodInfo
ResolveCairoTextureMethod "getKeepAspectRatio" o = Clutter.Texture.TextureGetKeepAspectRatioMethodInfo
ResolveCairoTextureMethod "getLastChild" o = Clutter.Actor.ActorGetLastChildMethodInfo
ResolveCairoTextureMethod "getLayoutManager" o = Clutter.Actor.ActorGetLayoutManagerMethodInfo
ResolveCairoTextureMethod "getLoadAsync" o = Clutter.Texture.TextureGetLoadAsyncMethodInfo
ResolveCairoTextureMethod "getLoadDataAsync" o = Clutter.Texture.TextureGetLoadDataAsyncMethodInfo
ResolveCairoTextureMethod "getMargin" o = Clutter.Actor.ActorGetMarginMethodInfo
ResolveCairoTextureMethod "getMarginBottom" o = Clutter.Actor.ActorGetMarginBottomMethodInfo
ResolveCairoTextureMethod "getMarginLeft" o = Clutter.Actor.ActorGetMarginLeftMethodInfo
ResolveCairoTextureMethod "getMarginRight" o = Clutter.Actor.ActorGetMarginRightMethodInfo
ResolveCairoTextureMethod "getMarginTop" o = Clutter.Actor.ActorGetMarginTopMethodInfo
ResolveCairoTextureMethod "getMaxTileWaste" o = Clutter.Texture.TextureGetMaxTileWasteMethodInfo
ResolveCairoTextureMethod "getNChildren" o = Clutter.Actor.ActorGetNChildrenMethodInfo
ResolveCairoTextureMethod "getName" o = Clutter.Actor.ActorGetNameMethodInfo
ResolveCairoTextureMethod "getNextSibling" o = Clutter.Actor.ActorGetNextSiblingMethodInfo
ResolveCairoTextureMethod "getOffscreenRedirect" o = Clutter.Actor.ActorGetOffscreenRedirectMethodInfo
ResolveCairoTextureMethod "getOpacity" o = Clutter.Actor.ActorGetOpacityMethodInfo
ResolveCairoTextureMethod "getPaintBox" o = Clutter.Actor.ActorGetPaintBoxMethodInfo
ResolveCairoTextureMethod "getPaintOpacity" o = Clutter.Actor.ActorGetPaintOpacityMethodInfo
ResolveCairoTextureMethod "getPaintVisibility" o = Clutter.Actor.ActorGetPaintVisibilityMethodInfo
ResolveCairoTextureMethod "getPaintVolume" o = Clutter.Actor.ActorGetPaintVolumeMethodInfo
ResolveCairoTextureMethod "getPangoContext" o = Clutter.Actor.ActorGetPangoContextMethodInfo
ResolveCairoTextureMethod "getParent" o = Clutter.Actor.ActorGetParentMethodInfo
ResolveCairoTextureMethod "getPickWithAlpha" o = Clutter.Texture.TextureGetPickWithAlphaMethodInfo
ResolveCairoTextureMethod "getPivotPoint" o = Clutter.Actor.ActorGetPivotPointMethodInfo
ResolveCairoTextureMethod "getPivotPointZ" o = Clutter.Actor.ActorGetPivotPointZMethodInfo
ResolveCairoTextureMethod "getPixelFormat" o = Clutter.Texture.TextureGetPixelFormatMethodInfo
ResolveCairoTextureMethod "getPosition" o = Clutter.Actor.ActorGetPositionMethodInfo
ResolveCairoTextureMethod "getPreferredHeight" o = Clutter.Actor.ActorGetPreferredHeightMethodInfo
ResolveCairoTextureMethod "getPreferredSize" o = Clutter.Actor.ActorGetPreferredSizeMethodInfo
ResolveCairoTextureMethod "getPreferredWidth" o = Clutter.Actor.ActorGetPreferredWidthMethodInfo
ResolveCairoTextureMethod "getPreviousSibling" o = Clutter.Actor.ActorGetPreviousSiblingMethodInfo
ResolveCairoTextureMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveCairoTextureMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveCairoTextureMethod "getReactive" o = Clutter.Actor.ActorGetReactiveMethodInfo
ResolveCairoTextureMethod "getRepeat" o = Clutter.Texture.TextureGetRepeatMethodInfo
ResolveCairoTextureMethod "getRequestMode" o = Clutter.Actor.ActorGetRequestModeMethodInfo
ResolveCairoTextureMethod "getRotation" o = Clutter.Actor.ActorGetRotationMethodInfo
ResolveCairoTextureMethod "getRotationAngle" o = Clutter.Actor.ActorGetRotationAngleMethodInfo
ResolveCairoTextureMethod "getScale" o = Clutter.Actor.ActorGetScaleMethodInfo
ResolveCairoTextureMethod "getScaleCenter" o = Clutter.Actor.ActorGetScaleCenterMethodInfo
ResolveCairoTextureMethod "getScaleGravity" o = Clutter.Actor.ActorGetScaleGravityMethodInfo
ResolveCairoTextureMethod "getScaleZ" o = Clutter.Actor.ActorGetScaleZMethodInfo
ResolveCairoTextureMethod "getShader" o = Clutter.Actor.ActorGetShaderMethodInfo
ResolveCairoTextureMethod "getSize" o = Clutter.Actor.ActorGetSizeMethodInfo
ResolveCairoTextureMethod "getStage" o = Clutter.Actor.ActorGetStageMethodInfo
ResolveCairoTextureMethod "getSurfaceSize" o = CairoTextureGetSurfaceSizeMethodInfo
ResolveCairoTextureMethod "getSyncSize" o = Clutter.Texture.TextureGetSyncSizeMethodInfo
ResolveCairoTextureMethod "getTextDirection" o = Clutter.Actor.ActorGetTextDirectionMethodInfo
ResolveCairoTextureMethod "getTransform" o = Clutter.Actor.ActorGetTransformMethodInfo
ResolveCairoTextureMethod "getTransformationMatrix" o = Clutter.Actor.ActorGetTransformationMatrixMethodInfo
ResolveCairoTextureMethod "getTransformedPaintVolume" o = Clutter.Actor.ActorGetTransformedPaintVolumeMethodInfo
ResolveCairoTextureMethod "getTransformedPosition" o = Clutter.Actor.ActorGetTransformedPositionMethodInfo
ResolveCairoTextureMethod "getTransformedSize" o = Clutter.Actor.ActorGetTransformedSizeMethodInfo
ResolveCairoTextureMethod "getTransition" o = Clutter.Actor.ActorGetTransitionMethodInfo
ResolveCairoTextureMethod "getTranslation" o = Clutter.Actor.ActorGetTranslationMethodInfo
ResolveCairoTextureMethod "getWidth" o = Clutter.Actor.ActorGetWidthMethodInfo
ResolveCairoTextureMethod "getX" o = Clutter.Actor.ActorGetXMethodInfo
ResolveCairoTextureMethod "getXAlign" o = Clutter.Actor.ActorGetXAlignMethodInfo
ResolveCairoTextureMethod "getXExpand" o = Clutter.Actor.ActorGetXExpandMethodInfo
ResolveCairoTextureMethod "getY" o = Clutter.Actor.ActorGetYMethodInfo
ResolveCairoTextureMethod "getYAlign" o = Clutter.Actor.ActorGetYAlignMethodInfo
ResolveCairoTextureMethod "getYExpand" o = Clutter.Actor.ActorGetYExpandMethodInfo
ResolveCairoTextureMethod "getZPosition" o = Clutter.Actor.ActorGetZPositionMethodInfo
ResolveCairoTextureMethod "getZRotationGravity" o = Clutter.Actor.ActorGetZRotationGravityMethodInfo
ResolveCairoTextureMethod "setAllocation" o = Clutter.Actor.ActorSetAllocationMethodInfo
ResolveCairoTextureMethod "setAnchorPoint" o = Clutter.Actor.ActorSetAnchorPointMethodInfo
ResolveCairoTextureMethod "setAnchorPointFromGravity" o = Clutter.Actor.ActorSetAnchorPointFromGravityMethodInfo
ResolveCairoTextureMethod "setAreaFromRgbData" o = Clutter.Texture.TextureSetAreaFromRgbDataMethodInfo
ResolveCairoTextureMethod "setAutoResize" o = CairoTextureSetAutoResizeMethodInfo
ResolveCairoTextureMethod "setBackgroundColor" o = Clutter.Actor.ActorSetBackgroundColorMethodInfo
ResolveCairoTextureMethod "setChildAboveSibling" o = Clutter.Actor.ActorSetChildAboveSiblingMethodInfo
ResolveCairoTextureMethod "setChildAtIndex" o = Clutter.Actor.ActorSetChildAtIndexMethodInfo
ResolveCairoTextureMethod "setChildBelowSibling" o = Clutter.Actor.ActorSetChildBelowSiblingMethodInfo
ResolveCairoTextureMethod "setChildTransform" o = Clutter.Actor.ActorSetChildTransformMethodInfo
ResolveCairoTextureMethod "setClip" o = Clutter.Actor.ActorSetClipMethodInfo
ResolveCairoTextureMethod "setClipToAllocation" o = Clutter.Actor.ActorSetClipToAllocationMethodInfo
ResolveCairoTextureMethod "setCoglMaterial" o = Clutter.Texture.TextureSetCoglMaterialMethodInfo
ResolveCairoTextureMethod "setCoglTexture" o = Clutter.Texture.TextureSetCoglTextureMethodInfo
ResolveCairoTextureMethod "setContent" o = Clutter.Actor.ActorSetContentMethodInfo
ResolveCairoTextureMethod "setContentGravity" o = Clutter.Actor.ActorSetContentGravityMethodInfo
ResolveCairoTextureMethod "setContentRepeat" o = Clutter.Actor.ActorSetContentRepeatMethodInfo
ResolveCairoTextureMethod "setContentScalingFilters" o = Clutter.Actor.ActorSetContentScalingFiltersMethodInfo
ResolveCairoTextureMethod "setCustomProperty" o = Clutter.Scriptable.ScriptableSetCustomPropertyMethodInfo
ResolveCairoTextureMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveCairoTextureMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveCairoTextureMethod "setDepth" o = Clutter.Actor.ActorSetDepthMethodInfo
ResolveCairoTextureMethod "setEasingDelay" o = Clutter.Actor.ActorSetEasingDelayMethodInfo
ResolveCairoTextureMethod "setEasingDuration" o = Clutter.Actor.ActorSetEasingDurationMethodInfo
ResolveCairoTextureMethod "setEasingMode" o = Clutter.Actor.ActorSetEasingModeMethodInfo
ResolveCairoTextureMethod "setFilterQuality" o = Clutter.Texture.TextureSetFilterQualityMethodInfo
ResolveCairoTextureMethod "setFinalState" o = Clutter.Animatable.AnimatableSetFinalStateMethodInfo
ResolveCairoTextureMethod "setFixedPositionSet" o = Clutter.Actor.ActorSetFixedPositionSetMethodInfo
ResolveCairoTextureMethod "setFlags" o = Clutter.Actor.ActorSetFlagsMethodInfo
ResolveCairoTextureMethod "setFromFile" o = Clutter.Texture.TextureSetFromFileMethodInfo
ResolveCairoTextureMethod "setFromRgbData" o = Clutter.Texture.TextureSetFromRgbDataMethodInfo
ResolveCairoTextureMethod "setFromYuvData" o = Clutter.Texture.TextureSetFromYuvDataMethodInfo
ResolveCairoTextureMethod "setGeometry" o = Clutter.Actor.ActorSetGeometryMethodInfo
ResolveCairoTextureMethod "setHeight" o = Clutter.Actor.ActorSetHeightMethodInfo
ResolveCairoTextureMethod "setId" o = Clutter.Scriptable.ScriptableSetIdMethodInfo
ResolveCairoTextureMethod "setKeepAspectRatio" o = Clutter.Texture.TextureSetKeepAspectRatioMethodInfo
ResolveCairoTextureMethod "setLayoutManager" o = Clutter.Actor.ActorSetLayoutManagerMethodInfo
ResolveCairoTextureMethod "setLoadAsync" o = Clutter.Texture.TextureSetLoadAsyncMethodInfo
ResolveCairoTextureMethod "setLoadDataAsync" o = Clutter.Texture.TextureSetLoadDataAsyncMethodInfo
ResolveCairoTextureMethod "setMargin" o = Clutter.Actor.ActorSetMarginMethodInfo
ResolveCairoTextureMethod "setMarginBottom" o = Clutter.Actor.ActorSetMarginBottomMethodInfo
ResolveCairoTextureMethod "setMarginLeft" o = Clutter.Actor.ActorSetMarginLeftMethodInfo
ResolveCairoTextureMethod "setMarginRight" o = Clutter.Actor.ActorSetMarginRightMethodInfo
ResolveCairoTextureMethod "setMarginTop" o = Clutter.Actor.ActorSetMarginTopMethodInfo
ResolveCairoTextureMethod "setName" o = Clutter.Actor.ActorSetNameMethodInfo
ResolveCairoTextureMethod "setOffscreenRedirect" o = Clutter.Actor.ActorSetOffscreenRedirectMethodInfo
ResolveCairoTextureMethod "setOpacity" o = Clutter.Actor.ActorSetOpacityMethodInfo
ResolveCairoTextureMethod "setParent" o = Clutter.Actor.ActorSetParentMethodInfo
ResolveCairoTextureMethod "setPickWithAlpha" o = Clutter.Texture.TextureSetPickWithAlphaMethodInfo
ResolveCairoTextureMethod "setPivotPoint" o = Clutter.Actor.ActorSetPivotPointMethodInfo
ResolveCairoTextureMethod "setPivotPointZ" o = Clutter.Actor.ActorSetPivotPointZMethodInfo
ResolveCairoTextureMethod "setPosition" o = Clutter.Actor.ActorSetPositionMethodInfo
ResolveCairoTextureMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveCairoTextureMethod "setReactive" o = Clutter.Actor.ActorSetReactiveMethodInfo
ResolveCairoTextureMethod "setRepeat" o = Clutter.Texture.TextureSetRepeatMethodInfo
ResolveCairoTextureMethod "setRequestMode" o = Clutter.Actor.ActorSetRequestModeMethodInfo
ResolveCairoTextureMethod "setRotation" o = Clutter.Actor.ActorSetRotationMethodInfo
ResolveCairoTextureMethod "setRotationAngle" o = Clutter.Actor.ActorSetRotationAngleMethodInfo
ResolveCairoTextureMethod "setScale" o = Clutter.Actor.ActorSetScaleMethodInfo
ResolveCairoTextureMethod "setScaleFull" o = Clutter.Actor.ActorSetScaleFullMethodInfo
ResolveCairoTextureMethod "setScaleWithGravity" o = Clutter.Actor.ActorSetScaleWithGravityMethodInfo
ResolveCairoTextureMethod "setScaleZ" o = Clutter.Actor.ActorSetScaleZMethodInfo
ResolveCairoTextureMethod "setShader" o = Clutter.Actor.ActorSetShaderMethodInfo
ResolveCairoTextureMethod "setShaderParam" o = Clutter.Actor.ActorSetShaderParamMethodInfo
ResolveCairoTextureMethod "setShaderParamFloat" o = Clutter.Actor.ActorSetShaderParamFloatMethodInfo
ResolveCairoTextureMethod "setShaderParamInt" o = Clutter.Actor.ActorSetShaderParamIntMethodInfo
ResolveCairoTextureMethod "setSize" o = Clutter.Actor.ActorSetSizeMethodInfo
ResolveCairoTextureMethod "setSurfaceSize" o = CairoTextureSetSurfaceSizeMethodInfo
ResolveCairoTextureMethod "setSyncSize" o = Clutter.Texture.TextureSetSyncSizeMethodInfo
ResolveCairoTextureMethod "setTextDirection" o = Clutter.Actor.ActorSetTextDirectionMethodInfo
ResolveCairoTextureMethod "setTransform" o = Clutter.Actor.ActorSetTransformMethodInfo
ResolveCairoTextureMethod "setTranslation" o = Clutter.Actor.ActorSetTranslationMethodInfo
ResolveCairoTextureMethod "setWidth" o = Clutter.Actor.ActorSetWidthMethodInfo
ResolveCairoTextureMethod "setX" o = Clutter.Actor.ActorSetXMethodInfo
ResolveCairoTextureMethod "setXAlign" o = Clutter.Actor.ActorSetXAlignMethodInfo
ResolveCairoTextureMethod "setXExpand" o = Clutter.Actor.ActorSetXExpandMethodInfo
ResolveCairoTextureMethod "setY" o = Clutter.Actor.ActorSetYMethodInfo
ResolveCairoTextureMethod "setYAlign" o = Clutter.Actor.ActorSetYAlignMethodInfo
ResolveCairoTextureMethod "setYExpand" o = Clutter.Actor.ActorSetYExpandMethodInfo
ResolveCairoTextureMethod "setZPosition" o = Clutter.Actor.ActorSetZPositionMethodInfo
ResolveCairoTextureMethod "setZRotationFromGravity" o = Clutter.Actor.ActorSetZRotationFromGravityMethodInfo
ResolveCairoTextureMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveCairoTextureMethod t CairoTexture, O.OverloadedMethod info CairoTexture p) => OL.IsLabel t (CairoTexture -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#if MIN_VERSION_base(4,13,0)
instance (info ~ ResolveCairoTextureMethod t CairoTexture, O.OverloadedMethod info CairoTexture p, R.HasField t CairoTexture p) => R.HasField t CairoTexture p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveCairoTextureMethod t CairoTexture, O.OverloadedMethodInfo info CairoTexture) => OL.IsLabel t (O.MethodProxy info CairoTexture) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
{-# DEPRECATED CairoTextureCreateSurfaceCallback ["(Since version 1.12)"] #-}
type CairoTextureCreateSurfaceCallback =
Word32
-> Word32
-> IO Cairo.Surface.Surface
type C_CairoTextureCreateSurfaceCallback =
Ptr CairoTexture ->
Word32 ->
Word32 ->
Ptr () ->
IO (Ptr Cairo.Surface.Surface)
foreign import ccall "wrapper"
mk_CairoTextureCreateSurfaceCallback :: C_CairoTextureCreateSurfaceCallback -> IO (FunPtr C_CairoTextureCreateSurfaceCallback)
wrap_CairoTextureCreateSurfaceCallback ::
GObject a => (a -> CairoTextureCreateSurfaceCallback) ->
C_CairoTextureCreateSurfaceCallback
wrap_CairoTextureCreateSurfaceCallback :: forall a.
GObject a =>
(a -> CairoTextureCreateSurfaceCallback)
-> C_CairoTextureCreateSurfaceCallback
wrap_CairoTextureCreateSurfaceCallback a -> CairoTextureCreateSurfaceCallback
gi'cb Ptr CairoTexture
gi'selfPtr Word32
width Word32
height Ptr ()
_ = do
Surface
result <- Ptr CairoTexture -> (CairoTexture -> IO Surface) -> IO Surface
forall a b.
(HasCallStack, ManagedPtrNewtype a) =>
Ptr a -> (a -> IO b) -> IO b
B.ManagedPtr.withTransient Ptr CairoTexture
gi'selfPtr ((CairoTexture -> IO Surface) -> IO Surface)
-> (CairoTexture -> IO Surface) -> IO Surface
forall a b. (a -> b) -> a -> b
$ \CairoTexture
gi'self -> a -> CairoTextureCreateSurfaceCallback
gi'cb (CairoTexture -> a
forall a b. Coercible a b => a -> b
Coerce.coerce CairoTexture
gi'self) Word32
width Word32
height
Ptr Surface
result' <- Surface -> IO (Ptr Surface)
forall a. (HasCallStack, GBoxed a) => a -> IO (Ptr a)
B.ManagedPtr.disownBoxed Surface
result
Ptr Surface -> IO (Ptr Surface)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Surface
result'
onCairoTextureCreateSurface :: (IsCairoTexture a, MonadIO m) => a -> ((?self :: a) => CairoTextureCreateSurfaceCallback) -> m SignalHandlerId
onCairoTextureCreateSurface :: forall a (m :: * -> *).
(IsCairoTexture a, MonadIO m) =>
a
-> ((?self::a) => CairoTextureCreateSurfaceCallback)
-> m SignalHandlerId
onCairoTextureCreateSurface a
obj (?self::a) => CairoTextureCreateSurfaceCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let wrapped :: a -> CairoTextureCreateSurfaceCallback
wrapped a
self = let ?self = a
?self::a
self in (?self::a) => CairoTextureCreateSurfaceCallback
CairoTextureCreateSurfaceCallback
cb
let wrapped' :: C_CairoTextureCreateSurfaceCallback
wrapped' = (a -> CairoTextureCreateSurfaceCallback)
-> C_CairoTextureCreateSurfaceCallback
forall a.
GObject a =>
(a -> CairoTextureCreateSurfaceCallback)
-> C_CairoTextureCreateSurfaceCallback
wrap_CairoTextureCreateSurfaceCallback a -> CairoTextureCreateSurfaceCallback
wrapped
FunPtr C_CairoTextureCreateSurfaceCallback
wrapped'' <- C_CairoTextureCreateSurfaceCallback
-> IO (FunPtr C_CairoTextureCreateSurfaceCallback)
mk_CairoTextureCreateSurfaceCallback C_CairoTextureCreateSurfaceCallback
wrapped'
a
-> Text
-> FunPtr C_CairoTextureCreateSurfaceCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"create-surface" FunPtr C_CairoTextureCreateSurfaceCallback
wrapped'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterCairoTextureCreateSurface :: (IsCairoTexture a, MonadIO m) => a -> ((?self :: a) => CairoTextureCreateSurfaceCallback) -> m SignalHandlerId
afterCairoTextureCreateSurface :: forall a (m :: * -> *).
(IsCairoTexture a, MonadIO m) =>
a
-> ((?self::a) => CairoTextureCreateSurfaceCallback)
-> m SignalHandlerId
afterCairoTextureCreateSurface a
obj (?self::a) => CairoTextureCreateSurfaceCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let wrapped :: a -> CairoTextureCreateSurfaceCallback
wrapped a
self = let ?self = a
?self::a
self in (?self::a) => CairoTextureCreateSurfaceCallback
CairoTextureCreateSurfaceCallback
cb
let wrapped' :: C_CairoTextureCreateSurfaceCallback
wrapped' = (a -> CairoTextureCreateSurfaceCallback)
-> C_CairoTextureCreateSurfaceCallback
forall a.
GObject a =>
(a -> CairoTextureCreateSurfaceCallback)
-> C_CairoTextureCreateSurfaceCallback
wrap_CairoTextureCreateSurfaceCallback a -> CairoTextureCreateSurfaceCallback
wrapped
FunPtr C_CairoTextureCreateSurfaceCallback
wrapped'' <- C_CairoTextureCreateSurfaceCallback
-> IO (FunPtr C_CairoTextureCreateSurfaceCallback)
mk_CairoTextureCreateSurfaceCallback C_CairoTextureCreateSurfaceCallback
wrapped'
a
-> Text
-> FunPtr C_CairoTextureCreateSurfaceCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"create-surface" FunPtr C_CairoTextureCreateSurfaceCallback
wrapped'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data CairoTextureCreateSurfaceSignalInfo
instance SignalInfo CairoTextureCreateSurfaceSignalInfo where
type HaskellCallbackType CairoTextureCreateSurfaceSignalInfo = CairoTextureCreateSurfaceCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_CairoTextureCreateSurfaceCallback cb
cb'' <- mk_CairoTextureCreateSurfaceCallback cb'
connectSignalFunPtr obj "create-surface" cb'' connectMode detail
dbgSignalInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Clutter.Objects.CairoTexture::create-surface"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-clutter-1.0.3/docs/GI-Clutter-Objects-CairoTexture.html#g:signal:createSurface"})
#endif
{-# DEPRECATED CairoTextureDrawCallback ["(Since version 1.12)"] #-}
type CairoTextureDrawCallback =
Cairo.Context.Context
-> IO Bool
type C_CairoTextureDrawCallback =
Ptr CairoTexture ->
Ptr Cairo.Context.Context ->
Ptr () ->
IO CInt
foreign import ccall "wrapper"
mk_CairoTextureDrawCallback :: C_CairoTextureDrawCallback -> IO (FunPtr C_CairoTextureDrawCallback)
wrap_CairoTextureDrawCallback ::
GObject a => (a -> CairoTextureDrawCallback) ->
C_CairoTextureDrawCallback
wrap_CairoTextureDrawCallback :: forall a.
GObject a =>
(a -> CairoTextureDrawCallback) -> C_CairoTextureDrawCallback
wrap_CairoTextureDrawCallback a -> CairoTextureDrawCallback
gi'cb Ptr CairoTexture
gi'selfPtr Ptr Context
cr Ptr ()
_ = do
Ptr Context -> (Context -> IO CInt) -> IO CInt
forall a b.
(HasCallStack, ManagedPtrNewtype a) =>
Ptr a -> (a -> IO b) -> IO b
B.ManagedPtr.withTransient Ptr Context
cr ((Context -> IO CInt) -> IO CInt)
-> (Context -> IO CInt) -> IO CInt
forall a b. (a -> b) -> a -> b
$ \Context
cr' -> do
Bool
result <- Ptr CairoTexture -> (CairoTexture -> IO Bool) -> IO Bool
forall a b.
(HasCallStack, ManagedPtrNewtype a) =>
Ptr a -> (a -> IO b) -> IO b
B.ManagedPtr.withTransient Ptr CairoTexture
gi'selfPtr ((CairoTexture -> IO Bool) -> IO Bool)
-> (CairoTexture -> IO Bool) -> IO Bool
forall a b. (a -> b) -> a -> b
$ \CairoTexture
gi'self -> a -> CairoTextureDrawCallback
gi'cb (CairoTexture -> a
forall a b. Coercible a b => a -> b
Coerce.coerce CairoTexture
gi'self) Context
cr'
let result' :: CInt
result' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
result
CInt -> IO CInt
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CInt
result'
onCairoTextureDraw :: (IsCairoTexture a, MonadIO m) => a -> ((?self :: a) => CairoTextureDrawCallback) -> m SignalHandlerId
onCairoTextureDraw :: forall a (m :: * -> *).
(IsCairoTexture a, MonadIO m) =>
a -> ((?self::a) => CairoTextureDrawCallback) -> m SignalHandlerId
onCairoTextureDraw a
obj (?self::a) => CairoTextureDrawCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let wrapped :: a -> CairoTextureDrawCallback
wrapped a
self = let ?self = a
?self::a
self in (?self::a) => CairoTextureDrawCallback
CairoTextureDrawCallback
cb
let wrapped' :: C_CairoTextureDrawCallback
wrapped' = (a -> CairoTextureDrawCallback) -> C_CairoTextureDrawCallback
forall a.
GObject a =>
(a -> CairoTextureDrawCallback) -> C_CairoTextureDrawCallback
wrap_CairoTextureDrawCallback a -> CairoTextureDrawCallback
wrapped
FunPtr C_CairoTextureDrawCallback
wrapped'' <- C_CairoTextureDrawCallback
-> IO (FunPtr C_CairoTextureDrawCallback)
mk_CairoTextureDrawCallback C_CairoTextureDrawCallback
wrapped'
a
-> Text
-> FunPtr C_CairoTextureDrawCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"draw" FunPtr C_CairoTextureDrawCallback
wrapped'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterCairoTextureDraw :: (IsCairoTexture a, MonadIO m) => a -> ((?self :: a) => CairoTextureDrawCallback) -> m SignalHandlerId
afterCairoTextureDraw :: forall a (m :: * -> *).
(IsCairoTexture a, MonadIO m) =>
a -> ((?self::a) => CairoTextureDrawCallback) -> m SignalHandlerId
afterCairoTextureDraw a
obj (?self::a) => CairoTextureDrawCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let wrapped :: a -> CairoTextureDrawCallback
wrapped a
self = let ?self = a
?self::a
self in (?self::a) => CairoTextureDrawCallback
CairoTextureDrawCallback
cb
let wrapped' :: C_CairoTextureDrawCallback
wrapped' = (a -> CairoTextureDrawCallback) -> C_CairoTextureDrawCallback
forall a.
GObject a =>
(a -> CairoTextureDrawCallback) -> C_CairoTextureDrawCallback
wrap_CairoTextureDrawCallback a -> CairoTextureDrawCallback
wrapped
FunPtr C_CairoTextureDrawCallback
wrapped'' <- C_CairoTextureDrawCallback
-> IO (FunPtr C_CairoTextureDrawCallback)
mk_CairoTextureDrawCallback C_CairoTextureDrawCallback
wrapped'
a
-> Text
-> FunPtr C_CairoTextureDrawCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"draw" FunPtr C_CairoTextureDrawCallback
wrapped'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data CairoTextureDrawSignalInfo
instance SignalInfo CairoTextureDrawSignalInfo where
type HaskellCallbackType CairoTextureDrawSignalInfo = CairoTextureDrawCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_CairoTextureDrawCallback cb
cb'' <- mk_CairoTextureDrawCallback cb'
connectSignalFunPtr obj "draw" cb'' connectMode detail
dbgSignalInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Clutter.Objects.CairoTexture::draw"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-clutter-1.0.3/docs/GI-Clutter-Objects-CairoTexture.html#g:signal:draw"})
#endif
getCairoTextureAutoResize :: (MonadIO m, IsCairoTexture o) => o -> m Bool
getCairoTextureAutoResize :: forall (m :: * -> *) o.
(MonadIO m, IsCairoTexture o) =>
o -> m Bool
getCairoTextureAutoResize o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"auto-resize"
setCairoTextureAutoResize :: (MonadIO m, IsCairoTexture o) => o -> Bool -> m ()
setCairoTextureAutoResize :: forall (m :: * -> *) o.
(MonadIO m, IsCairoTexture o) =>
o -> Bool -> m ()
setCairoTextureAutoResize o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"auto-resize" Bool
val
constructCairoTextureAutoResize :: (IsCairoTexture o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructCairoTextureAutoResize :: forall o (m :: * -> *).
(IsCairoTexture o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructCairoTextureAutoResize Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"auto-resize" Bool
val
#if defined(ENABLE_OVERLOADING)
data CairoTextureAutoResizePropertyInfo
instance AttrInfo CairoTextureAutoResizePropertyInfo where
type AttrAllowedOps CairoTextureAutoResizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CairoTextureAutoResizePropertyInfo = IsCairoTexture
type AttrSetTypeConstraint CairoTextureAutoResizePropertyInfo = (~) Bool
type AttrTransferTypeConstraint CairoTextureAutoResizePropertyInfo = (~) Bool
type AttrTransferType CairoTextureAutoResizePropertyInfo = Bool
type AttrGetType CairoTextureAutoResizePropertyInfo = Bool
type AttrLabel CairoTextureAutoResizePropertyInfo = "auto-resize"
type AttrOrigin CairoTextureAutoResizePropertyInfo = CairoTexture
attrGet = getCairoTextureAutoResize
attrSet = setCairoTextureAutoResize
attrTransfer _ v = do
return v
attrConstruct = constructCairoTextureAutoResize
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Clutter.Objects.CairoTexture.autoResize"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-clutter-1.0.3/docs/GI-Clutter-Objects-CairoTexture.html#g:attr:autoResize"
})
#endif
getCairoTextureSurfaceHeight :: (MonadIO m, IsCairoTexture o) => o -> m Word32
getCairoTextureSurfaceHeight :: forall (m :: * -> *) o.
(MonadIO m, IsCairoTexture o) =>
o -> m Word32
getCairoTextureSurfaceHeight o
obj = IO Word32 -> m Word32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Word32
forall a. GObject a => a -> String -> IO Word32
B.Properties.getObjectPropertyUInt32 o
obj String
"surface-height"
setCairoTextureSurfaceHeight :: (MonadIO m, IsCairoTexture o) => o -> Word32 -> m ()
setCairoTextureSurfaceHeight :: forall (m :: * -> *) o.
(MonadIO m, IsCairoTexture o) =>
o -> Word32 -> m ()
setCairoTextureSurfaceHeight o
obj Word32
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Word32 -> IO ()
forall a. GObject a => a -> String -> Word32 -> IO ()
B.Properties.setObjectPropertyUInt32 o
obj String
"surface-height" Word32
val
constructCairoTextureSurfaceHeight :: (IsCairoTexture o, MIO.MonadIO m) => Word32 -> m (GValueConstruct o)
constructCairoTextureSurfaceHeight :: forall o (m :: * -> *).
(IsCairoTexture o, MonadIO m) =>
Word32 -> m (GValueConstruct o)
constructCairoTextureSurfaceHeight Word32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Word32 -> IO (GValueConstruct o)
forall o. String -> Word32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyUInt32 String
"surface-height" Word32
val
#if defined(ENABLE_OVERLOADING)
data CairoTextureSurfaceHeightPropertyInfo
instance AttrInfo CairoTextureSurfaceHeightPropertyInfo where
type AttrAllowedOps CairoTextureSurfaceHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CairoTextureSurfaceHeightPropertyInfo = IsCairoTexture
type AttrSetTypeConstraint CairoTextureSurfaceHeightPropertyInfo = (~) Word32
type AttrTransferTypeConstraint CairoTextureSurfaceHeightPropertyInfo = (~) Word32
type AttrTransferType CairoTextureSurfaceHeightPropertyInfo = Word32
type AttrGetType CairoTextureSurfaceHeightPropertyInfo = Word32
type AttrLabel CairoTextureSurfaceHeightPropertyInfo = "surface-height"
type AttrOrigin CairoTextureSurfaceHeightPropertyInfo = CairoTexture
attrGet = getCairoTextureSurfaceHeight
attrSet = setCairoTextureSurfaceHeight
attrTransfer _ v = do
return v
attrConstruct = constructCairoTextureSurfaceHeight
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Clutter.Objects.CairoTexture.surfaceHeight"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-clutter-1.0.3/docs/GI-Clutter-Objects-CairoTexture.html#g:attr:surfaceHeight"
})
#endif
getCairoTextureSurfaceWidth :: (MonadIO m, IsCairoTexture o) => o -> m Word32
getCairoTextureSurfaceWidth :: forall (m :: * -> *) o.
(MonadIO m, IsCairoTexture o) =>
o -> m Word32
getCairoTextureSurfaceWidth o
obj = IO Word32 -> m Word32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Word32
forall a. GObject a => a -> String -> IO Word32
B.Properties.getObjectPropertyUInt32 o
obj String
"surface-width"
setCairoTextureSurfaceWidth :: (MonadIO m, IsCairoTexture o) => o -> Word32 -> m ()
setCairoTextureSurfaceWidth :: forall (m :: * -> *) o.
(MonadIO m, IsCairoTexture o) =>
o -> Word32 -> m ()
setCairoTextureSurfaceWidth o
obj Word32
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Word32 -> IO ()
forall a. GObject a => a -> String -> Word32 -> IO ()
B.Properties.setObjectPropertyUInt32 o
obj String
"surface-width" Word32
val
constructCairoTextureSurfaceWidth :: (IsCairoTexture o, MIO.MonadIO m) => Word32 -> m (GValueConstruct o)
constructCairoTextureSurfaceWidth :: forall o (m :: * -> *).
(IsCairoTexture o, MonadIO m) =>
Word32 -> m (GValueConstruct o)
constructCairoTextureSurfaceWidth Word32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Word32 -> IO (GValueConstruct o)
forall o. String -> Word32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyUInt32 String
"surface-width" Word32
val
#if defined(ENABLE_OVERLOADING)
data CairoTextureSurfaceWidthPropertyInfo
instance AttrInfo CairoTextureSurfaceWidthPropertyInfo where
type AttrAllowedOps CairoTextureSurfaceWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint CairoTextureSurfaceWidthPropertyInfo = IsCairoTexture
type AttrSetTypeConstraint CairoTextureSurfaceWidthPropertyInfo = (~) Word32
type AttrTransferTypeConstraint CairoTextureSurfaceWidthPropertyInfo = (~) Word32
type AttrTransferType CairoTextureSurfaceWidthPropertyInfo = Word32
type AttrGetType CairoTextureSurfaceWidthPropertyInfo = Word32
type AttrLabel CairoTextureSurfaceWidthPropertyInfo = "surface-width"
type AttrOrigin CairoTextureSurfaceWidthPropertyInfo = CairoTexture
attrGet = getCairoTextureSurfaceWidth
attrSet = setCairoTextureSurfaceWidth
attrTransfer _ v = do
return v
attrConstruct = constructCairoTextureSurfaceWidth
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Clutter.Objects.CairoTexture.surfaceWidth"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-clutter-1.0.3/docs/GI-Clutter-Objects-CairoTexture.html#g:attr:surfaceWidth"
})
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList CairoTexture
type instance O.AttributeList CairoTexture = CairoTextureAttributeList
type CairoTextureAttributeList = ('[ '("actions", Clutter.Actor.ActorActionsPropertyInfo), '("allocation", Clutter.Actor.ActorAllocationPropertyInfo), '("anchorGravity", Clutter.Actor.ActorAnchorGravityPropertyInfo), '("anchorX", Clutter.Actor.ActorAnchorXPropertyInfo), '("anchorY", Clutter.Actor.ActorAnchorYPropertyInfo), '("autoResize", CairoTextureAutoResizePropertyInfo), '("backgroundColor", Clutter.Actor.ActorBackgroundColorPropertyInfo), '("backgroundColorSet", Clutter.Actor.ActorBackgroundColorSetPropertyInfo), '("childTransform", Clutter.Actor.ActorChildTransformPropertyInfo), '("childTransformSet", Clutter.Actor.ActorChildTransformSetPropertyInfo), '("clip", Clutter.Actor.ActorClipPropertyInfo), '("clipRect", Clutter.Actor.ActorClipRectPropertyInfo), '("clipToAllocation", Clutter.Actor.ActorClipToAllocationPropertyInfo), '("constraints", Clutter.Actor.ActorConstraintsPropertyInfo), '("content", Clutter.Actor.ActorContentPropertyInfo), '("contentBox", Clutter.Actor.ActorContentBoxPropertyInfo), '("contentGravity", Clutter.Actor.ActorContentGravityPropertyInfo), '("contentRepeat", Clutter.Actor.ActorContentRepeatPropertyInfo), '("depth", Clutter.Actor.ActorDepthPropertyInfo), '("disableSlicing", Clutter.Texture.TextureDisableSlicingPropertyInfo), '("effect", Clutter.Actor.ActorEffectPropertyInfo), '("filename", Clutter.Texture.TextureFilenamePropertyInfo), '("filterQuality", Clutter.Texture.TextureFilterQualityPropertyInfo), '("firstChild", Clutter.Actor.ActorFirstChildPropertyInfo), '("fixedPositionSet", Clutter.Actor.ActorFixedPositionSetPropertyInfo), '("fixedX", Clutter.Actor.ActorFixedXPropertyInfo), '("fixedY", Clutter.Actor.ActorFixedYPropertyInfo), '("hasClip", Clutter.Actor.ActorHasClipPropertyInfo), '("hasPointer", Clutter.Actor.ActorHasPointerPropertyInfo), '("height", Clutter.Actor.ActorHeightPropertyInfo), '("keepAspectRatio", Clutter.Texture.TextureKeepAspectRatioPropertyInfo), '("lastChild", Clutter.Actor.ActorLastChildPropertyInfo), '("layoutManager", Clutter.Actor.ActorLayoutManagerPropertyInfo), '("loadAsync", Clutter.Texture.TextureLoadAsyncPropertyInfo), '("loadDataAsync", Clutter.Texture.TextureLoadDataAsyncPropertyInfo), '("magnificationFilter", Clutter.Actor.ActorMagnificationFilterPropertyInfo), '("mapped", Clutter.Actor.ActorMappedPropertyInfo), '("marginBottom", Clutter.Actor.ActorMarginBottomPropertyInfo), '("marginLeft", Clutter.Actor.ActorMarginLeftPropertyInfo), '("marginRight", Clutter.Actor.ActorMarginRightPropertyInfo), '("marginTop", Clutter.Actor.ActorMarginTopPropertyInfo), '("minHeight", Clutter.Actor.ActorMinHeightPropertyInfo), '("minHeightSet", Clutter.Actor.ActorMinHeightSetPropertyInfo), '("minWidth", Clutter.Actor.ActorMinWidthPropertyInfo), '("minWidthSet", Clutter.Actor.ActorMinWidthSetPropertyInfo), '("minificationFilter", Clutter.Actor.ActorMinificationFilterPropertyInfo), '("name", Clutter.Actor.ActorNamePropertyInfo), '("naturalHeight", Clutter.Actor.ActorNaturalHeightPropertyInfo), '("naturalHeightSet", Clutter.Actor.ActorNaturalHeightSetPropertyInfo), '("naturalWidth", Clutter.Actor.ActorNaturalWidthPropertyInfo), '("naturalWidthSet", Clutter.Actor.ActorNaturalWidthSetPropertyInfo), '("offscreenRedirect", Clutter.Actor.ActorOffscreenRedirectPropertyInfo), '("opacity", Clutter.Actor.ActorOpacityPropertyInfo), '("pickWithAlpha", Clutter.Texture.TexturePickWithAlphaPropertyInfo), '("pivotPoint", Clutter.Actor.ActorPivotPointPropertyInfo), '("pivotPointZ", Clutter.Actor.ActorPivotPointZPropertyInfo), '("pixelFormat", Clutter.Texture.TexturePixelFormatPropertyInfo), '("position", Clutter.Actor.ActorPositionPropertyInfo), '("reactive", Clutter.Actor.ActorReactivePropertyInfo), '("realized", Clutter.Actor.ActorRealizedPropertyInfo), '("repeatX", Clutter.Texture.TextureRepeatXPropertyInfo), '("repeatY", Clutter.Texture.TextureRepeatYPropertyInfo), '("requestMode", Clutter.Actor.ActorRequestModePropertyInfo), '("rotationAngleX", Clutter.Actor.ActorRotationAngleXPropertyInfo), '("rotationAngleY", Clutter.Actor.ActorRotationAngleYPropertyInfo), '("rotationAngleZ", Clutter.Actor.ActorRotationAngleZPropertyInfo), '("rotationCenterX", Clutter.Actor.ActorRotationCenterXPropertyInfo), '("rotationCenterY", Clutter.Actor.ActorRotationCenterYPropertyInfo), '("rotationCenterZ", Clutter.Actor.ActorRotationCenterZPropertyInfo), '("rotationCenterZGravity", Clutter.Actor.ActorRotationCenterZGravityPropertyInfo), '("scaleCenterX", Clutter.Actor.ActorScaleCenterXPropertyInfo), '("scaleCenterY", Clutter.Actor.ActorScaleCenterYPropertyInfo), '("scaleGravity", Clutter.Actor.ActorScaleGravityPropertyInfo), '("scaleX", Clutter.Actor.ActorScaleXPropertyInfo), '("scaleY", Clutter.Actor.ActorScaleYPropertyInfo), '("scaleZ", Clutter.Actor.ActorScaleZPropertyInfo), '("showOnSetParent", Clutter.Actor.ActorShowOnSetParentPropertyInfo), '("size", Clutter.Actor.ActorSizePropertyInfo), '("surfaceHeight", CairoTextureSurfaceHeightPropertyInfo), '("surfaceWidth", CairoTextureSurfaceWidthPropertyInfo), '("syncSize", Clutter.Texture.TextureSyncSizePropertyInfo), '("textDirection", Clutter.Actor.ActorTextDirectionPropertyInfo), '("tileWaste", Clutter.Texture.TextureTileWastePropertyInfo), '("transform", Clutter.Actor.ActorTransformPropertyInfo), '("transformSet", Clutter.Actor.ActorTransformSetPropertyInfo), '("translationX", Clutter.Actor.ActorTranslationXPropertyInfo), '("translationY", Clutter.Actor.ActorTranslationYPropertyInfo), '("translationZ", Clutter.Actor.ActorTranslationZPropertyInfo), '("visible", Clutter.Actor.ActorVisiblePropertyInfo), '("width", Clutter.Actor.ActorWidthPropertyInfo), '("x", Clutter.Actor.ActorXPropertyInfo), '("xAlign", Clutter.Actor.ActorXAlignPropertyInfo), '("xExpand", Clutter.Actor.ActorXExpandPropertyInfo), '("y", Clutter.Actor.ActorYPropertyInfo), '("yAlign", Clutter.Actor.ActorYAlignPropertyInfo), '("yExpand", Clutter.Actor.ActorYExpandPropertyInfo), '("zPosition", Clutter.Actor.ActorZPositionPropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
cairoTextureAutoResize :: AttrLabelProxy "autoResize"
cairoTextureAutoResize = AttrLabelProxy
cairoTextureSurfaceHeight :: AttrLabelProxy "surfaceHeight"
cairoTextureSurfaceHeight = AttrLabelProxy
cairoTextureSurfaceWidth :: AttrLabelProxy "surfaceWidth"
cairoTextureSurfaceWidth = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList CairoTexture = CairoTextureSignalList
type CairoTextureSignalList = ('[ '("actorAdded", Clutter.Container.ContainerActorAddedSignalInfo), '("actorRemoved", Clutter.Container.ContainerActorRemovedSignalInfo), '("allocationChanged", Clutter.Actor.ActorAllocationChangedSignalInfo), '("buttonPressEvent", Clutter.Actor.ActorButtonPressEventSignalInfo), '("buttonReleaseEvent", Clutter.Actor.ActorButtonReleaseEventSignalInfo), '("capturedEvent", Clutter.Actor.ActorCapturedEventSignalInfo), '("childNotify", Clutter.Container.ContainerChildNotifySignalInfo), '("createSurface", CairoTextureCreateSurfaceSignalInfo), '("destroy", Clutter.Actor.ActorDestroySignalInfo), '("draw", CairoTextureDrawSignalInfo), '("enterEvent", Clutter.Actor.ActorEnterEventSignalInfo), '("event", Clutter.Actor.ActorEventSignalInfo), '("hide", Clutter.Actor.ActorHideSignalInfo), '("keyFocusIn", Clutter.Actor.ActorKeyFocusInSignalInfo), '("keyFocusOut", Clutter.Actor.ActorKeyFocusOutSignalInfo), '("keyPressEvent", Clutter.Actor.ActorKeyPressEventSignalInfo), '("keyReleaseEvent", Clutter.Actor.ActorKeyReleaseEventSignalInfo), '("leaveEvent", Clutter.Actor.ActorLeaveEventSignalInfo), '("loadFinished", Clutter.Texture.TextureLoadFinishedSignalInfo), '("motionEvent", Clutter.Actor.ActorMotionEventSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("paint", Clutter.Actor.ActorPaintSignalInfo), '("parentSet", Clutter.Actor.ActorParentSetSignalInfo), '("pick", Clutter.Actor.ActorPickSignalInfo), '("pixbufChange", Clutter.Texture.TexturePixbufChangeSignalInfo), '("queueRedraw", Clutter.Actor.ActorQueueRedrawSignalInfo), '("queueRelayout", Clutter.Actor.ActorQueueRelayoutSignalInfo), '("realize", Clutter.Actor.ActorRealizeSignalInfo), '("scrollEvent", Clutter.Actor.ActorScrollEventSignalInfo), '("show", Clutter.Actor.ActorShowSignalInfo), '("sizeChange", Clutter.Texture.TextureSizeChangeSignalInfo), '("touchEvent", Clutter.Actor.ActorTouchEventSignalInfo), '("transitionStopped", Clutter.Actor.ActorTransitionStoppedSignalInfo), '("transitionsCompleted", Clutter.Actor.ActorTransitionsCompletedSignalInfo), '("unrealize", Clutter.Actor.ActorUnrealizeSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "clutter_cairo_texture_new" clutter_cairo_texture_new ::
Word32 ->
Word32 ->
IO (Ptr CairoTexture)
{-# DEPRECATED cairoTextureNew ["(Since version 1.12)","Use t'GI.Clutter.Objects.Canvas.Canvas' instead"] #-}
cairoTextureNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
Word32
-> Word32
-> m CairoTexture
cairoTextureNew :: forall (m :: * -> *).
(HasCallStack, MonadIO m) =>
Word32 -> Word32 -> m CairoTexture
cairoTextureNew Word32
width Word32
height = IO CairoTexture -> m CairoTexture
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO CairoTexture -> m CairoTexture)
-> IO CairoTexture -> m CairoTexture
forall a b. (a -> b) -> a -> b
$ do
Ptr CairoTexture
result <- Word32 -> Word32 -> IO (Ptr CairoTexture)
clutter_cairo_texture_new Word32
width Word32
height
Text -> Ptr CairoTexture -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"cairoTextureNew" Ptr CairoTexture
result
CairoTexture
result' <- ((ManagedPtr CairoTexture -> CairoTexture)
-> Ptr CairoTexture -> IO CairoTexture
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr CairoTexture -> CairoTexture
CairoTexture) Ptr CairoTexture
result
CairoTexture -> IO CairoTexture
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CairoTexture
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "clutter_cairo_texture_clear" clutter_cairo_texture_clear ::
Ptr CairoTexture ->
IO ()
{-# DEPRECATED cairoTextureClear ["(Since version 1.12)","Use t'GI.Clutter.Objects.Canvas.Canvas' instead"] #-}
cairoTextureClear ::
(B.CallStack.HasCallStack, MonadIO m, IsCairoTexture a) =>
a
-> m ()
cairoTextureClear :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsCairoTexture a) =>
a -> m ()
cairoTextureClear a
self = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr CairoTexture
self' <- a -> IO (Ptr CairoTexture)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr CairoTexture -> IO ()
clutter_cairo_texture_clear Ptr CairoTexture
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data CairoTextureClearMethodInfo
instance (signature ~ (m ()), MonadIO m, IsCairoTexture a) => O.OverloadedMethod CairoTextureClearMethodInfo a signature where
overloadedMethod = cairoTextureClear
instance O.OverloadedMethodInfo CairoTextureClearMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Clutter.Objects.CairoTexture.cairoTextureClear",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-clutter-1.0.3/docs/GI-Clutter-Objects-CairoTexture.html#v:cairoTextureClear"
})
#endif
foreign import ccall "clutter_cairo_texture_create" clutter_cairo_texture_create ::
Ptr CairoTexture ->
IO (Ptr Cairo.Context.Context)
{-# DEPRECATED cairoTextureCreate ["(Since version 1.8)","Use the [CairoTexture::draw](\"GI.Clutter.Objects.CairoTexture#g:signal:draw\") signal and"," the 'GI.Clutter.Objects.CairoTexture.cairoTextureInvalidate' function to obtain a"," Cairo context for 2D drawing."] #-}
cairoTextureCreate ::
(B.CallStack.HasCallStack, MonadIO m, IsCairoTexture a) =>
a
-> m Cairo.Context.Context
cairoTextureCreate :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsCairoTexture a) =>
a -> m Context
cairoTextureCreate a
self = IO Context -> m Context
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Context -> m Context) -> IO Context -> m Context
forall a b. (a -> b) -> a -> b
$ do
Ptr CairoTexture
self' <- a -> IO (Ptr CairoTexture)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Context
result <- Ptr CairoTexture -> IO (Ptr Context)
clutter_cairo_texture_create Ptr CairoTexture
self'
Text -> Ptr Context -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"cairoTextureCreate" Ptr Context
result
Context
result' <- ((ManagedPtr Context -> Context) -> Ptr Context -> IO Context
forall a.
(HasCallStack, GBoxed a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
wrapBoxed ManagedPtr Context -> Context
Cairo.Context.Context) Ptr Context
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Context -> IO Context
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Context
result'
#if defined(ENABLE_OVERLOADING)
data CairoTextureCreateMethodInfo
instance (signature ~ (m Cairo.Context.Context), MonadIO m, IsCairoTexture a) => O.OverloadedMethod CairoTextureCreateMethodInfo a signature where
overloadedMethod = cairoTextureCreate
instance O.OverloadedMethodInfo CairoTextureCreateMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Clutter.Objects.CairoTexture.cairoTextureCreate",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-clutter-1.0.3/docs/GI-Clutter-Objects-CairoTexture.html#v:cairoTextureCreate"
})
#endif
foreign import ccall "clutter_cairo_texture_create_region" clutter_cairo_texture_create_region ::
Ptr CairoTexture ->
Int32 ->
Int32 ->
Int32 ->
Int32 ->
IO (Ptr Cairo.Context.Context)
{-# DEPRECATED cairoTextureCreateRegion ["(Since version 1.8)","Use the [CairoTexture::draw](\"GI.Clutter.Objects.CairoTexture#g:signal:draw\") signal and"," 'GI.Clutter.Objects.CairoTexture.cairoTextureInvalidateRectangle' to obtain a"," clipped Cairo context for 2D drawing."] #-}
cairoTextureCreateRegion ::
(B.CallStack.HasCallStack, MonadIO m, IsCairoTexture a) =>
a
-> Int32
-> Int32
-> Int32
-> Int32
-> m Cairo.Context.Context
cairoTextureCreateRegion :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsCairoTexture a) =>
a -> Int32 -> Int32 -> Int32 -> Int32 -> m Context
cairoTextureCreateRegion a
self Int32
xOffset Int32
yOffset Int32
width Int32
height = IO Context -> m Context
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Context -> m Context) -> IO Context -> m Context
forall a b. (a -> b) -> a -> b
$ do
Ptr CairoTexture
self' <- a -> IO (Ptr CairoTexture)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Context
result <- Ptr CairoTexture
-> Int32 -> Int32 -> Int32 -> Int32 -> IO (Ptr Context)
clutter_cairo_texture_create_region Ptr CairoTexture
self' Int32
xOffset Int32
yOffset Int32
width Int32
height
Text -> Ptr Context -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"cairoTextureCreateRegion" Ptr Context
result
Context
result' <- ((ManagedPtr Context -> Context) -> Ptr Context -> IO Context
forall a.
(HasCallStack, GBoxed a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
wrapBoxed ManagedPtr Context -> Context
Cairo.Context.Context) Ptr Context
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Context -> IO Context
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Context
result'
#if defined(ENABLE_OVERLOADING)
data CairoTextureCreateRegionMethodInfo
instance (signature ~ (Int32 -> Int32 -> Int32 -> Int32 -> m Cairo.Context.Context), MonadIO m, IsCairoTexture a) => O.OverloadedMethod CairoTextureCreateRegionMethodInfo a signature where
overloadedMethod = cairoTextureCreateRegion
instance O.OverloadedMethodInfo CairoTextureCreateRegionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Clutter.Objects.CairoTexture.cairoTextureCreateRegion",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-clutter-1.0.3/docs/GI-Clutter-Objects-CairoTexture.html#v:cairoTextureCreateRegion"
})
#endif
foreign import ccall "clutter_cairo_texture_get_auto_resize" clutter_cairo_texture_get_auto_resize ::
Ptr CairoTexture ->
IO CInt
{-# DEPRECATED cairoTextureGetAutoResize ["(Since version 1.12)","Use t'GI.Clutter.Objects.Canvas.Canvas' instead"] #-}
cairoTextureGetAutoResize ::
(B.CallStack.HasCallStack, MonadIO m, IsCairoTexture a) =>
a
-> m Bool
cairoTextureGetAutoResize :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsCairoTexture a) =>
a -> m Bool
cairoTextureGetAutoResize a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr CairoTexture
self' <- a -> IO (Ptr CairoTexture)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr CairoTexture -> IO CInt
clutter_cairo_texture_get_auto_resize Ptr CairoTexture
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data CairoTextureGetAutoResizeMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsCairoTexture a) => O.OverloadedMethod CairoTextureGetAutoResizeMethodInfo a signature where
overloadedMethod = cairoTextureGetAutoResize
instance O.OverloadedMethodInfo CairoTextureGetAutoResizeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Clutter.Objects.CairoTexture.cairoTextureGetAutoResize",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-clutter-1.0.3/docs/GI-Clutter-Objects-CairoTexture.html#v:cairoTextureGetAutoResize"
})
#endif
foreign import ccall "clutter_cairo_texture_get_surface_size" clutter_cairo_texture_get_surface_size ::
Ptr CairoTexture ->
Ptr Word32 ->
Ptr Word32 ->
IO ()
{-# DEPRECATED cairoTextureGetSurfaceSize ["(Since version 1.12)","Use t'GI.Clutter.Objects.Canvas.Canvas' instead"] #-}
cairoTextureGetSurfaceSize ::
(B.CallStack.HasCallStack, MonadIO m, IsCairoTexture a) =>
a
-> m ((Word32, Word32))
cairoTextureGetSurfaceSize :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsCairoTexture a) =>
a -> m (Word32, Word32)
cairoTextureGetSurfaceSize a
self = IO (Word32, Word32) -> m (Word32, Word32)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Word32, Word32) -> m (Word32, Word32))
-> IO (Word32, Word32) -> m (Word32, Word32)
forall a b. (a -> b) -> a -> b
$ do
Ptr CairoTexture
self' <- a -> IO (Ptr CairoTexture)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Word32
width <- IO (Ptr Word32)
forall a. Storable a => IO (Ptr a)
allocMem :: IO (Ptr Word32)
Ptr Word32
height <- IO (Ptr Word32)
forall a. Storable a => IO (Ptr a)
allocMem :: IO (Ptr Word32)
Ptr CairoTexture -> Ptr Word32 -> Ptr Word32 -> IO ()
clutter_cairo_texture_get_surface_size Ptr CairoTexture
self' Ptr Word32
width Ptr Word32
height
Word32
width' <- Ptr Word32 -> IO Word32
forall a. Storable a => Ptr a -> IO a
peek Ptr Word32
width
Word32
height' <- Ptr Word32 -> IO Word32
forall a. Storable a => Ptr a -> IO a
peek Ptr Word32
height
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Ptr Word32 -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr Word32
width
Ptr Word32 -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr Word32
height
(Word32, Word32) -> IO (Word32, Word32)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return (Word32
width', Word32
height')
#if defined(ENABLE_OVERLOADING)
data CairoTextureGetSurfaceSizeMethodInfo
instance (signature ~ (m ((Word32, Word32))), MonadIO m, IsCairoTexture a) => O.OverloadedMethod CairoTextureGetSurfaceSizeMethodInfo a signature where
overloadedMethod = cairoTextureGetSurfaceSize
instance O.OverloadedMethodInfo CairoTextureGetSurfaceSizeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Clutter.Objects.CairoTexture.cairoTextureGetSurfaceSize",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-clutter-1.0.3/docs/GI-Clutter-Objects-CairoTexture.html#v:cairoTextureGetSurfaceSize"
})
#endif
foreign import ccall "clutter_cairo_texture_invalidate" clutter_cairo_texture_invalidate ::
Ptr CairoTexture ->
IO ()
{-# DEPRECATED cairoTextureInvalidate ["(Since version 1.12)","Use t'GI.Clutter.Objects.Canvas.Canvas' instead"] #-}
cairoTextureInvalidate ::
(B.CallStack.HasCallStack, MonadIO m, IsCairoTexture a) =>
a
-> m ()
cairoTextureInvalidate :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsCairoTexture a) =>
a -> m ()
cairoTextureInvalidate a
self = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr CairoTexture
self' <- a -> IO (Ptr CairoTexture)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr CairoTexture -> IO ()
clutter_cairo_texture_invalidate Ptr CairoTexture
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data CairoTextureInvalidateMethodInfo
instance (signature ~ (m ()), MonadIO m, IsCairoTexture a) => O.OverloadedMethod CairoTextureInvalidateMethodInfo a signature where
overloadedMethod = cairoTextureInvalidate
instance O.OverloadedMethodInfo CairoTextureInvalidateMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Clutter.Objects.CairoTexture.cairoTextureInvalidate",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-clutter-1.0.3/docs/GI-Clutter-Objects-CairoTexture.html#v:cairoTextureInvalidate"
})
#endif
foreign import ccall "clutter_cairo_texture_invalidate_rectangle" clutter_cairo_texture_invalidate_rectangle ::
Ptr CairoTexture ->
Ptr Cairo.RectangleInt.RectangleInt ->
IO ()
{-# DEPRECATED cairoTextureInvalidateRectangle ["(Since version 1.12)","Use t'GI.Clutter.Objects.Canvas.Canvas' instead"] #-}
cairoTextureInvalidateRectangle ::
(B.CallStack.HasCallStack, MonadIO m, IsCairoTexture a) =>
a
-> Maybe (Cairo.RectangleInt.RectangleInt)
-> m ()
cairoTextureInvalidateRectangle :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsCairoTexture a) =>
a -> Maybe RectangleInt -> m ()
cairoTextureInvalidateRectangle a
self Maybe RectangleInt
rect = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr CairoTexture
self' <- a -> IO (Ptr CairoTexture)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr RectangleInt
maybeRect <- case Maybe RectangleInt
rect of
Maybe RectangleInt
Nothing -> Ptr RectangleInt -> IO (Ptr RectangleInt)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr RectangleInt
forall a. Ptr a
nullPtr
Just RectangleInt
jRect -> do
Ptr RectangleInt
jRect' <- RectangleInt -> IO (Ptr RectangleInt)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr RectangleInt
jRect
Ptr RectangleInt -> IO (Ptr RectangleInt)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr RectangleInt
jRect'
Ptr CairoTexture -> Ptr RectangleInt -> IO ()
clutter_cairo_texture_invalidate_rectangle Ptr CairoTexture
self' Ptr RectangleInt
maybeRect
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe RectangleInt -> (RectangleInt -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe RectangleInt
rect RectangleInt -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data CairoTextureInvalidateRectangleMethodInfo
instance (signature ~ (Maybe (Cairo.RectangleInt.RectangleInt) -> m ()), MonadIO m, IsCairoTexture a) => O.OverloadedMethod CairoTextureInvalidateRectangleMethodInfo a signature where
overloadedMethod = cairoTextureInvalidateRectangle
instance O.OverloadedMethodInfo CairoTextureInvalidateRectangleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Clutter.Objects.CairoTexture.cairoTextureInvalidateRectangle",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-clutter-1.0.3/docs/GI-Clutter-Objects-CairoTexture.html#v:cairoTextureInvalidateRectangle"
})
#endif
foreign import ccall "clutter_cairo_texture_set_auto_resize" clutter_cairo_texture_set_auto_resize ::
Ptr CairoTexture ->
CInt ->
IO ()
{-# DEPRECATED cairoTextureSetAutoResize ["(Since version 1.12)","Use t'GI.Clutter.Objects.Canvas.Canvas' instead"] #-}
cairoTextureSetAutoResize ::
(B.CallStack.HasCallStack, MonadIO m, IsCairoTexture a) =>
a
-> Bool
-> m ()
cairoTextureSetAutoResize :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsCairoTexture a) =>
a -> Bool -> m ()
cairoTextureSetAutoResize a
self Bool
value = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr CairoTexture
self' <- a -> IO (Ptr CairoTexture)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let value' :: CInt
value' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
value
Ptr CairoTexture -> CInt -> IO ()
clutter_cairo_texture_set_auto_resize Ptr CairoTexture
self' CInt
value'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data CairoTextureSetAutoResizeMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsCairoTexture a) => O.OverloadedMethod CairoTextureSetAutoResizeMethodInfo a signature where
overloadedMethod = cairoTextureSetAutoResize
instance O.OverloadedMethodInfo CairoTextureSetAutoResizeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Clutter.Objects.CairoTexture.cairoTextureSetAutoResize",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-clutter-1.0.3/docs/GI-Clutter-Objects-CairoTexture.html#v:cairoTextureSetAutoResize"
})
#endif
foreign import ccall "clutter_cairo_texture_set_surface_size" clutter_cairo_texture_set_surface_size ::
Ptr CairoTexture ->
Word32 ->
Word32 ->
IO ()
{-# DEPRECATED cairoTextureSetSurfaceSize ["(Since version 1.12)","Use t'GI.Clutter.Objects.Canvas.Canvas' instead"] #-}
cairoTextureSetSurfaceSize ::
(B.CallStack.HasCallStack, MonadIO m, IsCairoTexture a) =>
a
-> Word32
-> Word32
-> m ()
cairoTextureSetSurfaceSize :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsCairoTexture a) =>
a -> Word32 -> Word32 -> m ()
cairoTextureSetSurfaceSize a
self Word32
width Word32
height = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr CairoTexture
self' <- a -> IO (Ptr CairoTexture)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr CairoTexture -> Word32 -> Word32 -> IO ()
clutter_cairo_texture_set_surface_size Ptr CairoTexture
self' Word32
width Word32
height
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data CairoTextureSetSurfaceSizeMethodInfo
instance (signature ~ (Word32 -> Word32 -> m ()), MonadIO m, IsCairoTexture a) => O.OverloadedMethod CairoTextureSetSurfaceSizeMethodInfo a signature where
overloadedMethod = cairoTextureSetSurfaceSize
instance O.OverloadedMethodInfo CairoTextureSetSurfaceSizeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Clutter.Objects.CairoTexture.cairoTextureSetSurfaceSize",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-clutter-1.0.3/docs/GI-Clutter-Objects-CairoTexture.html#v:cairoTextureSetSurfaceSize"
})
#endif