{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gtk.Objects.WindowHandle
(
WindowHandle(..) ,
IsWindowHandle ,
toWindowHandle ,
#if defined(ENABLE_OVERLOADING)
ResolveWindowHandleMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
WindowHandleGetChildMethodInfo ,
#endif
windowHandleGetChild ,
windowHandleNew ,
#if defined(ENABLE_OVERLOADING)
WindowHandleSetChildMethodInfo ,
#endif
windowHandleSetChild ,
#if defined(ENABLE_OVERLOADING)
WindowHandleChildPropertyInfo ,
#endif
clearWindowHandleChild ,
constructWindowHandleChild ,
getWindowHandleChild ,
setWindowHandleChild ,
#if defined(ENABLE_OVERLOADING)
windowHandleChild ,
#endif
) 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.Kind as DK
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.GObject.Objects.Object as GObject.Object
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Accessible as Gtk.Accessible
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.ConstraintTarget as Gtk.ConstraintTarget
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype WindowHandle = WindowHandle (SP.ManagedPtr WindowHandle)
deriving (WindowHandle -> WindowHandle -> Bool
(WindowHandle -> WindowHandle -> Bool)
-> (WindowHandle -> WindowHandle -> Bool) -> Eq WindowHandle
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: WindowHandle -> WindowHandle -> Bool
== :: WindowHandle -> WindowHandle -> Bool
$c/= :: WindowHandle -> WindowHandle -> Bool
/= :: WindowHandle -> WindowHandle -> Bool
Eq)
instance SP.ManagedPtrNewtype WindowHandle where
toManagedPtr :: WindowHandle -> ManagedPtr WindowHandle
toManagedPtr (WindowHandle ManagedPtr WindowHandle
p) = ManagedPtr WindowHandle
p
foreign import ccall "gtk_window_handle_get_type"
c_gtk_window_handle_get_type :: IO B.Types.GType
instance B.Types.TypedObject WindowHandle where
glibType :: IO GType
glibType = IO GType
c_gtk_window_handle_get_type
instance B.Types.GObject WindowHandle
class (SP.GObject o, O.IsDescendantOf WindowHandle o) => IsWindowHandle o
instance (SP.GObject o, O.IsDescendantOf WindowHandle o) => IsWindowHandle o
instance O.HasParentTypes WindowHandle
type instance O.ParentTypes WindowHandle = '[Gtk.Widget.Widget, GObject.Object.Object, Gtk.Accessible.Accessible, Gtk.Buildable.Buildable, Gtk.ConstraintTarget.ConstraintTarget]
toWindowHandle :: (MIO.MonadIO m, IsWindowHandle o) => o -> m WindowHandle
toWindowHandle :: forall (m :: * -> *) o.
(MonadIO m, IsWindowHandle o) =>
o -> m WindowHandle
toWindowHandle = IO WindowHandle -> m WindowHandle
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO WindowHandle -> m WindowHandle)
-> (o -> IO WindowHandle) -> o -> m WindowHandle
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr WindowHandle -> WindowHandle) -> o -> IO WindowHandle
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr WindowHandle -> WindowHandle
WindowHandle
instance B.GValue.IsGValue (Maybe WindowHandle) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_gtk_window_handle_get_type
gvalueSet_ :: Ptr GValue -> Maybe WindowHandle -> IO ()
gvalueSet_ Ptr GValue
gv Maybe WindowHandle
P.Nothing = Ptr GValue -> Ptr WindowHandle -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr WindowHandle
forall a. Ptr a
FP.nullPtr :: FP.Ptr WindowHandle)
gvalueSet_ Ptr GValue
gv (P.Just WindowHandle
obj) = WindowHandle -> (Ptr WindowHandle -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr WindowHandle
obj (Ptr GValue -> Ptr WindowHandle -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe WindowHandle)
gvalueGet_ Ptr GValue
gv = do
Ptr WindowHandle
ptr <- Ptr GValue -> IO (Ptr WindowHandle)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr WindowHandle)
if Ptr WindowHandle
ptr Ptr WindowHandle -> Ptr WindowHandle -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr WindowHandle
forall a. Ptr a
FP.nullPtr
then WindowHandle -> Maybe WindowHandle
forall a. a -> Maybe a
P.Just (WindowHandle -> Maybe WindowHandle)
-> IO WindowHandle -> IO (Maybe WindowHandle)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr WindowHandle -> WindowHandle)
-> Ptr WindowHandle -> IO WindowHandle
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr WindowHandle -> WindowHandle
WindowHandle Ptr WindowHandle
ptr
else Maybe WindowHandle -> IO (Maybe WindowHandle)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe WindowHandle
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveWindowHandleMethod (t :: Symbol) (o :: DK.Type) :: DK.Type where
ResolveWindowHandleMethod "actionSetEnabled" o = Gtk.Widget.WidgetActionSetEnabledMethodInfo
ResolveWindowHandleMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveWindowHandleMethod "activateAction" o = Gtk.Widget.WidgetActivateActionMethodInfo
ResolveWindowHandleMethod "activateDefault" o = Gtk.Widget.WidgetActivateDefaultMethodInfo
ResolveWindowHandleMethod "addController" o = Gtk.Widget.WidgetAddControllerMethodInfo
ResolveWindowHandleMethod "addCssClass" o = Gtk.Widget.WidgetAddCssClassMethodInfo
ResolveWindowHandleMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveWindowHandleMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveWindowHandleMethod "allocate" o = Gtk.Widget.WidgetAllocateMethodInfo
ResolveWindowHandleMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveWindowHandleMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveWindowHandleMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveWindowHandleMethod "computeBounds" o = Gtk.Widget.WidgetComputeBoundsMethodInfo
ResolveWindowHandleMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveWindowHandleMethod "computePoint" o = Gtk.Widget.WidgetComputePointMethodInfo
ResolveWindowHandleMethod "computeTransform" o = Gtk.Widget.WidgetComputeTransformMethodInfo
ResolveWindowHandleMethod "contains" o = Gtk.Widget.WidgetContainsMethodInfo
ResolveWindowHandleMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveWindowHandleMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveWindowHandleMethod "disposeTemplate" o = Gtk.Widget.WidgetDisposeTemplateMethodInfo
ResolveWindowHandleMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveWindowHandleMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveWindowHandleMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveWindowHandleMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveWindowHandleMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveWindowHandleMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveWindowHandleMethod "hasCssClass" o = Gtk.Widget.WidgetHasCssClassMethodInfo
ResolveWindowHandleMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveWindowHandleMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveWindowHandleMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveWindowHandleMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveWindowHandleMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveWindowHandleMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveWindowHandleMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveWindowHandleMethod "insertAfter" o = Gtk.Widget.WidgetInsertAfterMethodInfo
ResolveWindowHandleMethod "insertBefore" o = Gtk.Widget.WidgetInsertBeforeMethodInfo
ResolveWindowHandleMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveWindowHandleMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveWindowHandleMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveWindowHandleMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveWindowHandleMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveWindowHandleMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveWindowHandleMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveWindowHandleMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveWindowHandleMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveWindowHandleMethod "measure" o = Gtk.Widget.WidgetMeasureMethodInfo
ResolveWindowHandleMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveWindowHandleMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveWindowHandleMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveWindowHandleMethod "observeChildren" o = Gtk.Widget.WidgetObserveChildrenMethodInfo
ResolveWindowHandleMethod "observeControllers" o = Gtk.Widget.WidgetObserveControllersMethodInfo
ResolveWindowHandleMethod "pick" o = Gtk.Widget.WidgetPickMethodInfo
ResolveWindowHandleMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveWindowHandleMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveWindowHandleMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveWindowHandleMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveWindowHandleMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveWindowHandleMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveWindowHandleMethod "removeController" o = Gtk.Widget.WidgetRemoveControllerMethodInfo
ResolveWindowHandleMethod "removeCssClass" o = Gtk.Widget.WidgetRemoveCssClassMethodInfo
ResolveWindowHandleMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveWindowHandleMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveWindowHandleMethod "resetProperty" o = Gtk.Accessible.AccessibleResetPropertyMethodInfo
ResolveWindowHandleMethod "resetRelation" o = Gtk.Accessible.AccessibleResetRelationMethodInfo
ResolveWindowHandleMethod "resetState" o = Gtk.Accessible.AccessibleResetStateMethodInfo
ResolveWindowHandleMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveWindowHandleMethod "shouldLayout" o = Gtk.Widget.WidgetShouldLayoutMethodInfo
ResolveWindowHandleMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveWindowHandleMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveWindowHandleMethod "snapshotChild" o = Gtk.Widget.WidgetSnapshotChildMethodInfo
ResolveWindowHandleMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveWindowHandleMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveWindowHandleMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveWindowHandleMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveWindowHandleMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveWindowHandleMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveWindowHandleMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveWindowHandleMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveWindowHandleMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveWindowHandleMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveWindowHandleMethod "updateNextAccessibleSibling" o = Gtk.Accessible.AccessibleUpdateNextAccessibleSiblingMethodInfo
ResolveWindowHandleMethod "updateProperty" o = Gtk.Accessible.AccessibleUpdatePropertyMethodInfo
ResolveWindowHandleMethod "updateRelation" o = Gtk.Accessible.AccessibleUpdateRelationMethodInfo
ResolveWindowHandleMethod "updateState" o = Gtk.Accessible.AccessibleUpdateStateMethodInfo
ResolveWindowHandleMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveWindowHandleMethod "getAccessibleParent" o = Gtk.Accessible.AccessibleGetAccessibleParentMethodInfo
ResolveWindowHandleMethod "getAccessibleRole" o = Gtk.Accessible.AccessibleGetAccessibleRoleMethodInfo
ResolveWindowHandleMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveWindowHandleMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveWindowHandleMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveWindowHandleMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveWindowHandleMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveWindowHandleMethod "getAtContext" o = Gtk.Accessible.AccessibleGetAtContextMethodInfo
ResolveWindowHandleMethod "getBounds" o = Gtk.Accessible.AccessibleGetBoundsMethodInfo
ResolveWindowHandleMethod "getBuildableId" o = Gtk.Buildable.BuildableGetBuildableIdMethodInfo
ResolveWindowHandleMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveWindowHandleMethod "getCanTarget" o = Gtk.Widget.WidgetGetCanTargetMethodInfo
ResolveWindowHandleMethod "getChild" o = WindowHandleGetChildMethodInfo
ResolveWindowHandleMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveWindowHandleMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveWindowHandleMethod "getColor" o = Gtk.Widget.WidgetGetColorMethodInfo
ResolveWindowHandleMethod "getCssClasses" o = Gtk.Widget.WidgetGetCssClassesMethodInfo
ResolveWindowHandleMethod "getCssName" o = Gtk.Widget.WidgetGetCssNameMethodInfo
ResolveWindowHandleMethod "getCursor" o = Gtk.Widget.WidgetGetCursorMethodInfo
ResolveWindowHandleMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveWindowHandleMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveWindowHandleMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveWindowHandleMethod "getFirstAccessibleChild" o = Gtk.Accessible.AccessibleGetFirstAccessibleChildMethodInfo
ResolveWindowHandleMethod "getFirstChild" o = Gtk.Widget.WidgetGetFirstChildMethodInfo
ResolveWindowHandleMethod "getFocusChild" o = Gtk.Widget.WidgetGetFocusChildMethodInfo
ResolveWindowHandleMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveWindowHandleMethod "getFocusable" o = Gtk.Widget.WidgetGetFocusableMethodInfo
ResolveWindowHandleMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveWindowHandleMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveWindowHandleMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveWindowHandleMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveWindowHandleMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveWindowHandleMethod "getHeight" o = Gtk.Widget.WidgetGetHeightMethodInfo
ResolveWindowHandleMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveWindowHandleMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveWindowHandleMethod "getLastChild" o = Gtk.Widget.WidgetGetLastChildMethodInfo
ResolveWindowHandleMethod "getLayoutManager" o = Gtk.Widget.WidgetGetLayoutManagerMethodInfo
ResolveWindowHandleMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveWindowHandleMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveWindowHandleMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveWindowHandleMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveWindowHandleMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveWindowHandleMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveWindowHandleMethod "getNative" o = Gtk.Widget.WidgetGetNativeMethodInfo
ResolveWindowHandleMethod "getNextAccessibleSibling" o = Gtk.Accessible.AccessibleGetNextAccessibleSiblingMethodInfo
ResolveWindowHandleMethod "getNextSibling" o = Gtk.Widget.WidgetGetNextSiblingMethodInfo
ResolveWindowHandleMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveWindowHandleMethod "getOverflow" o = Gtk.Widget.WidgetGetOverflowMethodInfo
ResolveWindowHandleMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveWindowHandleMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveWindowHandleMethod "getPlatformState" o = Gtk.Accessible.AccessibleGetPlatformStateMethodInfo
ResolveWindowHandleMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveWindowHandleMethod "getPrevSibling" o = Gtk.Widget.WidgetGetPrevSiblingMethodInfo
ResolveWindowHandleMethod "getPrimaryClipboard" o = Gtk.Widget.WidgetGetPrimaryClipboardMethodInfo
ResolveWindowHandleMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveWindowHandleMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveWindowHandleMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveWindowHandleMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveWindowHandleMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveWindowHandleMethod "getRoot" o = Gtk.Widget.WidgetGetRootMethodInfo
ResolveWindowHandleMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveWindowHandleMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveWindowHandleMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveWindowHandleMethod "getSize" o = Gtk.Widget.WidgetGetSizeMethodInfo
ResolveWindowHandleMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveWindowHandleMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveWindowHandleMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveWindowHandleMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveWindowHandleMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveWindowHandleMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveWindowHandleMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveWindowHandleMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveWindowHandleMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveWindowHandleMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveWindowHandleMethod "getWidth" o = Gtk.Widget.WidgetGetWidthMethodInfo
ResolveWindowHandleMethod "setAccessibleParent" o = Gtk.Accessible.AccessibleSetAccessibleParentMethodInfo
ResolveWindowHandleMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveWindowHandleMethod "setCanTarget" o = Gtk.Widget.WidgetSetCanTargetMethodInfo
ResolveWindowHandleMethod "setChild" o = WindowHandleSetChildMethodInfo
ResolveWindowHandleMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveWindowHandleMethod "setCssClasses" o = Gtk.Widget.WidgetSetCssClassesMethodInfo
ResolveWindowHandleMethod "setCursor" o = Gtk.Widget.WidgetSetCursorMethodInfo
ResolveWindowHandleMethod "setCursorFromName" o = Gtk.Widget.WidgetSetCursorFromNameMethodInfo
ResolveWindowHandleMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveWindowHandleMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveWindowHandleMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveWindowHandleMethod "setFocusChild" o = Gtk.Widget.WidgetSetFocusChildMethodInfo
ResolveWindowHandleMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveWindowHandleMethod "setFocusable" o = Gtk.Widget.WidgetSetFocusableMethodInfo
ResolveWindowHandleMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveWindowHandleMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveWindowHandleMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveWindowHandleMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveWindowHandleMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveWindowHandleMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveWindowHandleMethod "setLayoutManager" o = Gtk.Widget.WidgetSetLayoutManagerMethodInfo
ResolveWindowHandleMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveWindowHandleMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveWindowHandleMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveWindowHandleMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveWindowHandleMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveWindowHandleMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveWindowHandleMethod "setOverflow" o = Gtk.Widget.WidgetSetOverflowMethodInfo
ResolveWindowHandleMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveWindowHandleMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveWindowHandleMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveWindowHandleMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveWindowHandleMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveWindowHandleMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveWindowHandleMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveWindowHandleMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveWindowHandleMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveWindowHandleMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveWindowHandleMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveWindowHandleMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveWindowHandleMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveWindowHandleMethod t WindowHandle, O.OverloadedMethod info WindowHandle p) => OL.IsLabel t (WindowHandle -> 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 ~ ResolveWindowHandleMethod t WindowHandle, O.OverloadedMethod info WindowHandle p, R.HasField t WindowHandle p) => R.HasField t WindowHandle p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveWindowHandleMethod t WindowHandle, O.OverloadedMethodInfo info WindowHandle) => OL.IsLabel t (O.MethodProxy info WindowHandle) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
getWindowHandleChild :: (MonadIO m, IsWindowHandle o) => o -> m (Maybe Gtk.Widget.Widget)
getWindowHandleChild :: forall (m :: * -> *) o.
(MonadIO m, IsWindowHandle o) =>
o -> m (Maybe Widget)
getWindowHandleChild o
obj = IO (Maybe Widget) -> m (Maybe Widget)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Widget) -> m (Maybe Widget))
-> IO (Maybe Widget) -> m (Maybe Widget)
forall a b. (a -> b) -> a -> b
$ o -> String -> (ManagedPtr Widget -> Widget) -> IO (Maybe Widget)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj String
"child" ManagedPtr Widget -> Widget
Gtk.Widget.Widget
setWindowHandleChild :: (MonadIO m, IsWindowHandle o, Gtk.Widget.IsWidget a) => o -> a -> m ()
setWindowHandleChild :: forall (m :: * -> *) o a.
(MonadIO m, IsWindowHandle o, IsWidget a) =>
o -> a -> m ()
setWindowHandleChild o
obj a
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 -> Maybe a -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"child" (a -> Maybe a
forall a. a -> Maybe a
Just a
val)
constructWindowHandleChild :: (IsWindowHandle o, MIO.MonadIO m, Gtk.Widget.IsWidget a) => a -> m (GValueConstruct o)
constructWindowHandleChild :: forall o (m :: * -> *) a.
(IsWindowHandle o, MonadIO m, IsWidget a) =>
a -> m (GValueConstruct o)
constructWindowHandleChild a
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 -> Maybe a -> IO (GValueConstruct o)
forall a o.
GObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyObject String
"child" (a -> Maybe a
forall a. a -> Maybe a
P.Just a
val)
clearWindowHandleChild :: (MonadIO m, IsWindowHandle o) => o -> m ()
clearWindowHandleChild :: forall (m :: * -> *) o. (MonadIO m, IsWindowHandle o) => o -> m ()
clearWindowHandleChild o
obj = 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
$ o -> String -> Maybe Widget -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"child" (Maybe Widget
forall a. Maybe a
Nothing :: Maybe Gtk.Widget.Widget)
#if defined(ENABLE_OVERLOADING)
data WindowHandleChildPropertyInfo
instance AttrInfo WindowHandleChildPropertyInfo where
type AttrAllowedOps WindowHandleChildPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint WindowHandleChildPropertyInfo = IsWindowHandle
type AttrSetTypeConstraint WindowHandleChildPropertyInfo = Gtk.Widget.IsWidget
type AttrTransferTypeConstraint WindowHandleChildPropertyInfo = Gtk.Widget.IsWidget
type AttrTransferType WindowHandleChildPropertyInfo = Gtk.Widget.Widget
type AttrGetType WindowHandleChildPropertyInfo = (Maybe Gtk.Widget.Widget)
type AttrLabel WindowHandleChildPropertyInfo = "child"
type AttrOrigin WindowHandleChildPropertyInfo = WindowHandle
attrGet = getWindowHandleChild
attrSet = setWindowHandleChild
attrTransfer _ v = do
unsafeCastTo Gtk.Widget.Widget v
attrConstruct = constructWindowHandleChild
attrClear = clearWindowHandleChild
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.WindowHandle.child"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.8/docs/GI-Gtk-Objects-WindowHandle.html#g:attr:child"
})
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList WindowHandle
type instance O.AttributeList WindowHandle = WindowHandleAttributeList
type WindowHandleAttributeList = ('[ '("accessibleRole", Gtk.Accessible.AccessibleAccessibleRolePropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("canTarget", Gtk.Widget.WidgetCanTargetPropertyInfo), '("child", WindowHandleChildPropertyInfo), '("cssClasses", Gtk.Widget.WidgetCssClassesPropertyInfo), '("cssName", Gtk.Widget.WidgetCssNamePropertyInfo), '("cursor", Gtk.Widget.WidgetCursorPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("focusable", Gtk.Widget.WidgetFocusablePropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("layoutManager", Gtk.Widget.WidgetLayoutManagerPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("overflow", Gtk.Widget.WidgetOverflowPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("root", Gtk.Widget.WidgetRootPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo)] :: [(Symbol, DK.Type)])
#endif
#if defined(ENABLE_OVERLOADING)
windowHandleChild :: AttrLabelProxy "child"
windowHandleChild = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList WindowHandle = WindowHandleSignalList
type WindowHandleSignalList = ('[ '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo)] :: [(Symbol, DK.Type)])
#endif
foreign import ccall "gtk_window_handle_new" gtk_window_handle_new ::
IO (Ptr WindowHandle)
windowHandleNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m WindowHandle
windowHandleNew :: forall (m :: * -> *). (HasCallStack, MonadIO m) => m WindowHandle
windowHandleNew = IO WindowHandle -> m WindowHandle
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO WindowHandle -> m WindowHandle)
-> IO WindowHandle -> m WindowHandle
forall a b. (a -> b) -> a -> b
$ do
Ptr WindowHandle
result <- IO (Ptr WindowHandle)
gtk_window_handle_new
Text -> Ptr WindowHandle -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"windowHandleNew" Ptr WindowHandle
result
WindowHandle
result' <- ((ManagedPtr WindowHandle -> WindowHandle)
-> Ptr WindowHandle -> IO WindowHandle
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr WindowHandle -> WindowHandle
WindowHandle) Ptr WindowHandle
result
WindowHandle -> IO WindowHandle
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return WindowHandle
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "gtk_window_handle_get_child" gtk_window_handle_get_child ::
Ptr WindowHandle ->
IO (Ptr Gtk.Widget.Widget)
windowHandleGetChild ::
(B.CallStack.HasCallStack, MonadIO m, IsWindowHandle a) =>
a
-> m (Maybe Gtk.Widget.Widget)
windowHandleGetChild :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsWindowHandle a) =>
a -> m (Maybe Widget)
windowHandleGetChild a
self = IO (Maybe Widget) -> m (Maybe Widget)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Widget) -> m (Maybe Widget))
-> IO (Maybe Widget) -> m (Maybe Widget)
forall a b. (a -> b) -> a -> b
$ do
Ptr WindowHandle
self' <- a -> IO (Ptr WindowHandle)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Widget
result <- Ptr WindowHandle -> IO (Ptr Widget)
gtk_window_handle_get_child Ptr WindowHandle
self'
Maybe Widget
maybeResult <- Ptr Widget -> (Ptr Widget -> IO Widget) -> IO (Maybe Widget)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr Widget
result ((Ptr Widget -> IO Widget) -> IO (Maybe Widget))
-> (Ptr Widget -> IO Widget) -> IO (Maybe Widget)
forall a b. (a -> b) -> a -> b
$ \Ptr Widget
result' -> do
Widget
result'' <- ((ManagedPtr Widget -> Widget) -> Ptr Widget -> IO Widget
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Widget -> Widget
Gtk.Widget.Widget) Ptr Widget
result'
Widget -> IO Widget
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Widget
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe Widget -> IO (Maybe Widget)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Widget
maybeResult
#if defined(ENABLE_OVERLOADING)
data WindowHandleGetChildMethodInfo
instance (signature ~ (m (Maybe Gtk.Widget.Widget)), MonadIO m, IsWindowHandle a) => O.OverloadedMethod WindowHandleGetChildMethodInfo a signature where
overloadedMethod = windowHandleGetChild
instance O.OverloadedMethodInfo WindowHandleGetChildMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.WindowHandle.windowHandleGetChild",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.8/docs/GI-Gtk-Objects-WindowHandle.html#v:windowHandleGetChild"
})
#endif
foreign import ccall "gtk_window_handle_set_child" gtk_window_handle_set_child ::
Ptr WindowHandle ->
Ptr Gtk.Widget.Widget ->
IO ()
windowHandleSetChild ::
(B.CallStack.HasCallStack, MonadIO m, IsWindowHandle a, Gtk.Widget.IsWidget b) =>
a
-> Maybe (b)
-> m ()
windowHandleSetChild :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsWindowHandle a, IsWidget b) =>
a -> Maybe b -> m ()
windowHandleSetChild a
self Maybe b
child = 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 WindowHandle
self' <- a -> IO (Ptr WindowHandle)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Widget
maybeChild <- case Maybe b
child of
Maybe b
Nothing -> Ptr Widget -> IO (Ptr Widget)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
forall a. Ptr a
nullPtr
Just b
jChild -> do
Ptr Widget
jChild' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jChild
Ptr Widget -> IO (Ptr Widget)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
jChild'
Ptr WindowHandle -> Ptr Widget -> IO ()
gtk_window_handle_set_child Ptr WindowHandle
self' Ptr Widget
maybeChild
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe b -> (b -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe b
child b -> 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 WindowHandleSetChildMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsWindowHandle a, Gtk.Widget.IsWidget b) => O.OverloadedMethod WindowHandleSetChildMethodInfo a signature where
overloadedMethod = windowHandleSetChild
instance O.OverloadedMethodInfo WindowHandleSetChildMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.WindowHandle.windowHandleSetChild",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.8/docs/GI-Gtk-Objects-WindowHandle.html#v:windowHandleSetChild"
})
#endif