#define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \
&& !defined(__HADDOCK_VERSION__))
module GI.Gtk.Objects.Container
(
Container(..) ,
IsContainer ,
toContainer ,
noContainer ,
#if ENABLE_OVERLOADING
ContainerAddMethodInfo ,
#endif
containerAdd ,
#if ENABLE_OVERLOADING
ContainerCheckResizeMethodInfo ,
#endif
containerCheckResize ,
#if ENABLE_OVERLOADING
ContainerChildGetPropertyMethodInfo ,
#endif
containerChildGetProperty ,
#if ENABLE_OVERLOADING
ContainerChildNotifyMethodInfo ,
#endif
containerChildNotify ,
#if ENABLE_OVERLOADING
ContainerChildNotifyByPspecMethodInfo ,
#endif
containerChildNotifyByPspec ,
#if ENABLE_OVERLOADING
ContainerChildSetPropertyMethodInfo ,
#endif
containerChildSetProperty ,
#if ENABLE_OVERLOADING
ContainerChildTypeMethodInfo ,
#endif
containerChildType ,
#if ENABLE_OVERLOADING
ContainerForallMethodInfo ,
#endif
containerForall ,
#if ENABLE_OVERLOADING
ContainerForeachMethodInfo ,
#endif
containerForeach ,
#if ENABLE_OVERLOADING
ContainerGetBorderWidthMethodInfo ,
#endif
containerGetBorderWidth ,
#if ENABLE_OVERLOADING
ContainerGetChildrenMethodInfo ,
#endif
containerGetChildren ,
#if ENABLE_OVERLOADING
ContainerGetFocusChainMethodInfo ,
#endif
containerGetFocusChain ,
#if ENABLE_OVERLOADING
ContainerGetFocusChildMethodInfo ,
#endif
containerGetFocusChild ,
#if ENABLE_OVERLOADING
ContainerGetFocusHadjustmentMethodInfo ,
#endif
containerGetFocusHadjustment ,
#if ENABLE_OVERLOADING
ContainerGetFocusVadjustmentMethodInfo ,
#endif
containerGetFocusVadjustment ,
#if ENABLE_OVERLOADING
ContainerGetPathForChildMethodInfo ,
#endif
containerGetPathForChild ,
#if ENABLE_OVERLOADING
ContainerGetResizeModeMethodInfo ,
#endif
containerGetResizeMode ,
#if ENABLE_OVERLOADING
ContainerPropagateDrawMethodInfo ,
#endif
containerPropagateDraw ,
#if ENABLE_OVERLOADING
ContainerRemoveMethodInfo ,
#endif
containerRemove ,
#if ENABLE_OVERLOADING
ContainerResizeChildrenMethodInfo ,
#endif
containerResizeChildren ,
#if ENABLE_OVERLOADING
ContainerSetBorderWidthMethodInfo ,
#endif
containerSetBorderWidth ,
#if ENABLE_OVERLOADING
ContainerSetFocusChainMethodInfo ,
#endif
containerSetFocusChain ,
#if ENABLE_OVERLOADING
ContainerSetFocusChildMethodInfo ,
#endif
containerSetFocusChild ,
#if ENABLE_OVERLOADING
ContainerSetFocusHadjustmentMethodInfo ,
#endif
containerSetFocusHadjustment ,
#if ENABLE_OVERLOADING
ContainerSetFocusVadjustmentMethodInfo ,
#endif
containerSetFocusVadjustment ,
#if ENABLE_OVERLOADING
ContainerSetReallocateRedrawsMethodInfo ,
#endif
containerSetReallocateRedraws ,
#if ENABLE_OVERLOADING
ContainerSetResizeModeMethodInfo ,
#endif
containerSetResizeMode ,
#if ENABLE_OVERLOADING
ContainerUnsetFocusChainMethodInfo ,
#endif
containerUnsetFocusChain ,
#if ENABLE_OVERLOADING
ContainerBorderWidthPropertyInfo ,
#endif
constructContainerBorderWidth ,
#if ENABLE_OVERLOADING
containerBorderWidth ,
#endif
getContainerBorderWidth ,
setContainerBorderWidth ,
#if ENABLE_OVERLOADING
ContainerChildPropertyInfo ,
#endif
clearContainerChild ,
constructContainerChild ,
#if ENABLE_OVERLOADING
containerChild ,
#endif
setContainerChild ,
#if ENABLE_OVERLOADING
ContainerResizeModePropertyInfo ,
#endif
constructContainerResizeMode ,
#if ENABLE_OVERLOADING
containerResizeMode ,
#endif
getContainerResizeMode ,
setContainerResizeMode ,
C_ContainerAddCallback ,
ContainerAddCallback ,
#if ENABLE_OVERLOADING
ContainerAddSignalInfo ,
#endif
afterContainerAdd ,
genClosure_ContainerAdd ,
mk_ContainerAddCallback ,
noContainerAddCallback ,
onContainerAdd ,
wrap_ContainerAddCallback ,
C_ContainerCheckResizeCallback ,
ContainerCheckResizeCallback ,
#if ENABLE_OVERLOADING
ContainerCheckResizeSignalInfo ,
#endif
afterContainerCheckResize ,
genClosure_ContainerCheckResize ,
mk_ContainerCheckResizeCallback ,
noContainerCheckResizeCallback ,
onContainerCheckResize ,
wrap_ContainerCheckResizeCallback ,
C_ContainerRemoveCallback ,
ContainerRemoveCallback ,
#if ENABLE_OVERLOADING
ContainerRemoveSignalInfo ,
#endif
afterContainerRemove ,
genClosure_ContainerRemove ,
mk_ContainerRemoveCallback ,
noContainerRemoveCallback ,
onContainerRemove ,
wrap_ContainerRemoveCallback ,
C_ContainerSetFocusChildCallback ,
ContainerSetFocusChildCallback ,
#if ENABLE_OVERLOADING
ContainerSetFocusChildSignalInfo ,
#endif
afterContainerSetFocusChild ,
genClosure_ContainerSetFocusChild ,
mk_ContainerSetFocusChildCallback ,
noContainerSetFocusChildCallback ,
onContainerSetFocusChild ,
wrap_ContainerSetFocusChildCallback ,
) 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.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
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.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 GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.Cairo.Structs.Context as Cairo.Context
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gtk.Callbacks as Gtk.Callbacks
import {-# SOURCE #-} qualified GI.Gtk.Enums as Gtk.Enums
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import {-# SOURCE #-} qualified GI.Gtk.Objects.Adjustment as Gtk.Adjustment
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
import {-# SOURCE #-} qualified GI.Gtk.Structs.WidgetPath as Gtk.WidgetPath
newtype Container = Container (ManagedPtr Container)
foreign import ccall "gtk_container_get_type"
c_gtk_container_get_type :: IO GType
instance GObject Container where
gobjectType = c_gtk_container_get_type
class (GObject o, O.IsDescendantOf Container o) => IsContainer o
instance (GObject o, O.IsDescendantOf Container o) => IsContainer o
instance O.HasParentTypes Container
type instance O.ParentTypes Container = '[Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable]
toContainer :: (MonadIO m, IsContainer o) => o -> m Container
toContainer = liftIO . unsafeCastTo Container
noContainer :: Maybe Container
noContainer = Nothing
#if ENABLE_OVERLOADING
type family ResolveContainerMethod (t :: Symbol) (o :: *) :: * where
ResolveContainerMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveContainerMethod "add" o = ContainerAddMethodInfo
ResolveContainerMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolveContainerMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveContainerMethod "addDeviceEvents" o = Gtk.Widget.WidgetAddDeviceEventsMethodInfo
ResolveContainerMethod "addEvents" o = Gtk.Widget.WidgetAddEventsMethodInfo
ResolveContainerMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveContainerMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveContainerMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveContainerMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveContainerMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolveContainerMethod "checkResize" o = ContainerCheckResizeMethodInfo
ResolveContainerMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveContainerMethod "childGetProperty" o = ContainerChildGetPropertyMethodInfo
ResolveContainerMethod "childNotify" o = ContainerChildNotifyMethodInfo
ResolveContainerMethod "childNotifyByPspec" o = ContainerChildNotifyByPspecMethodInfo
ResolveContainerMethod "childSetProperty" o = ContainerChildSetPropertyMethodInfo
ResolveContainerMethod "childType" o = ContainerChildTypeMethodInfo
ResolveContainerMethod "classPath" o = Gtk.Widget.WidgetClassPathMethodInfo
ResolveContainerMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveContainerMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveContainerMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveContainerMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveContainerMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveContainerMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveContainerMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveContainerMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolveContainerMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolveContainerMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveContainerMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolveContainerMethod "dragBeginWithCoordinates" o = Gtk.Widget.WidgetDragBeginWithCoordinatesMethodInfo
ResolveContainerMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveContainerMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolveContainerMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolveContainerMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolveContainerMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolveContainerMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolveContainerMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolveContainerMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolveContainerMethod "dragDestSetProxy" o = Gtk.Widget.WidgetDragDestSetProxyMethodInfo
ResolveContainerMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolveContainerMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolveContainerMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolveContainerMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolveContainerMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolveContainerMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolveContainerMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolveContainerMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolveContainerMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolveContainerMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolveContainerMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolveContainerMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolveContainerMethod "dragSourceSetIconPixbuf" o = Gtk.Widget.WidgetDragSourceSetIconPixbufMethodInfo
ResolveContainerMethod "dragSourceSetIconStock" o = Gtk.Widget.WidgetDragSourceSetIconStockMethodInfo
ResolveContainerMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolveContainerMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolveContainerMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolveContainerMethod "draw" o = Gtk.Widget.WidgetDrawMethodInfo
ResolveContainerMethod "ensureStyle" o = Gtk.Widget.WidgetEnsureStyleMethodInfo
ResolveContainerMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveContainerMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolveContainerMethod "forall" o = ContainerForallMethodInfo
ResolveContainerMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveContainerMethod "foreach" o = ContainerForeachMethodInfo
ResolveContainerMethod "freezeChildNotify" o = Gtk.Widget.WidgetFreezeChildNotifyMethodInfo
ResolveContainerMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveContainerMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveContainerMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolveContainerMethod "grabDefault" o = Gtk.Widget.WidgetGrabDefaultMethodInfo
ResolveContainerMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveContainerMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolveContainerMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveContainerMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveContainerMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolveContainerMethod "hasRcStyle" o = Gtk.Widget.WidgetHasRcStyleMethodInfo
ResolveContainerMethod "hasScreen" o = Gtk.Widget.WidgetHasScreenMethodInfo
ResolveContainerMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveContainerMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveContainerMethod "hideOnDelete" o = Gtk.Widget.WidgetHideOnDeleteMethodInfo
ResolveContainerMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveContainerMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveContainerMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolveContainerMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveContainerMethod "intersect" o = Gtk.Widget.WidgetIntersectMethodInfo
ResolveContainerMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveContainerMethod "isComposited" o = Gtk.Widget.WidgetIsCompositedMethodInfo
ResolveContainerMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveContainerMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveContainerMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveContainerMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveContainerMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolveContainerMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveContainerMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveContainerMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolveContainerMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolveContainerMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveContainerMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveContainerMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveContainerMethod "modifyBase" o = Gtk.Widget.WidgetModifyBaseMethodInfo
ResolveContainerMethod "modifyBg" o = Gtk.Widget.WidgetModifyBgMethodInfo
ResolveContainerMethod "modifyCursor" o = Gtk.Widget.WidgetModifyCursorMethodInfo
ResolveContainerMethod "modifyFg" o = Gtk.Widget.WidgetModifyFgMethodInfo
ResolveContainerMethod "modifyFont" o = Gtk.Widget.WidgetModifyFontMethodInfo
ResolveContainerMethod "modifyStyle" o = Gtk.Widget.WidgetModifyStyleMethodInfo
ResolveContainerMethod "modifyText" o = Gtk.Widget.WidgetModifyTextMethodInfo
ResolveContainerMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveContainerMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveContainerMethod "overrideBackgroundColor" o = Gtk.Widget.WidgetOverrideBackgroundColorMethodInfo
ResolveContainerMethod "overrideColor" o = Gtk.Widget.WidgetOverrideColorMethodInfo
ResolveContainerMethod "overrideCursor" o = Gtk.Widget.WidgetOverrideCursorMethodInfo
ResolveContainerMethod "overrideFont" o = Gtk.Widget.WidgetOverrideFontMethodInfo
ResolveContainerMethod "overrideSymbolicColor" o = Gtk.Widget.WidgetOverrideSymbolicColorMethodInfo
ResolveContainerMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveContainerMethod "path" o = Gtk.Widget.WidgetPathMethodInfo
ResolveContainerMethod "propagateDraw" o = ContainerPropagateDrawMethodInfo
ResolveContainerMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveContainerMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolveContainerMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveContainerMethod "queueDrawArea" o = Gtk.Widget.WidgetQueueDrawAreaMethodInfo
ResolveContainerMethod "queueDrawRegion" o = Gtk.Widget.WidgetQueueDrawRegionMethodInfo
ResolveContainerMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveContainerMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolveContainerMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveContainerMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveContainerMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveContainerMethod "regionIntersect" o = Gtk.Widget.WidgetRegionIntersectMethodInfo
ResolveContainerMethod "registerWindow" o = Gtk.Widget.WidgetRegisterWindowMethodInfo
ResolveContainerMethod "remove" o = ContainerRemoveMethodInfo
ResolveContainerMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolveContainerMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveContainerMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveContainerMethod "renderIcon" o = Gtk.Widget.WidgetRenderIconMethodInfo
ResolveContainerMethod "renderIconPixbuf" o = Gtk.Widget.WidgetRenderIconPixbufMethodInfo
ResolveContainerMethod "reparent" o = Gtk.Widget.WidgetReparentMethodInfo
ResolveContainerMethod "resetRcStyles" o = Gtk.Widget.WidgetResetRcStylesMethodInfo
ResolveContainerMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolveContainerMethod "resizeChildren" o = ContainerResizeChildrenMethodInfo
ResolveContainerMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveContainerMethod "sendExpose" o = Gtk.Widget.WidgetSendExposeMethodInfo
ResolveContainerMethod "sendFocusChange" o = Gtk.Widget.WidgetSendFocusChangeMethodInfo
ResolveContainerMethod "shapeCombineRegion" o = Gtk.Widget.WidgetShapeCombineRegionMethodInfo
ResolveContainerMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveContainerMethod "showAll" o = Gtk.Widget.WidgetShowAllMethodInfo
ResolveContainerMethod "showNow" o = Gtk.Widget.WidgetShowNowMethodInfo
ResolveContainerMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveContainerMethod "sizeAllocateWithBaseline" o = Gtk.Widget.WidgetSizeAllocateWithBaselineMethodInfo
ResolveContainerMethod "sizeRequest" o = Gtk.Widget.WidgetSizeRequestMethodInfo
ResolveContainerMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveContainerMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveContainerMethod "styleAttach" o = Gtk.Widget.WidgetStyleAttachMethodInfo
ResolveContainerMethod "styleGetProperty" o = Gtk.Widget.WidgetStyleGetPropertyMethodInfo
ResolveContainerMethod "thawChildNotify" o = Gtk.Widget.WidgetThawChildNotifyMethodInfo
ResolveContainerMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveContainerMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveContainerMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveContainerMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveContainerMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveContainerMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveContainerMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveContainerMethod "unregisterWindow" o = Gtk.Widget.WidgetUnregisterWindowMethodInfo
ResolveContainerMethod "unsetFocusChain" o = ContainerUnsetFocusChainMethodInfo
ResolveContainerMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveContainerMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveContainerMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveContainerMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolveContainerMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveContainerMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveContainerMethod "getAllocatedSize" o = Gtk.Widget.WidgetGetAllocatedSizeMethodInfo
ResolveContainerMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveContainerMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveContainerMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveContainerMethod "getAppPaintable" o = Gtk.Widget.WidgetGetAppPaintableMethodInfo
ResolveContainerMethod "getBorderWidth" o = ContainerGetBorderWidthMethodInfo
ResolveContainerMethod "getCanDefault" o = Gtk.Widget.WidgetGetCanDefaultMethodInfo
ResolveContainerMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveContainerMethod "getChildRequisition" o = Gtk.Widget.WidgetGetChildRequisitionMethodInfo
ResolveContainerMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveContainerMethod "getChildren" o = ContainerGetChildrenMethodInfo
ResolveContainerMethod "getClip" o = Gtk.Widget.WidgetGetClipMethodInfo
ResolveContainerMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveContainerMethod "getCompositeName" o = Gtk.Widget.WidgetGetCompositeNameMethodInfo
ResolveContainerMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveContainerMethod "getDeviceEnabled" o = Gtk.Widget.WidgetGetDeviceEnabledMethodInfo
ResolveContainerMethod "getDeviceEvents" o = Gtk.Widget.WidgetGetDeviceEventsMethodInfo
ResolveContainerMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveContainerMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveContainerMethod "getDoubleBuffered" o = Gtk.Widget.WidgetGetDoubleBufferedMethodInfo
ResolveContainerMethod "getEvents" o = Gtk.Widget.WidgetGetEventsMethodInfo
ResolveContainerMethod "getFocusChain" o = ContainerGetFocusChainMethodInfo
ResolveContainerMethod "getFocusChild" o = ContainerGetFocusChildMethodInfo
ResolveContainerMethod "getFocusHadjustment" o = ContainerGetFocusHadjustmentMethodInfo
ResolveContainerMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveContainerMethod "getFocusVadjustment" o = ContainerGetFocusVadjustmentMethodInfo
ResolveContainerMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveContainerMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveContainerMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveContainerMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveContainerMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveContainerMethod "getHasWindow" o = Gtk.Widget.WidgetGetHasWindowMethodInfo
ResolveContainerMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveContainerMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveContainerMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveContainerMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveContainerMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveContainerMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveContainerMethod "getMarginLeft" o = Gtk.Widget.WidgetGetMarginLeftMethodInfo
ResolveContainerMethod "getMarginRight" o = Gtk.Widget.WidgetGetMarginRightMethodInfo
ResolveContainerMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveContainerMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveContainerMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolveContainerMethod "getModifierStyle" o = Gtk.Widget.WidgetGetModifierStyleMethodInfo
ResolveContainerMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveContainerMethod "getNoShowAll" o = Gtk.Widget.WidgetGetNoShowAllMethodInfo
ResolveContainerMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveContainerMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveContainerMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveContainerMethod "getParentWindow" o = Gtk.Widget.WidgetGetParentWindowMethodInfo
ResolveContainerMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolveContainerMethod "getPathForChild" o = ContainerGetPathForChildMethodInfo
ResolveContainerMethod "getPointer" o = Gtk.Widget.WidgetGetPointerMethodInfo
ResolveContainerMethod "getPreferredHeight" o = Gtk.Widget.WidgetGetPreferredHeightMethodInfo
ResolveContainerMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.Widget.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo
ResolveContainerMethod "getPreferredHeightForWidth" o = Gtk.Widget.WidgetGetPreferredHeightForWidthMethodInfo
ResolveContainerMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveContainerMethod "getPreferredWidth" o = Gtk.Widget.WidgetGetPreferredWidthMethodInfo
ResolveContainerMethod "getPreferredWidthForHeight" o = Gtk.Widget.WidgetGetPreferredWidthForHeightMethodInfo
ResolveContainerMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveContainerMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveContainerMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveContainerMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveContainerMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveContainerMethod "getRequisition" o = Gtk.Widget.WidgetGetRequisitionMethodInfo
ResolveContainerMethod "getResizeMode" o = ContainerGetResizeModeMethodInfo
ResolveContainerMethod "getRootWindow" o = Gtk.Widget.WidgetGetRootWindowMethodInfo
ResolveContainerMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveContainerMethod "getScreen" o = Gtk.Widget.WidgetGetScreenMethodInfo
ResolveContainerMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveContainerMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveContainerMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveContainerMethod "getState" o = Gtk.Widget.WidgetGetStateMethodInfo
ResolveContainerMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveContainerMethod "getStyle" o = Gtk.Widget.WidgetGetStyleMethodInfo
ResolveContainerMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveContainerMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveContainerMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveContainerMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveContainerMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveContainerMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolveContainerMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolveContainerMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveContainerMethod "getValignWithBaseline" o = Gtk.Widget.WidgetGetValignWithBaselineMethodInfo
ResolveContainerMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveContainerMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveContainerMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveContainerMethod "getVisual" o = Gtk.Widget.WidgetGetVisualMethodInfo
ResolveContainerMethod "getWindow" o = Gtk.Widget.WidgetGetWindowMethodInfo
ResolveContainerMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolveContainerMethod "setAllocation" o = Gtk.Widget.WidgetSetAllocationMethodInfo
ResolveContainerMethod "setAppPaintable" o = Gtk.Widget.WidgetSetAppPaintableMethodInfo
ResolveContainerMethod "setBorderWidth" o = ContainerSetBorderWidthMethodInfo
ResolveContainerMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveContainerMethod "setCanDefault" o = Gtk.Widget.WidgetSetCanDefaultMethodInfo
ResolveContainerMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveContainerMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveContainerMethod "setClip" o = Gtk.Widget.WidgetSetClipMethodInfo
ResolveContainerMethod "setCompositeName" o = Gtk.Widget.WidgetSetCompositeNameMethodInfo
ResolveContainerMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveContainerMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveContainerMethod "setDeviceEnabled" o = Gtk.Widget.WidgetSetDeviceEnabledMethodInfo
ResolveContainerMethod "setDeviceEvents" o = Gtk.Widget.WidgetSetDeviceEventsMethodInfo
ResolveContainerMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveContainerMethod "setDoubleBuffered" o = Gtk.Widget.WidgetSetDoubleBufferedMethodInfo
ResolveContainerMethod "setEvents" o = Gtk.Widget.WidgetSetEventsMethodInfo
ResolveContainerMethod "setFocusChain" o = ContainerSetFocusChainMethodInfo
ResolveContainerMethod "setFocusChild" o = ContainerSetFocusChildMethodInfo
ResolveContainerMethod "setFocusHadjustment" o = ContainerSetFocusHadjustmentMethodInfo
ResolveContainerMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveContainerMethod "setFocusVadjustment" o = ContainerSetFocusVadjustmentMethodInfo
ResolveContainerMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveContainerMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveContainerMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveContainerMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveContainerMethod "setHasWindow" o = Gtk.Widget.WidgetSetHasWindowMethodInfo
ResolveContainerMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveContainerMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveContainerMethod "setMapped" o = Gtk.Widget.WidgetSetMappedMethodInfo
ResolveContainerMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveContainerMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveContainerMethod "setMarginLeft" o = Gtk.Widget.WidgetSetMarginLeftMethodInfo
ResolveContainerMethod "setMarginRight" o = Gtk.Widget.WidgetSetMarginRightMethodInfo
ResolveContainerMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveContainerMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveContainerMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveContainerMethod "setNoShowAll" o = Gtk.Widget.WidgetSetNoShowAllMethodInfo
ResolveContainerMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveContainerMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveContainerMethod "setParentWindow" o = Gtk.Widget.WidgetSetParentWindowMethodInfo
ResolveContainerMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveContainerMethod "setRealized" o = Gtk.Widget.WidgetSetRealizedMethodInfo
ResolveContainerMethod "setReallocateRedraws" o = ContainerSetReallocateRedrawsMethodInfo
ResolveContainerMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveContainerMethod "setRedrawOnAllocate" o = Gtk.Widget.WidgetSetRedrawOnAllocateMethodInfo
ResolveContainerMethod "setResizeMode" o = ContainerSetResizeModeMethodInfo
ResolveContainerMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveContainerMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveContainerMethod "setState" o = Gtk.Widget.WidgetSetStateMethodInfo
ResolveContainerMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveContainerMethod "setStyle" o = Gtk.Widget.WidgetSetStyleMethodInfo
ResolveContainerMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveContainerMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveContainerMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveContainerMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolveContainerMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveContainerMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveContainerMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveContainerMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveContainerMethod "setVisual" o = Gtk.Widget.WidgetSetVisualMethodInfo
ResolveContainerMethod "setWindow" o = Gtk.Widget.WidgetSetWindowMethodInfo
ResolveContainerMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveContainerMethod t Container, O.MethodInfo info Container p) => OL.IsLabel t (Container -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#else
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
#endif
type ContainerAddCallback =
Gtk.Widget.Widget
-> IO ()
noContainerAddCallback :: Maybe ContainerAddCallback
noContainerAddCallback = Nothing
type C_ContainerAddCallback =
Ptr () ->
Ptr Gtk.Widget.Widget ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_ContainerAddCallback :: C_ContainerAddCallback -> IO (FunPtr C_ContainerAddCallback)
genClosure_ContainerAdd :: MonadIO m => ContainerAddCallback -> m (GClosure C_ContainerAddCallback)
genClosure_ContainerAdd cb = liftIO $ do
let cb' = wrap_ContainerAddCallback cb
mk_ContainerAddCallback cb' >>= B.GClosure.newGClosure
wrap_ContainerAddCallback ::
ContainerAddCallback ->
C_ContainerAddCallback
wrap_ContainerAddCallback _cb _ object _ = do
object' <- (newObject Gtk.Widget.Widget) object
_cb object'
onContainerAdd :: (IsContainer a, MonadIO m) => a -> ContainerAddCallback -> m SignalHandlerId
onContainerAdd obj cb = liftIO $ do
let cb' = wrap_ContainerAddCallback cb
cb'' <- mk_ContainerAddCallback cb'
connectSignalFunPtr obj "add" cb'' SignalConnectBefore
afterContainerAdd :: (IsContainer a, MonadIO m) => a -> ContainerAddCallback -> m SignalHandlerId
afterContainerAdd obj cb = liftIO $ do
let cb' = wrap_ContainerAddCallback cb
cb'' <- mk_ContainerAddCallback cb'
connectSignalFunPtr obj "add" cb'' SignalConnectAfter
type ContainerCheckResizeCallback =
IO ()
noContainerCheckResizeCallback :: Maybe ContainerCheckResizeCallback
noContainerCheckResizeCallback = Nothing
type C_ContainerCheckResizeCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_ContainerCheckResizeCallback :: C_ContainerCheckResizeCallback -> IO (FunPtr C_ContainerCheckResizeCallback)
genClosure_ContainerCheckResize :: MonadIO m => ContainerCheckResizeCallback -> m (GClosure C_ContainerCheckResizeCallback)
genClosure_ContainerCheckResize cb = liftIO $ do
let cb' = wrap_ContainerCheckResizeCallback cb
mk_ContainerCheckResizeCallback cb' >>= B.GClosure.newGClosure
wrap_ContainerCheckResizeCallback ::
ContainerCheckResizeCallback ->
C_ContainerCheckResizeCallback
wrap_ContainerCheckResizeCallback _cb _ _ = do
_cb
onContainerCheckResize :: (IsContainer a, MonadIO m) => a -> ContainerCheckResizeCallback -> m SignalHandlerId
onContainerCheckResize obj cb = liftIO $ do
let cb' = wrap_ContainerCheckResizeCallback cb
cb'' <- mk_ContainerCheckResizeCallback cb'
connectSignalFunPtr obj "check-resize" cb'' SignalConnectBefore
afterContainerCheckResize :: (IsContainer a, MonadIO m) => a -> ContainerCheckResizeCallback -> m SignalHandlerId
afterContainerCheckResize obj cb = liftIO $ do
let cb' = wrap_ContainerCheckResizeCallback cb
cb'' <- mk_ContainerCheckResizeCallback cb'
connectSignalFunPtr obj "check-resize" cb'' SignalConnectAfter
type ContainerRemoveCallback =
Gtk.Widget.Widget
-> IO ()
noContainerRemoveCallback :: Maybe ContainerRemoveCallback
noContainerRemoveCallback = Nothing
type C_ContainerRemoveCallback =
Ptr () ->
Ptr Gtk.Widget.Widget ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_ContainerRemoveCallback :: C_ContainerRemoveCallback -> IO (FunPtr C_ContainerRemoveCallback)
genClosure_ContainerRemove :: MonadIO m => ContainerRemoveCallback -> m (GClosure C_ContainerRemoveCallback)
genClosure_ContainerRemove cb = liftIO $ do
let cb' = wrap_ContainerRemoveCallback cb
mk_ContainerRemoveCallback cb' >>= B.GClosure.newGClosure
wrap_ContainerRemoveCallback ::
ContainerRemoveCallback ->
C_ContainerRemoveCallback
wrap_ContainerRemoveCallback _cb _ object _ = do
object' <- (newObject Gtk.Widget.Widget) object
_cb object'
onContainerRemove :: (IsContainer a, MonadIO m) => a -> ContainerRemoveCallback -> m SignalHandlerId
onContainerRemove obj cb = liftIO $ do
let cb' = wrap_ContainerRemoveCallback cb
cb'' <- mk_ContainerRemoveCallback cb'
connectSignalFunPtr obj "remove" cb'' SignalConnectBefore
afterContainerRemove :: (IsContainer a, MonadIO m) => a -> ContainerRemoveCallback -> m SignalHandlerId
afterContainerRemove obj cb = liftIO $ do
let cb' = wrap_ContainerRemoveCallback cb
cb'' <- mk_ContainerRemoveCallback cb'
connectSignalFunPtr obj "remove" cb'' SignalConnectAfter
type ContainerSetFocusChildCallback =
Gtk.Widget.Widget
-> IO ()
noContainerSetFocusChildCallback :: Maybe ContainerSetFocusChildCallback
noContainerSetFocusChildCallback = Nothing
type C_ContainerSetFocusChildCallback =
Ptr () ->
Ptr Gtk.Widget.Widget ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_ContainerSetFocusChildCallback :: C_ContainerSetFocusChildCallback -> IO (FunPtr C_ContainerSetFocusChildCallback)
genClosure_ContainerSetFocusChild :: MonadIO m => ContainerSetFocusChildCallback -> m (GClosure C_ContainerSetFocusChildCallback)
genClosure_ContainerSetFocusChild cb = liftIO $ do
let cb' = wrap_ContainerSetFocusChildCallback cb
mk_ContainerSetFocusChildCallback cb' >>= B.GClosure.newGClosure
wrap_ContainerSetFocusChildCallback ::
ContainerSetFocusChildCallback ->
C_ContainerSetFocusChildCallback
wrap_ContainerSetFocusChildCallback _cb _ object _ = do
object' <- (newObject Gtk.Widget.Widget) object
_cb object'
onContainerSetFocusChild :: (IsContainer a, MonadIO m) => a -> ContainerSetFocusChildCallback -> m SignalHandlerId
onContainerSetFocusChild obj cb = liftIO $ do
let cb' = wrap_ContainerSetFocusChildCallback cb
cb'' <- mk_ContainerSetFocusChildCallback cb'
connectSignalFunPtr obj "set-focus-child" cb'' SignalConnectBefore
afterContainerSetFocusChild :: (IsContainer a, MonadIO m) => a -> ContainerSetFocusChildCallback -> m SignalHandlerId
afterContainerSetFocusChild obj cb = liftIO $ do
let cb' = wrap_ContainerSetFocusChildCallback cb
cb'' <- mk_ContainerSetFocusChildCallback cb'
connectSignalFunPtr obj "set-focus-child" cb'' SignalConnectAfter
getContainerBorderWidth :: (MonadIO m, IsContainer o) => o -> m Word32
getContainerBorderWidth obj = liftIO $ B.Properties.getObjectPropertyUInt32 obj "border-width"
setContainerBorderWidth :: (MonadIO m, IsContainer o) => o -> Word32 -> m ()
setContainerBorderWidth obj val = liftIO $ B.Properties.setObjectPropertyUInt32 obj "border-width" val
constructContainerBorderWidth :: (IsContainer o) => Word32 -> IO (GValueConstruct o)
constructContainerBorderWidth val = B.Properties.constructObjectPropertyUInt32 "border-width" val
#if ENABLE_OVERLOADING
data ContainerBorderWidthPropertyInfo
instance AttrInfo ContainerBorderWidthPropertyInfo where
type AttrAllowedOps ContainerBorderWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint ContainerBorderWidthPropertyInfo = (~) Word32
type AttrBaseTypeConstraint ContainerBorderWidthPropertyInfo = IsContainer
type AttrGetType ContainerBorderWidthPropertyInfo = Word32
type AttrLabel ContainerBorderWidthPropertyInfo = "border-width"
type AttrOrigin ContainerBorderWidthPropertyInfo = Container
attrGet _ = getContainerBorderWidth
attrSet _ = setContainerBorderWidth
attrConstruct _ = constructContainerBorderWidth
attrClear _ = undefined
#endif
setContainerChild :: (MonadIO m, IsContainer o, Gtk.Widget.IsWidget a) => o -> a -> m ()
setContainerChild obj val = liftIO $ B.Properties.setObjectPropertyObject obj "child" (Just val)
constructContainerChild :: (IsContainer o, Gtk.Widget.IsWidget a) => a -> IO (GValueConstruct o)
constructContainerChild val = B.Properties.constructObjectPropertyObject "child" (Just val)
clearContainerChild :: (MonadIO m, IsContainer o) => o -> m ()
clearContainerChild obj = liftIO $ B.Properties.setObjectPropertyObject obj "child" (Nothing :: Maybe Gtk.Widget.Widget)
#if ENABLE_OVERLOADING
data ContainerChildPropertyInfo
instance AttrInfo ContainerChildPropertyInfo where
type AttrAllowedOps ContainerChildPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrClear]
type AttrSetTypeConstraint ContainerChildPropertyInfo = Gtk.Widget.IsWidget
type AttrBaseTypeConstraint ContainerChildPropertyInfo = IsContainer
type AttrGetType ContainerChildPropertyInfo = ()
type AttrLabel ContainerChildPropertyInfo = "child"
type AttrOrigin ContainerChildPropertyInfo = Container
attrGet _ = undefined
attrSet _ = setContainerChild
attrConstruct _ = constructContainerChild
attrClear _ = clearContainerChild
#endif
getContainerResizeMode :: (MonadIO m, IsContainer o) => o -> m Gtk.Enums.ResizeMode
getContainerResizeMode obj = liftIO $ B.Properties.getObjectPropertyEnum obj "resize-mode"
setContainerResizeMode :: (MonadIO m, IsContainer o) => o -> Gtk.Enums.ResizeMode -> m ()
setContainerResizeMode obj val = liftIO $ B.Properties.setObjectPropertyEnum obj "resize-mode" val
constructContainerResizeMode :: (IsContainer o) => Gtk.Enums.ResizeMode -> IO (GValueConstruct o)
constructContainerResizeMode val = B.Properties.constructObjectPropertyEnum "resize-mode" val
#if ENABLE_OVERLOADING
data ContainerResizeModePropertyInfo
instance AttrInfo ContainerResizeModePropertyInfo where
type AttrAllowedOps ContainerResizeModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint ContainerResizeModePropertyInfo = (~) Gtk.Enums.ResizeMode
type AttrBaseTypeConstraint ContainerResizeModePropertyInfo = IsContainer
type AttrGetType ContainerResizeModePropertyInfo = Gtk.Enums.ResizeMode
type AttrLabel ContainerResizeModePropertyInfo = "resize-mode"
type AttrOrigin ContainerResizeModePropertyInfo = Container
attrGet _ = getContainerResizeMode
attrSet _ = setContainerResizeMode
attrConstruct _ = constructContainerResizeMode
attrClear _ = undefined
#endif
#if ENABLE_OVERLOADING
instance O.HasAttributeList Container
type instance O.AttributeList Container = ContainerAttributeList
type ContainerAttributeList = ('[ '("appPaintable", Gtk.Widget.WidgetAppPaintablePropertyInfo), '("borderWidth", ContainerBorderWidthPropertyInfo), '("canDefault", Gtk.Widget.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("child", ContainerChildPropertyInfo), '("compositeChild", Gtk.Widget.WidgetCompositeChildPropertyInfo), '("doubleBuffered", Gtk.Widget.WidgetDoubleBufferedPropertyInfo), '("events", Gtk.Widget.WidgetEventsPropertyInfo), '("expand", Gtk.Widget.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("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), '("isFocus", Gtk.Widget.WidgetIsFocusPropertyInfo), '("margin", Gtk.Widget.WidgetMarginPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.Widget.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.Widget.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("noShowAll", Gtk.Widget.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("resizeMode", ContainerResizeModePropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("style", Gtk.Widget.WidgetStylePropertyInfo), '("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), '("window", Gtk.Widget.WidgetWindowPropertyInfo)] :: [(Symbol, *)])
#endif
#if ENABLE_OVERLOADING
containerBorderWidth :: AttrLabelProxy "borderWidth"
containerBorderWidth = AttrLabelProxy
containerChild :: AttrLabelProxy "child"
containerChild = AttrLabelProxy
containerResizeMode :: AttrLabelProxy "resizeMode"
containerResizeMode = AttrLabelProxy
#endif
#if ENABLE_OVERLOADING
data ContainerAddSignalInfo
instance SignalInfo ContainerAddSignalInfo where
type HaskellCallbackType ContainerAddSignalInfo = ContainerAddCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_ContainerAddCallback cb
cb'' <- mk_ContainerAddCallback cb'
connectSignalFunPtr obj "add" cb'' connectMode
data ContainerCheckResizeSignalInfo
instance SignalInfo ContainerCheckResizeSignalInfo where
type HaskellCallbackType ContainerCheckResizeSignalInfo = ContainerCheckResizeCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_ContainerCheckResizeCallback cb
cb'' <- mk_ContainerCheckResizeCallback cb'
connectSignalFunPtr obj "check-resize" cb'' connectMode
data ContainerRemoveSignalInfo
instance SignalInfo ContainerRemoveSignalInfo where
type HaskellCallbackType ContainerRemoveSignalInfo = ContainerRemoveCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_ContainerRemoveCallback cb
cb'' <- mk_ContainerRemoveCallback cb'
connectSignalFunPtr obj "remove" cb'' connectMode
data ContainerSetFocusChildSignalInfo
instance SignalInfo ContainerSetFocusChildSignalInfo where
type HaskellCallbackType ContainerSetFocusChildSignalInfo = ContainerSetFocusChildCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_ContainerSetFocusChildCallback cb
cb'' <- mk_ContainerSetFocusChildCallback cb'
connectSignalFunPtr obj "set-focus-child" cb'' connectMode
type instance O.SignalList Container = ContainerSignalList
type ContainerSignalList = ('[ '("accelClosuresChanged", Gtk.Widget.WidgetAccelClosuresChangedSignalInfo), '("add", ContainerAddSignalInfo), '("buttonPressEvent", Gtk.Widget.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.Widget.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.Widget.WidgetCanActivateAccelSignalInfo), '("checkResize", ContainerCheckResizeSignalInfo), '("childNotify", Gtk.Widget.WidgetChildNotifySignalInfo), '("compositedChanged", Gtk.Widget.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.Widget.WidgetConfigureEventSignalInfo), '("damageEvent", Gtk.Widget.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.Widget.WidgetDeleteEventSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("destroyEvent", Gtk.Widget.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("dragBegin", Gtk.Widget.WidgetDragBeginSignalInfo), '("dragDataDelete", Gtk.Widget.WidgetDragDataDeleteSignalInfo), '("dragDataGet", Gtk.Widget.WidgetDragDataGetSignalInfo), '("dragDataReceived", Gtk.Widget.WidgetDragDataReceivedSignalInfo), '("dragDrop", Gtk.Widget.WidgetDragDropSignalInfo), '("dragEnd", Gtk.Widget.WidgetDragEndSignalInfo), '("dragFailed", Gtk.Widget.WidgetDragFailedSignalInfo), '("dragLeave", Gtk.Widget.WidgetDragLeaveSignalInfo), '("dragMotion", Gtk.Widget.WidgetDragMotionSignalInfo), '("draw", Gtk.Widget.WidgetDrawSignalInfo), '("enterNotifyEvent", Gtk.Widget.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.Widget.WidgetEventSignalInfo), '("eventAfter", Gtk.Widget.WidgetEventAfterSignalInfo), '("focus", Gtk.Widget.WidgetFocusSignalInfo), '("focusInEvent", Gtk.Widget.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.Widget.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.Widget.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.Widget.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.Widget.WidgetGrabNotifySignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.Widget.WidgetHierarchyChangedSignalInfo), '("keyPressEvent", Gtk.Widget.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.Widget.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("leaveNotifyEvent", Gtk.Widget.WidgetLeaveNotifyEventSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mapEvent", Gtk.Widget.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.Widget.WidgetMotionNotifyEventSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("parentSet", Gtk.Widget.WidgetParentSetSignalInfo), '("popupMenu", Gtk.Widget.WidgetPopupMenuSignalInfo), '("propertyNotifyEvent", Gtk.Widget.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.Widget.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.Widget.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("remove", ContainerRemoveSignalInfo), '("screenChanged", Gtk.Widget.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.Widget.WidgetScrollEventSignalInfo), '("selectionClearEvent", Gtk.Widget.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.Widget.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.Widget.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.Widget.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.Widget.WidgetSelectionRequestEventSignalInfo), '("setFocusChild", ContainerSetFocusChildSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("showHelp", Gtk.Widget.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.Widget.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.Widget.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.Widget.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.Widget.WidgetStyleUpdatedSignalInfo), '("touchEvent", Gtk.Widget.WidgetTouchEventSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.Widget.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.Widget.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.Widget.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "gtk_container_add" gtk_container_add ::
Ptr Container ->
Ptr Gtk.Widget.Widget ->
IO ()
containerAdd ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m ()
containerAdd container widget = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
widget' <- unsafeManagedPtrCastPtr widget
gtk_container_add container' widget'
touchManagedPtr container
touchManagedPtr widget
return ()
#if ENABLE_OVERLOADING
data ContainerAddMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) => O.MethodInfo ContainerAddMethodInfo a signature where
overloadedMethod _ = containerAdd
#endif
foreign import ccall "gtk_container_check_resize" gtk_container_check_resize ::
Ptr Container ->
IO ()
containerCheckResize ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> m ()
containerCheckResize container = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
gtk_container_check_resize container'
touchManagedPtr container
return ()
#if ENABLE_OVERLOADING
data ContainerCheckResizeMethodInfo
instance (signature ~ (m ()), MonadIO m, IsContainer a) => O.MethodInfo ContainerCheckResizeMethodInfo a signature where
overloadedMethod _ = containerCheckResize
#endif
foreign import ccall "gtk_container_child_get_property" gtk_container_child_get_property ::
Ptr Container ->
Ptr Gtk.Widget.Widget ->
CString ->
Ptr GValue ->
IO ()
containerChildGetProperty ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> T.Text
-> GValue
-> m ()
containerChildGetProperty container child propertyName value = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
child' <- unsafeManagedPtrCastPtr child
propertyName' <- textToCString propertyName
value' <- unsafeManagedPtrGetPtr value
gtk_container_child_get_property container' child' propertyName' value'
touchManagedPtr container
touchManagedPtr child
touchManagedPtr value
freeMem propertyName'
return ()
#if ENABLE_OVERLOADING
data ContainerChildGetPropertyMethodInfo
instance (signature ~ (b -> T.Text -> GValue -> m ()), MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) => O.MethodInfo ContainerChildGetPropertyMethodInfo a signature where
overloadedMethod _ = containerChildGetProperty
#endif
foreign import ccall "gtk_container_child_notify" gtk_container_child_notify ::
Ptr Container ->
Ptr Gtk.Widget.Widget ->
CString ->
IO ()
containerChildNotify ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> T.Text
-> m ()
containerChildNotify container child childProperty = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
child' <- unsafeManagedPtrCastPtr child
childProperty' <- textToCString childProperty
gtk_container_child_notify container' child' childProperty'
touchManagedPtr container
touchManagedPtr child
freeMem childProperty'
return ()
#if ENABLE_OVERLOADING
data ContainerChildNotifyMethodInfo
instance (signature ~ (b -> T.Text -> m ()), MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) => O.MethodInfo ContainerChildNotifyMethodInfo a signature where
overloadedMethod _ = containerChildNotify
#endif
foreign import ccall "gtk_container_child_notify_by_pspec" gtk_container_child_notify_by_pspec ::
Ptr Container ->
Ptr Gtk.Widget.Widget ->
Ptr GParamSpec ->
IO ()
containerChildNotifyByPspec ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> GParamSpec
-> m ()
containerChildNotifyByPspec container child pspec = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
child' <- unsafeManagedPtrCastPtr child
pspec' <- unsafeManagedPtrGetPtr pspec
gtk_container_child_notify_by_pspec container' child' pspec'
touchManagedPtr container
touchManagedPtr child
touchManagedPtr pspec
return ()
#if ENABLE_OVERLOADING
data ContainerChildNotifyByPspecMethodInfo
instance (signature ~ (b -> GParamSpec -> m ()), MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) => O.MethodInfo ContainerChildNotifyByPspecMethodInfo a signature where
overloadedMethod _ = containerChildNotifyByPspec
#endif
foreign import ccall "gtk_container_child_set_property" gtk_container_child_set_property ::
Ptr Container ->
Ptr Gtk.Widget.Widget ->
CString ->
Ptr GValue ->
IO ()
containerChildSetProperty ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> T.Text
-> GValue
-> m ()
containerChildSetProperty container child propertyName value = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
child' <- unsafeManagedPtrCastPtr child
propertyName' <- textToCString propertyName
value' <- unsafeManagedPtrGetPtr value
gtk_container_child_set_property container' child' propertyName' value'
touchManagedPtr container
touchManagedPtr child
touchManagedPtr value
freeMem propertyName'
return ()
#if ENABLE_OVERLOADING
data ContainerChildSetPropertyMethodInfo
instance (signature ~ (b -> T.Text -> GValue -> m ()), MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) => O.MethodInfo ContainerChildSetPropertyMethodInfo a signature where
overloadedMethod _ = containerChildSetProperty
#endif
foreign import ccall "gtk_container_child_type" gtk_container_child_type ::
Ptr Container ->
IO CGType
containerChildType ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> m GType
containerChildType container = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
result <- gtk_container_child_type container'
let result' = GType result
touchManagedPtr container
return result'
#if ENABLE_OVERLOADING
data ContainerChildTypeMethodInfo
instance (signature ~ (m GType), MonadIO m, IsContainer a) => O.MethodInfo ContainerChildTypeMethodInfo a signature where
overloadedMethod _ = containerChildType
#endif
foreign import ccall "gtk_container_forall" gtk_container_forall ::
Ptr Container ->
FunPtr Gtk.Callbacks.C_Callback ->
Ptr () ->
IO ()
containerForall ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> Gtk.Callbacks.Callback
-> m ()
containerForall container callback = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
callback' <- Gtk.Callbacks.mk_Callback (Gtk.Callbacks.wrap_Callback Nothing (Gtk.Callbacks.drop_closures_Callback callback))
let callbackData = nullPtr
gtk_container_forall container' callback' callbackData
safeFreeFunPtr $ castFunPtrToPtr callback'
touchManagedPtr container
return ()
#if ENABLE_OVERLOADING
data ContainerForallMethodInfo
instance (signature ~ (Gtk.Callbacks.Callback -> m ()), MonadIO m, IsContainer a) => O.MethodInfo ContainerForallMethodInfo a signature where
overloadedMethod _ = containerForall
#endif
foreign import ccall "gtk_container_foreach" gtk_container_foreach ::
Ptr Container ->
FunPtr Gtk.Callbacks.C_Callback ->
Ptr () ->
IO ()
containerForeach ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> Gtk.Callbacks.Callback
-> m ()
containerForeach container callback = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
callback' <- Gtk.Callbacks.mk_Callback (Gtk.Callbacks.wrap_Callback Nothing (Gtk.Callbacks.drop_closures_Callback callback))
let callbackData = nullPtr
gtk_container_foreach container' callback' callbackData
safeFreeFunPtr $ castFunPtrToPtr callback'
touchManagedPtr container
return ()
#if ENABLE_OVERLOADING
data ContainerForeachMethodInfo
instance (signature ~ (Gtk.Callbacks.Callback -> m ()), MonadIO m, IsContainer a) => O.MethodInfo ContainerForeachMethodInfo a signature where
overloadedMethod _ = containerForeach
#endif
foreign import ccall "gtk_container_get_border_width" gtk_container_get_border_width ::
Ptr Container ->
IO Word32
containerGetBorderWidth ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> m Word32
containerGetBorderWidth container = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
result <- gtk_container_get_border_width container'
touchManagedPtr container
return result
#if ENABLE_OVERLOADING
data ContainerGetBorderWidthMethodInfo
instance (signature ~ (m Word32), MonadIO m, IsContainer a) => O.MethodInfo ContainerGetBorderWidthMethodInfo a signature where
overloadedMethod _ = containerGetBorderWidth
#endif
foreign import ccall "gtk_container_get_children" gtk_container_get_children ::
Ptr Container ->
IO (Ptr (GList (Ptr Gtk.Widget.Widget)))
containerGetChildren ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> m [Gtk.Widget.Widget]
containerGetChildren container = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
result <- gtk_container_get_children container'
result' <- unpackGList result
result'' <- mapM (newObject Gtk.Widget.Widget) result'
g_list_free result
touchManagedPtr container
return result''
#if ENABLE_OVERLOADING
data ContainerGetChildrenMethodInfo
instance (signature ~ (m [Gtk.Widget.Widget]), MonadIO m, IsContainer a) => O.MethodInfo ContainerGetChildrenMethodInfo a signature where
overloadedMethod _ = containerGetChildren
#endif
foreign import ccall "gtk_container_get_focus_chain" gtk_container_get_focus_chain ::
Ptr Container ->
Ptr (Ptr (GList (Ptr Gtk.Widget.Widget))) ->
IO CInt
{-# DEPRECATED containerGetFocusChain ["(Since version 3.24)","For overriding focus behavior, use the"," GtkWidgetClass::focus signal."] #-}
containerGetFocusChain ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> m ((Bool, [Gtk.Widget.Widget]))
containerGetFocusChain container = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
focusableWidgets <- allocMem :: IO (Ptr (Ptr (GList (Ptr Gtk.Widget.Widget))))
result <- gtk_container_get_focus_chain container' focusableWidgets
let result' = (/= 0) result
focusableWidgets' <- peek focusableWidgets
focusableWidgets'' <- unpackGList focusableWidgets'
focusableWidgets''' <- mapM (newObject Gtk.Widget.Widget) focusableWidgets''
g_list_free focusableWidgets'
touchManagedPtr container
freeMem focusableWidgets
return (result', focusableWidgets''')
#if ENABLE_OVERLOADING
data ContainerGetFocusChainMethodInfo
instance (signature ~ (m ((Bool, [Gtk.Widget.Widget]))), MonadIO m, IsContainer a) => O.MethodInfo ContainerGetFocusChainMethodInfo a signature where
overloadedMethod _ = containerGetFocusChain
#endif
foreign import ccall "gtk_container_get_focus_child" gtk_container_get_focus_child ::
Ptr Container ->
IO (Ptr Gtk.Widget.Widget)
containerGetFocusChild ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> m (Maybe Gtk.Widget.Widget)
containerGetFocusChild container = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
result <- gtk_container_get_focus_child container'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject Gtk.Widget.Widget) result'
return result''
touchManagedPtr container
return maybeResult
#if ENABLE_OVERLOADING
data ContainerGetFocusChildMethodInfo
instance (signature ~ (m (Maybe Gtk.Widget.Widget)), MonadIO m, IsContainer a) => O.MethodInfo ContainerGetFocusChildMethodInfo a signature where
overloadedMethod _ = containerGetFocusChild
#endif
foreign import ccall "gtk_container_get_focus_hadjustment" gtk_container_get_focus_hadjustment ::
Ptr Container ->
IO (Ptr Gtk.Adjustment.Adjustment)
containerGetFocusHadjustment ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> m (Maybe Gtk.Adjustment.Adjustment)
containerGetFocusHadjustment container = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
result <- gtk_container_get_focus_hadjustment container'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject Gtk.Adjustment.Adjustment) result'
return result''
touchManagedPtr container
return maybeResult
#if ENABLE_OVERLOADING
data ContainerGetFocusHadjustmentMethodInfo
instance (signature ~ (m (Maybe Gtk.Adjustment.Adjustment)), MonadIO m, IsContainer a) => O.MethodInfo ContainerGetFocusHadjustmentMethodInfo a signature where
overloadedMethod _ = containerGetFocusHadjustment
#endif
foreign import ccall "gtk_container_get_focus_vadjustment" gtk_container_get_focus_vadjustment ::
Ptr Container ->
IO (Ptr Gtk.Adjustment.Adjustment)
containerGetFocusVadjustment ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> m (Maybe Gtk.Adjustment.Adjustment)
containerGetFocusVadjustment container = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
result <- gtk_container_get_focus_vadjustment container'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject Gtk.Adjustment.Adjustment) result'
return result''
touchManagedPtr container
return maybeResult
#if ENABLE_OVERLOADING
data ContainerGetFocusVadjustmentMethodInfo
instance (signature ~ (m (Maybe Gtk.Adjustment.Adjustment)), MonadIO m, IsContainer a) => O.MethodInfo ContainerGetFocusVadjustmentMethodInfo a signature where
overloadedMethod _ = containerGetFocusVadjustment
#endif
foreign import ccall "gtk_container_get_path_for_child" gtk_container_get_path_for_child ::
Ptr Container ->
Ptr Gtk.Widget.Widget ->
IO (Ptr Gtk.WidgetPath.WidgetPath)
containerGetPathForChild ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m Gtk.WidgetPath.WidgetPath
containerGetPathForChild container child = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
child' <- unsafeManagedPtrCastPtr child
result <- gtk_container_get_path_for_child container' child'
checkUnexpectedReturnNULL "containerGetPathForChild" result
result' <- (wrapBoxed Gtk.WidgetPath.WidgetPath) result
touchManagedPtr container
touchManagedPtr child
return result'
#if ENABLE_OVERLOADING
data ContainerGetPathForChildMethodInfo
instance (signature ~ (b -> m Gtk.WidgetPath.WidgetPath), MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) => O.MethodInfo ContainerGetPathForChildMethodInfo a signature where
overloadedMethod _ = containerGetPathForChild
#endif
foreign import ccall "gtk_container_get_resize_mode" gtk_container_get_resize_mode ::
Ptr Container ->
IO CUInt
{-# DEPRECATED containerGetResizeMode ["(Since version 3.12)","Resize modes are deprecated. They aren\8217t necessary"," anymore since frame clocks and might introduce obscure bugs if"," used."] #-}
containerGetResizeMode ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> m Gtk.Enums.ResizeMode
containerGetResizeMode container = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
result <- gtk_container_get_resize_mode container'
let result' = (toEnum . fromIntegral) result
touchManagedPtr container
return result'
#if ENABLE_OVERLOADING
data ContainerGetResizeModeMethodInfo
instance (signature ~ (m Gtk.Enums.ResizeMode), MonadIO m, IsContainer a) => O.MethodInfo ContainerGetResizeModeMethodInfo a signature where
overloadedMethod _ = containerGetResizeMode
#endif
foreign import ccall "gtk_container_propagate_draw" gtk_container_propagate_draw ::
Ptr Container ->
Ptr Gtk.Widget.Widget ->
Ptr Cairo.Context.Context ->
IO ()
containerPropagateDraw ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> Cairo.Context.Context
-> m ()
containerPropagateDraw container child cr = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
child' <- unsafeManagedPtrCastPtr child
cr' <- unsafeManagedPtrGetPtr cr
gtk_container_propagate_draw container' child' cr'
touchManagedPtr container
touchManagedPtr child
touchManagedPtr cr
return ()
#if ENABLE_OVERLOADING
data ContainerPropagateDrawMethodInfo
instance (signature ~ (b -> Cairo.Context.Context -> m ()), MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) => O.MethodInfo ContainerPropagateDrawMethodInfo a signature where
overloadedMethod _ = containerPropagateDraw
#endif
foreign import ccall "gtk_container_remove" gtk_container_remove ::
Ptr Container ->
Ptr Gtk.Widget.Widget ->
IO ()
containerRemove ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m ()
containerRemove container widget = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
widget' <- unsafeManagedPtrCastPtr widget
gtk_container_remove container' widget'
touchManagedPtr container
touchManagedPtr widget
return ()
#if ENABLE_OVERLOADING
data ContainerRemoveMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) => O.MethodInfo ContainerRemoveMethodInfo a signature where
overloadedMethod _ = containerRemove
#endif
foreign import ccall "gtk_container_resize_children" gtk_container_resize_children ::
Ptr Container ->
IO ()
{-# DEPRECATED containerResizeChildren ["(Since version 3.10)"] #-}
containerResizeChildren ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> m ()
containerResizeChildren container = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
gtk_container_resize_children container'
touchManagedPtr container
return ()
#if ENABLE_OVERLOADING
data ContainerResizeChildrenMethodInfo
instance (signature ~ (m ()), MonadIO m, IsContainer a) => O.MethodInfo ContainerResizeChildrenMethodInfo a signature where
overloadedMethod _ = containerResizeChildren
#endif
foreign import ccall "gtk_container_set_border_width" gtk_container_set_border_width ::
Ptr Container ->
Word32 ->
IO ()
containerSetBorderWidth ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> Word32
-> m ()
containerSetBorderWidth container borderWidth = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
gtk_container_set_border_width container' borderWidth
touchManagedPtr container
return ()
#if ENABLE_OVERLOADING
data ContainerSetBorderWidthMethodInfo
instance (signature ~ (Word32 -> m ()), MonadIO m, IsContainer a) => O.MethodInfo ContainerSetBorderWidthMethodInfo a signature where
overloadedMethod _ = containerSetBorderWidth
#endif
foreign import ccall "gtk_container_set_focus_chain" gtk_container_set_focus_chain ::
Ptr Container ->
Ptr (GList (Ptr Gtk.Widget.Widget)) ->
IO ()
{-# DEPRECATED containerSetFocusChain ["(Since version 3.24)","For overriding focus behavior, use the"," GtkWidgetClass::focus signal."] #-}
containerSetFocusChain ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) =>
a
-> [b]
-> m ()
containerSetFocusChain container focusableWidgets = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
focusableWidgets' <- mapM unsafeManagedPtrCastPtr focusableWidgets
focusableWidgets'' <- packGList focusableWidgets'
gtk_container_set_focus_chain container' focusableWidgets''
touchManagedPtr container
mapM_ touchManagedPtr focusableWidgets
g_list_free focusableWidgets''
return ()
#if ENABLE_OVERLOADING
data ContainerSetFocusChainMethodInfo
instance (signature ~ ([b] -> m ()), MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) => O.MethodInfo ContainerSetFocusChainMethodInfo a signature where
overloadedMethod _ = containerSetFocusChain
#endif
foreign import ccall "gtk_container_set_focus_child" gtk_container_set_focus_child ::
Ptr Container ->
Ptr Gtk.Widget.Widget ->
IO ()
containerSetFocusChild ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) =>
a
-> Maybe (b)
-> m ()
containerSetFocusChild container child = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
maybeChild <- case child of
Nothing -> return nullPtr
Just jChild -> do
jChild' <- unsafeManagedPtrCastPtr jChild
return jChild'
gtk_container_set_focus_child container' maybeChild
touchManagedPtr container
whenJust child touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data ContainerSetFocusChildMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsContainer a, Gtk.Widget.IsWidget b) => O.MethodInfo ContainerSetFocusChildMethodInfo a signature where
overloadedMethod _ = containerSetFocusChild
#endif
foreign import ccall "gtk_container_set_focus_hadjustment" gtk_container_set_focus_hadjustment ::
Ptr Container ->
Ptr Gtk.Adjustment.Adjustment ->
IO ()
containerSetFocusHadjustment ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a, Gtk.Adjustment.IsAdjustment b) =>
a
-> b
-> m ()
containerSetFocusHadjustment container adjustment = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
adjustment' <- unsafeManagedPtrCastPtr adjustment
gtk_container_set_focus_hadjustment container' adjustment'
touchManagedPtr container
touchManagedPtr adjustment
return ()
#if ENABLE_OVERLOADING
data ContainerSetFocusHadjustmentMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsContainer a, Gtk.Adjustment.IsAdjustment b) => O.MethodInfo ContainerSetFocusHadjustmentMethodInfo a signature where
overloadedMethod _ = containerSetFocusHadjustment
#endif
foreign import ccall "gtk_container_set_focus_vadjustment" gtk_container_set_focus_vadjustment ::
Ptr Container ->
Ptr Gtk.Adjustment.Adjustment ->
IO ()
containerSetFocusVadjustment ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a, Gtk.Adjustment.IsAdjustment b) =>
a
-> b
-> m ()
containerSetFocusVadjustment container adjustment = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
adjustment' <- unsafeManagedPtrCastPtr adjustment
gtk_container_set_focus_vadjustment container' adjustment'
touchManagedPtr container
touchManagedPtr adjustment
return ()
#if ENABLE_OVERLOADING
data ContainerSetFocusVadjustmentMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsContainer a, Gtk.Adjustment.IsAdjustment b) => O.MethodInfo ContainerSetFocusVadjustmentMethodInfo a signature where
overloadedMethod _ = containerSetFocusVadjustment
#endif
foreign import ccall "gtk_container_set_reallocate_redraws" gtk_container_set_reallocate_redraws ::
Ptr Container ->
CInt ->
IO ()
{-# DEPRECATED containerSetReallocateRedraws ["(Since version 3.14)","Call 'GI.Gtk.Objects.Widget.widgetQueueDraw' in your size_allocate handler."] #-}
containerSetReallocateRedraws ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> Bool
-> m ()
containerSetReallocateRedraws container needsRedraws = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
let needsRedraws' = (fromIntegral . fromEnum) needsRedraws
gtk_container_set_reallocate_redraws container' needsRedraws'
touchManagedPtr container
return ()
#if ENABLE_OVERLOADING
data ContainerSetReallocateRedrawsMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsContainer a) => O.MethodInfo ContainerSetReallocateRedrawsMethodInfo a signature where
overloadedMethod _ = containerSetReallocateRedraws
#endif
foreign import ccall "gtk_container_set_resize_mode" gtk_container_set_resize_mode ::
Ptr Container ->
CUInt ->
IO ()
{-# DEPRECATED containerSetResizeMode ["(Since version 3.12)","Resize modes are deprecated. They aren\8217t necessary"," anymore since frame clocks and might introduce obscure bugs if"," used."] #-}
containerSetResizeMode ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> Gtk.Enums.ResizeMode
-> m ()
containerSetResizeMode container resizeMode = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
let resizeMode' = (fromIntegral . fromEnum) resizeMode
gtk_container_set_resize_mode container' resizeMode'
touchManagedPtr container
return ()
#if ENABLE_OVERLOADING
data ContainerSetResizeModeMethodInfo
instance (signature ~ (Gtk.Enums.ResizeMode -> m ()), MonadIO m, IsContainer a) => O.MethodInfo ContainerSetResizeModeMethodInfo a signature where
overloadedMethod _ = containerSetResizeMode
#endif
foreign import ccall "gtk_container_unset_focus_chain" gtk_container_unset_focus_chain ::
Ptr Container ->
IO ()
{-# DEPRECATED containerUnsetFocusChain ["(Since version 3.24)","For overriding focus behavior, use the"," GtkWidgetClass::focus signal."] #-}
containerUnsetFocusChain ::
(B.CallStack.HasCallStack, MonadIO m, IsContainer a) =>
a
-> m ()
containerUnsetFocusChain container = liftIO $ do
container' <- unsafeManagedPtrCastPtr container
gtk_container_unset_focus_chain container'
touchManagedPtr container
return ()
#if ENABLE_OVERLOADING
data ContainerUnsetFocusChainMethodInfo
instance (signature ~ (m ()), MonadIO m, IsContainer a) => O.MethodInfo ContainerUnsetFocusChainMethodInfo a signature where
overloadedMethod _ = containerUnsetFocusChain
#endif