{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gtk.Objects.Popover
(
Popover(..) ,
IsPopover ,
toPopover ,
#if defined(ENABLE_OVERLOADING)
ResolvePopoverMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
PopoverBindModelMethodInfo ,
#endif
popoverBindModel ,
#if defined(ENABLE_OVERLOADING)
PopoverGetConstrainToMethodInfo ,
#endif
popoverGetConstrainTo ,
#if defined(ENABLE_OVERLOADING)
PopoverGetDefaultWidgetMethodInfo ,
#endif
popoverGetDefaultWidget ,
#if defined(ENABLE_OVERLOADING)
PopoverGetModalMethodInfo ,
#endif
popoverGetModal ,
#if defined(ENABLE_OVERLOADING)
PopoverGetPointingToMethodInfo ,
#endif
popoverGetPointingTo ,
#if defined(ENABLE_OVERLOADING)
PopoverGetPositionMethodInfo ,
#endif
popoverGetPosition ,
#if defined(ENABLE_OVERLOADING)
PopoverGetRelativeToMethodInfo ,
#endif
popoverGetRelativeTo ,
#if defined(ENABLE_OVERLOADING)
PopoverGetTransitionsEnabledMethodInfo ,
#endif
popoverGetTransitionsEnabled ,
popoverNew ,
popoverNewFromModel ,
#if defined(ENABLE_OVERLOADING)
PopoverPopdownMethodInfo ,
#endif
popoverPopdown ,
#if defined(ENABLE_OVERLOADING)
PopoverPopupMethodInfo ,
#endif
popoverPopup ,
#if defined(ENABLE_OVERLOADING)
PopoverSetConstrainToMethodInfo ,
#endif
popoverSetConstrainTo ,
#if defined(ENABLE_OVERLOADING)
PopoverSetDefaultWidgetMethodInfo ,
#endif
popoverSetDefaultWidget ,
#if defined(ENABLE_OVERLOADING)
PopoverSetModalMethodInfo ,
#endif
popoverSetModal ,
#if defined(ENABLE_OVERLOADING)
PopoverSetPointingToMethodInfo ,
#endif
popoverSetPointingTo ,
#if defined(ENABLE_OVERLOADING)
PopoverSetPositionMethodInfo ,
#endif
popoverSetPosition ,
#if defined(ENABLE_OVERLOADING)
PopoverSetRelativeToMethodInfo ,
#endif
popoverSetRelativeTo ,
#if defined(ENABLE_OVERLOADING)
PopoverSetTransitionsEnabledMethodInfo ,
#endif
popoverSetTransitionsEnabled ,
#if defined(ENABLE_OVERLOADING)
PopoverConstrainToPropertyInfo ,
#endif
constructPopoverConstrainTo ,
getPopoverConstrainTo ,
#if defined(ENABLE_OVERLOADING)
popoverConstrainTo ,
#endif
setPopoverConstrainTo ,
#if defined(ENABLE_OVERLOADING)
PopoverModalPropertyInfo ,
#endif
constructPopoverModal ,
getPopoverModal ,
#if defined(ENABLE_OVERLOADING)
popoverModal ,
#endif
setPopoverModal ,
#if defined(ENABLE_OVERLOADING)
PopoverPointingToPropertyInfo ,
#endif
constructPopoverPointingTo ,
getPopoverPointingTo ,
#if defined(ENABLE_OVERLOADING)
popoverPointingTo ,
#endif
setPopoverPointingTo ,
#if defined(ENABLE_OVERLOADING)
PopoverPositionPropertyInfo ,
#endif
constructPopoverPosition ,
getPopoverPosition ,
#if defined(ENABLE_OVERLOADING)
popoverPosition ,
#endif
setPopoverPosition ,
#if defined(ENABLE_OVERLOADING)
PopoverRelativeToPropertyInfo ,
#endif
clearPopoverRelativeTo ,
constructPopoverRelativeTo ,
getPopoverRelativeTo ,
#if defined(ENABLE_OVERLOADING)
popoverRelativeTo ,
#endif
setPopoverRelativeTo ,
#if defined(ENABLE_OVERLOADING)
PopoverTransitionsEnabledPropertyInfo ,
#endif
constructPopoverTransitionsEnabled ,
getPopoverTransitionsEnabled ,
#if defined(ENABLE_OVERLOADING)
popoverTransitionsEnabled ,
#endif
setPopoverTransitionsEnabled ,
C_PopoverClosedCallback ,
PopoverClosedCallback ,
#if defined(ENABLE_OVERLOADING)
PopoverClosedSignalInfo ,
#endif
afterPopoverClosed ,
genClosure_PopoverClosed ,
mk_PopoverClosedCallback ,
noPopoverClosedCallback ,
onPopoverClosed ,
wrap_PopoverClosedCallback ,
) 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.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.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GHC.Records as R
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gdk.Structs.Rectangle as Gdk.Rectangle
import qualified GI.Gio.Objects.MenuModel as Gio.MenuModel
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.Bin as Gtk.Bin
import {-# SOURCE #-} qualified GI.Gtk.Objects.Container as Gtk.Container
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype Popover = Popover (SP.ManagedPtr Popover)
deriving (Popover -> Popover -> Bool
(Popover -> Popover -> Bool)
-> (Popover -> Popover -> Bool) -> Eq Popover
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Popover -> Popover -> Bool
$c/= :: Popover -> Popover -> Bool
== :: Popover -> Popover -> Bool
$c== :: Popover -> Popover -> Bool
Eq)
instance SP.ManagedPtrNewtype Popover where
toManagedPtr :: Popover -> ManagedPtr Popover
toManagedPtr (Popover ManagedPtr Popover
p) = ManagedPtr Popover
p
foreign import ccall "gtk_popover_get_type"
c_gtk_popover_get_type :: IO B.Types.GType
instance B.Types.TypedObject Popover where
glibType :: IO GType
glibType = IO GType
c_gtk_popover_get_type
instance B.Types.GObject Popover
class (SP.GObject o, O.IsDescendantOf Popover o) => IsPopover o
instance (SP.GObject o, O.IsDescendantOf Popover o) => IsPopover o
instance O.HasParentTypes Popover
type instance O.ParentTypes Popover = '[Gtk.Bin.Bin, Gtk.Container.Container, Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable]
toPopover :: (MIO.MonadIO m, IsPopover o) => o -> m Popover
toPopover :: forall (m :: * -> *) o. (MonadIO m, IsPopover o) => o -> m Popover
toPopover = IO Popover -> m Popover
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Popover -> m Popover) -> (o -> IO Popover) -> o -> m Popover
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr Popover -> Popover) -> o -> IO Popover
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr Popover -> Popover
Popover
instance B.GValue.IsGValue (Maybe Popover) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_gtk_popover_get_type
gvalueSet_ :: Ptr GValue -> Maybe Popover -> IO ()
gvalueSet_ Ptr GValue
gv Maybe Popover
P.Nothing = Ptr GValue -> Ptr Popover -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr Popover
forall a. Ptr a
FP.nullPtr :: FP.Ptr Popover)
gvalueSet_ Ptr GValue
gv (P.Just Popover
obj) = Popover -> (Ptr Popover -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr Popover
obj (Ptr GValue -> Ptr Popover -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe Popover)
gvalueGet_ Ptr GValue
gv = do
Ptr Popover
ptr <- Ptr GValue -> IO (Ptr Popover)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr Popover)
if Ptr Popover
ptr Ptr Popover -> Ptr Popover -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr Popover
forall a. Ptr a
FP.nullPtr
then Popover -> Maybe Popover
forall a. a -> Maybe a
P.Just (Popover -> Maybe Popover) -> IO Popover -> IO (Maybe Popover)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr Popover -> Popover) -> Ptr Popover -> IO Popover
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr Popover -> Popover
Popover Ptr Popover
ptr
else Maybe Popover -> IO (Maybe Popover)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Popover
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolvePopoverMethod (t :: Symbol) (o :: *) :: * where
ResolvePopoverMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolvePopoverMethod "add" o = Gtk.Container.ContainerAddMethodInfo
ResolvePopoverMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolvePopoverMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolvePopoverMethod "addDeviceEvents" o = Gtk.Widget.WidgetAddDeviceEventsMethodInfo
ResolvePopoverMethod "addEvents" o = Gtk.Widget.WidgetAddEventsMethodInfo
ResolvePopoverMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolvePopoverMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolvePopoverMethod "bindModel" o = PopoverBindModelMethodInfo
ResolvePopoverMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolvePopoverMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolvePopoverMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolvePopoverMethod "checkResize" o = Gtk.Container.ContainerCheckResizeMethodInfo
ResolvePopoverMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolvePopoverMethod "childGetProperty" o = Gtk.Container.ContainerChildGetPropertyMethodInfo
ResolvePopoverMethod "childNotify" o = Gtk.Container.ContainerChildNotifyMethodInfo
ResolvePopoverMethod "childNotifyByPspec" o = Gtk.Container.ContainerChildNotifyByPspecMethodInfo
ResolvePopoverMethod "childSetProperty" o = Gtk.Container.ContainerChildSetPropertyMethodInfo
ResolvePopoverMethod "childType" o = Gtk.Container.ContainerChildTypeMethodInfo
ResolvePopoverMethod "classPath" o = Gtk.Widget.WidgetClassPathMethodInfo
ResolvePopoverMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolvePopoverMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolvePopoverMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolvePopoverMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolvePopoverMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolvePopoverMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolvePopoverMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolvePopoverMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolvePopoverMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolvePopoverMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolvePopoverMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolvePopoverMethod "dragBeginWithCoordinates" o = Gtk.Widget.WidgetDragBeginWithCoordinatesMethodInfo
ResolvePopoverMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolvePopoverMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolvePopoverMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolvePopoverMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolvePopoverMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolvePopoverMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolvePopoverMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolvePopoverMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolvePopoverMethod "dragDestSetProxy" o = Gtk.Widget.WidgetDragDestSetProxyMethodInfo
ResolvePopoverMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolvePopoverMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolvePopoverMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolvePopoverMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolvePopoverMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolvePopoverMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolvePopoverMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolvePopoverMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolvePopoverMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolvePopoverMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolvePopoverMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolvePopoverMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolvePopoverMethod "dragSourceSetIconPixbuf" o = Gtk.Widget.WidgetDragSourceSetIconPixbufMethodInfo
ResolvePopoverMethod "dragSourceSetIconStock" o = Gtk.Widget.WidgetDragSourceSetIconStockMethodInfo
ResolvePopoverMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolvePopoverMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolvePopoverMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolvePopoverMethod "draw" o = Gtk.Widget.WidgetDrawMethodInfo
ResolvePopoverMethod "ensureStyle" o = Gtk.Widget.WidgetEnsureStyleMethodInfo
ResolvePopoverMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolvePopoverMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolvePopoverMethod "forall" o = Gtk.Container.ContainerForallMethodInfo
ResolvePopoverMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolvePopoverMethod "foreach" o = Gtk.Container.ContainerForeachMethodInfo
ResolvePopoverMethod "freezeChildNotify" o = Gtk.Widget.WidgetFreezeChildNotifyMethodInfo
ResolvePopoverMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolvePopoverMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolvePopoverMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolvePopoverMethod "grabDefault" o = Gtk.Widget.WidgetGrabDefaultMethodInfo
ResolvePopoverMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolvePopoverMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolvePopoverMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolvePopoverMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolvePopoverMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolvePopoverMethod "hasRcStyle" o = Gtk.Widget.WidgetHasRcStyleMethodInfo
ResolvePopoverMethod "hasScreen" o = Gtk.Widget.WidgetHasScreenMethodInfo
ResolvePopoverMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolvePopoverMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolvePopoverMethod "hideOnDelete" o = Gtk.Widget.WidgetHideOnDeleteMethodInfo
ResolvePopoverMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolvePopoverMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolvePopoverMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolvePopoverMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolvePopoverMethod "intersect" o = Gtk.Widget.WidgetIntersectMethodInfo
ResolvePopoverMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolvePopoverMethod "isComposited" o = Gtk.Widget.WidgetIsCompositedMethodInfo
ResolvePopoverMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolvePopoverMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolvePopoverMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolvePopoverMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolvePopoverMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolvePopoverMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolvePopoverMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolvePopoverMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolvePopoverMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolvePopoverMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolvePopoverMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolvePopoverMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolvePopoverMethod "modifyBase" o = Gtk.Widget.WidgetModifyBaseMethodInfo
ResolvePopoverMethod "modifyBg" o = Gtk.Widget.WidgetModifyBgMethodInfo
ResolvePopoverMethod "modifyCursor" o = Gtk.Widget.WidgetModifyCursorMethodInfo
ResolvePopoverMethod "modifyFg" o = Gtk.Widget.WidgetModifyFgMethodInfo
ResolvePopoverMethod "modifyFont" o = Gtk.Widget.WidgetModifyFontMethodInfo
ResolvePopoverMethod "modifyStyle" o = Gtk.Widget.WidgetModifyStyleMethodInfo
ResolvePopoverMethod "modifyText" o = Gtk.Widget.WidgetModifyTextMethodInfo
ResolvePopoverMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolvePopoverMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolvePopoverMethod "overrideBackgroundColor" o = Gtk.Widget.WidgetOverrideBackgroundColorMethodInfo
ResolvePopoverMethod "overrideColor" o = Gtk.Widget.WidgetOverrideColorMethodInfo
ResolvePopoverMethod "overrideCursor" o = Gtk.Widget.WidgetOverrideCursorMethodInfo
ResolvePopoverMethod "overrideFont" o = Gtk.Widget.WidgetOverrideFontMethodInfo
ResolvePopoverMethod "overrideSymbolicColor" o = Gtk.Widget.WidgetOverrideSymbolicColorMethodInfo
ResolvePopoverMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolvePopoverMethod "path" o = Gtk.Widget.WidgetPathMethodInfo
ResolvePopoverMethod "popdown" o = PopoverPopdownMethodInfo
ResolvePopoverMethod "popup" o = PopoverPopupMethodInfo
ResolvePopoverMethod "propagateDraw" o = Gtk.Container.ContainerPropagateDrawMethodInfo
ResolvePopoverMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolvePopoverMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolvePopoverMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolvePopoverMethod "queueDrawArea" o = Gtk.Widget.WidgetQueueDrawAreaMethodInfo
ResolvePopoverMethod "queueDrawRegion" o = Gtk.Widget.WidgetQueueDrawRegionMethodInfo
ResolvePopoverMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolvePopoverMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolvePopoverMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolvePopoverMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolvePopoverMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolvePopoverMethod "regionIntersect" o = Gtk.Widget.WidgetRegionIntersectMethodInfo
ResolvePopoverMethod "registerWindow" o = Gtk.Widget.WidgetRegisterWindowMethodInfo
ResolvePopoverMethod "remove" o = Gtk.Container.ContainerRemoveMethodInfo
ResolvePopoverMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolvePopoverMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolvePopoverMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolvePopoverMethod "renderIcon" o = Gtk.Widget.WidgetRenderIconMethodInfo
ResolvePopoverMethod "renderIconPixbuf" o = Gtk.Widget.WidgetRenderIconPixbufMethodInfo
ResolvePopoverMethod "reparent" o = Gtk.Widget.WidgetReparentMethodInfo
ResolvePopoverMethod "resetRcStyles" o = Gtk.Widget.WidgetResetRcStylesMethodInfo
ResolvePopoverMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolvePopoverMethod "resizeChildren" o = Gtk.Container.ContainerResizeChildrenMethodInfo
ResolvePopoverMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolvePopoverMethod "sendExpose" o = Gtk.Widget.WidgetSendExposeMethodInfo
ResolvePopoverMethod "sendFocusChange" o = Gtk.Widget.WidgetSendFocusChangeMethodInfo
ResolvePopoverMethod "shapeCombineRegion" o = Gtk.Widget.WidgetShapeCombineRegionMethodInfo
ResolvePopoverMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolvePopoverMethod "showAll" o = Gtk.Widget.WidgetShowAllMethodInfo
ResolvePopoverMethod "showNow" o = Gtk.Widget.WidgetShowNowMethodInfo
ResolvePopoverMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolvePopoverMethod "sizeAllocateWithBaseline" o = Gtk.Widget.WidgetSizeAllocateWithBaselineMethodInfo
ResolvePopoverMethod "sizeRequest" o = Gtk.Widget.WidgetSizeRequestMethodInfo
ResolvePopoverMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolvePopoverMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolvePopoverMethod "styleAttach" o = Gtk.Widget.WidgetStyleAttachMethodInfo
ResolvePopoverMethod "styleGetProperty" o = Gtk.Widget.WidgetStyleGetPropertyMethodInfo
ResolvePopoverMethod "thawChildNotify" o = Gtk.Widget.WidgetThawChildNotifyMethodInfo
ResolvePopoverMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolvePopoverMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolvePopoverMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolvePopoverMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolvePopoverMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolvePopoverMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolvePopoverMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolvePopoverMethod "unregisterWindow" o = Gtk.Widget.WidgetUnregisterWindowMethodInfo
ResolvePopoverMethod "unsetFocusChain" o = Gtk.Container.ContainerUnsetFocusChainMethodInfo
ResolvePopoverMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolvePopoverMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolvePopoverMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolvePopoverMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolvePopoverMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolvePopoverMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolvePopoverMethod "getAllocatedSize" o = Gtk.Widget.WidgetGetAllocatedSizeMethodInfo
ResolvePopoverMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolvePopoverMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolvePopoverMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolvePopoverMethod "getAppPaintable" o = Gtk.Widget.WidgetGetAppPaintableMethodInfo
ResolvePopoverMethod "getBorderWidth" o = Gtk.Container.ContainerGetBorderWidthMethodInfo
ResolvePopoverMethod "getCanDefault" o = Gtk.Widget.WidgetGetCanDefaultMethodInfo
ResolvePopoverMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolvePopoverMethod "getChild" o = Gtk.Bin.BinGetChildMethodInfo
ResolvePopoverMethod "getChildRequisition" o = Gtk.Widget.WidgetGetChildRequisitionMethodInfo
ResolvePopoverMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolvePopoverMethod "getChildren" o = Gtk.Container.ContainerGetChildrenMethodInfo
ResolvePopoverMethod "getClip" o = Gtk.Widget.WidgetGetClipMethodInfo
ResolvePopoverMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolvePopoverMethod "getCompositeName" o = Gtk.Widget.WidgetGetCompositeNameMethodInfo
ResolvePopoverMethod "getConstrainTo" o = PopoverGetConstrainToMethodInfo
ResolvePopoverMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolvePopoverMethod "getDefaultWidget" o = PopoverGetDefaultWidgetMethodInfo
ResolvePopoverMethod "getDeviceEnabled" o = Gtk.Widget.WidgetGetDeviceEnabledMethodInfo
ResolvePopoverMethod "getDeviceEvents" o = Gtk.Widget.WidgetGetDeviceEventsMethodInfo
ResolvePopoverMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolvePopoverMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolvePopoverMethod "getDoubleBuffered" o = Gtk.Widget.WidgetGetDoubleBufferedMethodInfo
ResolvePopoverMethod "getEvents" o = Gtk.Widget.WidgetGetEventsMethodInfo
ResolvePopoverMethod "getFocusChain" o = Gtk.Container.ContainerGetFocusChainMethodInfo
ResolvePopoverMethod "getFocusChild" o = Gtk.Container.ContainerGetFocusChildMethodInfo
ResolvePopoverMethod "getFocusHadjustment" o = Gtk.Container.ContainerGetFocusHadjustmentMethodInfo
ResolvePopoverMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolvePopoverMethod "getFocusVadjustment" o = Gtk.Container.ContainerGetFocusVadjustmentMethodInfo
ResolvePopoverMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolvePopoverMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolvePopoverMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolvePopoverMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolvePopoverMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolvePopoverMethod "getHasWindow" o = Gtk.Widget.WidgetGetHasWindowMethodInfo
ResolvePopoverMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolvePopoverMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolvePopoverMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolvePopoverMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolvePopoverMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolvePopoverMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolvePopoverMethod "getMarginLeft" o = Gtk.Widget.WidgetGetMarginLeftMethodInfo
ResolvePopoverMethod "getMarginRight" o = Gtk.Widget.WidgetGetMarginRightMethodInfo
ResolvePopoverMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolvePopoverMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolvePopoverMethod "getModal" o = PopoverGetModalMethodInfo
ResolvePopoverMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolvePopoverMethod "getModifierStyle" o = Gtk.Widget.WidgetGetModifierStyleMethodInfo
ResolvePopoverMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolvePopoverMethod "getNoShowAll" o = Gtk.Widget.WidgetGetNoShowAllMethodInfo
ResolvePopoverMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolvePopoverMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolvePopoverMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolvePopoverMethod "getParentWindow" o = Gtk.Widget.WidgetGetParentWindowMethodInfo
ResolvePopoverMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolvePopoverMethod "getPathForChild" o = Gtk.Container.ContainerGetPathForChildMethodInfo
ResolvePopoverMethod "getPointer" o = Gtk.Widget.WidgetGetPointerMethodInfo
ResolvePopoverMethod "getPointingTo" o = PopoverGetPointingToMethodInfo
ResolvePopoverMethod "getPosition" o = PopoverGetPositionMethodInfo
ResolvePopoverMethod "getPreferredHeight" o = Gtk.Widget.WidgetGetPreferredHeightMethodInfo
ResolvePopoverMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.Widget.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo
ResolvePopoverMethod "getPreferredHeightForWidth" o = Gtk.Widget.WidgetGetPreferredHeightForWidthMethodInfo
ResolvePopoverMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolvePopoverMethod "getPreferredWidth" o = Gtk.Widget.WidgetGetPreferredWidthMethodInfo
ResolvePopoverMethod "getPreferredWidthForHeight" o = Gtk.Widget.WidgetGetPreferredWidthForHeightMethodInfo
ResolvePopoverMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolvePopoverMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolvePopoverMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolvePopoverMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolvePopoverMethod "getRelativeTo" o = PopoverGetRelativeToMethodInfo
ResolvePopoverMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolvePopoverMethod "getRequisition" o = Gtk.Widget.WidgetGetRequisitionMethodInfo
ResolvePopoverMethod "getResizeMode" o = Gtk.Container.ContainerGetResizeModeMethodInfo
ResolvePopoverMethod "getRootWindow" o = Gtk.Widget.WidgetGetRootWindowMethodInfo
ResolvePopoverMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolvePopoverMethod "getScreen" o = Gtk.Widget.WidgetGetScreenMethodInfo
ResolvePopoverMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolvePopoverMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolvePopoverMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolvePopoverMethod "getState" o = Gtk.Widget.WidgetGetStateMethodInfo
ResolvePopoverMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolvePopoverMethod "getStyle" o = Gtk.Widget.WidgetGetStyleMethodInfo
ResolvePopoverMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolvePopoverMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolvePopoverMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolvePopoverMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolvePopoverMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolvePopoverMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolvePopoverMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolvePopoverMethod "getTransitionsEnabled" o = PopoverGetTransitionsEnabledMethodInfo
ResolvePopoverMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolvePopoverMethod "getValignWithBaseline" o = Gtk.Widget.WidgetGetValignWithBaselineMethodInfo
ResolvePopoverMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolvePopoverMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolvePopoverMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolvePopoverMethod "getVisual" o = Gtk.Widget.WidgetGetVisualMethodInfo
ResolvePopoverMethod "getWindow" o = Gtk.Widget.WidgetGetWindowMethodInfo
ResolvePopoverMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolvePopoverMethod "setAllocation" o = Gtk.Widget.WidgetSetAllocationMethodInfo
ResolvePopoverMethod "setAppPaintable" o = Gtk.Widget.WidgetSetAppPaintableMethodInfo
ResolvePopoverMethod "setBorderWidth" o = Gtk.Container.ContainerSetBorderWidthMethodInfo
ResolvePopoverMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolvePopoverMethod "setCanDefault" o = Gtk.Widget.WidgetSetCanDefaultMethodInfo
ResolvePopoverMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolvePopoverMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolvePopoverMethod "setClip" o = Gtk.Widget.WidgetSetClipMethodInfo
ResolvePopoverMethod "setCompositeName" o = Gtk.Widget.WidgetSetCompositeNameMethodInfo
ResolvePopoverMethod "setConstrainTo" o = PopoverSetConstrainToMethodInfo
ResolvePopoverMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolvePopoverMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolvePopoverMethod "setDefaultWidget" o = PopoverSetDefaultWidgetMethodInfo
ResolvePopoverMethod "setDeviceEnabled" o = Gtk.Widget.WidgetSetDeviceEnabledMethodInfo
ResolvePopoverMethod "setDeviceEvents" o = Gtk.Widget.WidgetSetDeviceEventsMethodInfo
ResolvePopoverMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolvePopoverMethod "setDoubleBuffered" o = Gtk.Widget.WidgetSetDoubleBufferedMethodInfo
ResolvePopoverMethod "setEvents" o = Gtk.Widget.WidgetSetEventsMethodInfo
ResolvePopoverMethod "setFocusChain" o = Gtk.Container.ContainerSetFocusChainMethodInfo
ResolvePopoverMethod "setFocusChild" o = Gtk.Container.ContainerSetFocusChildMethodInfo
ResolvePopoverMethod "setFocusHadjustment" o = Gtk.Container.ContainerSetFocusHadjustmentMethodInfo
ResolvePopoverMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolvePopoverMethod "setFocusVadjustment" o = Gtk.Container.ContainerSetFocusVadjustmentMethodInfo
ResolvePopoverMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolvePopoverMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolvePopoverMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolvePopoverMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolvePopoverMethod "setHasWindow" o = Gtk.Widget.WidgetSetHasWindowMethodInfo
ResolvePopoverMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolvePopoverMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolvePopoverMethod "setMapped" o = Gtk.Widget.WidgetSetMappedMethodInfo
ResolvePopoverMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolvePopoverMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolvePopoverMethod "setMarginLeft" o = Gtk.Widget.WidgetSetMarginLeftMethodInfo
ResolvePopoverMethod "setMarginRight" o = Gtk.Widget.WidgetSetMarginRightMethodInfo
ResolvePopoverMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolvePopoverMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolvePopoverMethod "setModal" o = PopoverSetModalMethodInfo
ResolvePopoverMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolvePopoverMethod "setNoShowAll" o = Gtk.Widget.WidgetSetNoShowAllMethodInfo
ResolvePopoverMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolvePopoverMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolvePopoverMethod "setParentWindow" o = Gtk.Widget.WidgetSetParentWindowMethodInfo
ResolvePopoverMethod "setPointingTo" o = PopoverSetPointingToMethodInfo
ResolvePopoverMethod "setPosition" o = PopoverSetPositionMethodInfo
ResolvePopoverMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolvePopoverMethod "setRealized" o = Gtk.Widget.WidgetSetRealizedMethodInfo
ResolvePopoverMethod "setReallocateRedraws" o = Gtk.Container.ContainerSetReallocateRedrawsMethodInfo
ResolvePopoverMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolvePopoverMethod "setRedrawOnAllocate" o = Gtk.Widget.WidgetSetRedrawOnAllocateMethodInfo
ResolvePopoverMethod "setRelativeTo" o = PopoverSetRelativeToMethodInfo
ResolvePopoverMethod "setResizeMode" o = Gtk.Container.ContainerSetResizeModeMethodInfo
ResolvePopoverMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolvePopoverMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolvePopoverMethod "setState" o = Gtk.Widget.WidgetSetStateMethodInfo
ResolvePopoverMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolvePopoverMethod "setStyle" o = Gtk.Widget.WidgetSetStyleMethodInfo
ResolvePopoverMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolvePopoverMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolvePopoverMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolvePopoverMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolvePopoverMethod "setTransitionsEnabled" o = PopoverSetTransitionsEnabledMethodInfo
ResolvePopoverMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolvePopoverMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolvePopoverMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolvePopoverMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolvePopoverMethod "setVisual" o = Gtk.Widget.WidgetSetVisualMethodInfo
ResolvePopoverMethod "setWindow" o = Gtk.Widget.WidgetSetWindowMethodInfo
ResolvePopoverMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolvePopoverMethod t Popover, O.OverloadedMethod info Popover p) => OL.IsLabel t (Popover -> 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 ~ ResolvePopoverMethod t Popover, O.OverloadedMethod info Popover p, R.HasField t Popover p) => R.HasField t Popover p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolvePopoverMethod t Popover, O.OverloadedMethodInfo info Popover) => OL.IsLabel t (O.MethodProxy info Popover) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
type PopoverClosedCallback =
IO ()
noPopoverClosedCallback :: Maybe PopoverClosedCallback
noPopoverClosedCallback :: Maybe (IO ())
noPopoverClosedCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_PopoverClosedCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_PopoverClosedCallback :: C_PopoverClosedCallback -> IO (FunPtr C_PopoverClosedCallback)
genClosure_PopoverClosed :: MonadIO m => PopoverClosedCallback -> m (GClosure C_PopoverClosedCallback)
genClosure_PopoverClosed :: forall (m :: * -> *).
MonadIO m =>
IO () -> m (GClosure C_PopoverClosedCallback)
genClosure_PopoverClosed IO ()
cb = IO (GClosure C_PopoverClosedCallback)
-> m (GClosure C_PopoverClosedCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_PopoverClosedCallback)
-> m (GClosure C_PopoverClosedCallback))
-> IO (GClosure C_PopoverClosedCallback)
-> m (GClosure C_PopoverClosedCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_PopoverClosedCallback
cb' = IO () -> C_PopoverClosedCallback
wrap_PopoverClosedCallback IO ()
cb
C_PopoverClosedCallback -> IO (FunPtr C_PopoverClosedCallback)
mk_PopoverClosedCallback C_PopoverClosedCallback
cb' IO (FunPtr C_PopoverClosedCallback)
-> (FunPtr C_PopoverClosedCallback
-> IO (GClosure C_PopoverClosedCallback))
-> IO (GClosure C_PopoverClosedCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_PopoverClosedCallback
-> IO (GClosure C_PopoverClosedCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_PopoverClosedCallback ::
PopoverClosedCallback ->
C_PopoverClosedCallback
wrap_PopoverClosedCallback :: IO () -> C_PopoverClosedCallback
wrap_PopoverClosedCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onPopoverClosed :: (IsPopover a, MonadIO m) => a -> PopoverClosedCallback -> m SignalHandlerId
onPopoverClosed :: forall a (m :: * -> *).
(IsPopover a, MonadIO m) =>
a -> IO () -> m SignalHandlerId
onPopoverClosed a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_PopoverClosedCallback
cb' = IO () -> C_PopoverClosedCallback
wrap_PopoverClosedCallback IO ()
cb
FunPtr C_PopoverClosedCallback
cb'' <- C_PopoverClosedCallback -> IO (FunPtr C_PopoverClosedCallback)
mk_PopoverClosedCallback C_PopoverClosedCallback
cb'
a
-> Text
-> FunPtr C_PopoverClosedCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"closed" FunPtr C_PopoverClosedCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterPopoverClosed :: (IsPopover a, MonadIO m) => a -> PopoverClosedCallback -> m SignalHandlerId
afterPopoverClosed :: forall a (m :: * -> *).
(IsPopover a, MonadIO m) =>
a -> IO () -> m SignalHandlerId
afterPopoverClosed a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_PopoverClosedCallback
cb' = IO () -> C_PopoverClosedCallback
wrap_PopoverClosedCallback IO ()
cb
FunPtr C_PopoverClosedCallback
cb'' <- C_PopoverClosedCallback -> IO (FunPtr C_PopoverClosedCallback)
mk_PopoverClosedCallback C_PopoverClosedCallback
cb'
a
-> Text
-> FunPtr C_PopoverClosedCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"closed" FunPtr C_PopoverClosedCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data PopoverClosedSignalInfo
instance SignalInfo PopoverClosedSignalInfo where
type HaskellCallbackType PopoverClosedSignalInfo = PopoverClosedCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_PopoverClosedCallback cb
cb'' <- mk_PopoverClosedCallback cb'
connectSignalFunPtr obj "closed" cb'' connectMode detail
#endif
getPopoverConstrainTo :: (MonadIO m, IsPopover o) => o -> m Gtk.Enums.PopoverConstraint
getPopoverConstrainTo :: forall (m :: * -> *) o.
(MonadIO m, IsPopover o) =>
o -> m PopoverConstraint
getPopoverConstrainTo o
obj = IO PopoverConstraint -> m PopoverConstraint
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO PopoverConstraint -> m PopoverConstraint)
-> IO PopoverConstraint -> m PopoverConstraint
forall a b. (a -> b) -> a -> b
$ o -> String -> IO PopoverConstraint
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj String
"constrain-to"
setPopoverConstrainTo :: (MonadIO m, IsPopover o) => o -> Gtk.Enums.PopoverConstraint -> m ()
setPopoverConstrainTo :: forall (m :: * -> *) o.
(MonadIO m, IsPopover o) =>
o -> PopoverConstraint -> m ()
setPopoverConstrainTo o
obj PopoverConstraint
val = IO () -> m ()
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 -> PopoverConstraint -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj String
"constrain-to" PopoverConstraint
val
constructPopoverConstrainTo :: (IsPopover o, MIO.MonadIO m) => Gtk.Enums.PopoverConstraint -> m (GValueConstruct o)
constructPopoverConstrainTo :: forall o (m :: * -> *).
(IsPopover o, MonadIO m) =>
PopoverConstraint -> m (GValueConstruct o)
constructPopoverConstrainTo PopoverConstraint
val = IO (GValueConstruct o) -> m (GValueConstruct o)
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 (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 -> PopoverConstraint -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum String
"constrain-to" PopoverConstraint
val
#if defined(ENABLE_OVERLOADING)
data PopoverConstrainToPropertyInfo
instance AttrInfo PopoverConstrainToPropertyInfo where
type AttrAllowedOps PopoverConstrainToPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint PopoverConstrainToPropertyInfo = IsPopover
type AttrSetTypeConstraint PopoverConstrainToPropertyInfo = (~) Gtk.Enums.PopoverConstraint
type AttrTransferTypeConstraint PopoverConstrainToPropertyInfo = (~) Gtk.Enums.PopoverConstraint
type AttrTransferType PopoverConstrainToPropertyInfo = Gtk.Enums.PopoverConstraint
type AttrGetType PopoverConstrainToPropertyInfo = Gtk.Enums.PopoverConstraint
type AttrLabel PopoverConstrainToPropertyInfo = "constrain-to"
type AttrOrigin PopoverConstrainToPropertyInfo = Popover
attrGet = getPopoverConstrainTo
attrSet = setPopoverConstrainTo
attrTransfer _ v = do
return v
attrConstruct = constructPopoverConstrainTo
attrClear = undefined
#endif
getPopoverModal :: (MonadIO m, IsPopover o) => o -> m Bool
getPopoverModal :: forall (m :: * -> *) o. (MonadIO m, IsPopover o) => o -> m Bool
getPopoverModal o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"modal"
setPopoverModal :: (MonadIO m, IsPopover o) => o -> Bool -> m ()
setPopoverModal :: forall (m :: * -> *) o.
(MonadIO m, IsPopover o) =>
o -> Bool -> m ()
setPopoverModal o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"modal" Bool
val
constructPopoverModal :: (IsPopover o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructPopoverModal :: forall o (m :: * -> *).
(IsPopover o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructPopoverModal Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
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 (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"modal" Bool
val
#if defined(ENABLE_OVERLOADING)
data PopoverModalPropertyInfo
instance AttrInfo PopoverModalPropertyInfo where
type AttrAllowedOps PopoverModalPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint PopoverModalPropertyInfo = IsPopover
type AttrSetTypeConstraint PopoverModalPropertyInfo = (~) Bool
type AttrTransferTypeConstraint PopoverModalPropertyInfo = (~) Bool
type AttrTransferType PopoverModalPropertyInfo = Bool
type AttrGetType PopoverModalPropertyInfo = Bool
type AttrLabel PopoverModalPropertyInfo = "modal"
type AttrOrigin PopoverModalPropertyInfo = Popover
attrGet = getPopoverModal
attrSet = setPopoverModal
attrTransfer _ v = do
return v
attrConstruct = constructPopoverModal
attrClear = undefined
#endif
getPopoverPointingTo :: (MonadIO m, IsPopover o) => o -> m (Maybe Gdk.Rectangle.Rectangle)
getPopoverPointingTo :: forall (m :: * -> *) o.
(MonadIO m, IsPopover o) =>
o -> m (Maybe Rectangle)
getPopoverPointingTo o
obj = IO (Maybe Rectangle) -> m (Maybe Rectangle)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Rectangle) -> m (Maybe Rectangle))
-> IO (Maybe Rectangle) -> m (Maybe Rectangle)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr Rectangle -> Rectangle)
-> IO (Maybe Rectangle)
forall a b.
(GObject a, GBoxed b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyBoxed o
obj String
"pointing-to" ManagedPtr Rectangle -> Rectangle
Gdk.Rectangle.Rectangle
setPopoverPointingTo :: (MonadIO m, IsPopover o) => o -> Gdk.Rectangle.Rectangle -> m ()
setPopoverPointingTo :: forall (m :: * -> *) o.
(MonadIO m, IsPopover o) =>
o -> Rectangle -> m ()
setPopoverPointingTo o
obj Rectangle
val = IO () -> m ()
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 Rectangle -> IO ()
forall a b.
(GObject a, GBoxed b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj String
"pointing-to" (Rectangle -> Maybe Rectangle
forall a. a -> Maybe a
Just Rectangle
val)
constructPopoverPointingTo :: (IsPopover o, MIO.MonadIO m) => Gdk.Rectangle.Rectangle -> m (GValueConstruct o)
constructPopoverPointingTo :: forall o (m :: * -> *).
(IsPopover o, MonadIO m) =>
Rectangle -> m (GValueConstruct o)
constructPopoverPointingTo Rectangle
val = IO (GValueConstruct o) -> m (GValueConstruct o)
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 (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 Rectangle -> IO (GValueConstruct o)
forall a o. GBoxed a => String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBoxed String
"pointing-to" (Rectangle -> Maybe Rectangle
forall a. a -> Maybe a
P.Just Rectangle
val)
#if defined(ENABLE_OVERLOADING)
data PopoverPointingToPropertyInfo
instance AttrInfo PopoverPointingToPropertyInfo where
type AttrAllowedOps PopoverPointingToPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint PopoverPointingToPropertyInfo = IsPopover
type AttrSetTypeConstraint PopoverPointingToPropertyInfo = (~) Gdk.Rectangle.Rectangle
type AttrTransferTypeConstraint PopoverPointingToPropertyInfo = (~) Gdk.Rectangle.Rectangle
type AttrTransferType PopoverPointingToPropertyInfo = Gdk.Rectangle.Rectangle
type AttrGetType PopoverPointingToPropertyInfo = (Maybe Gdk.Rectangle.Rectangle)
type AttrLabel PopoverPointingToPropertyInfo = "pointing-to"
type AttrOrigin PopoverPointingToPropertyInfo = Popover
attrGet = getPopoverPointingTo
attrSet = setPopoverPointingTo
attrTransfer _ v = do
return v
attrConstruct = constructPopoverPointingTo
attrClear = undefined
#endif
getPopoverPosition :: (MonadIO m, IsPopover o) => o -> m Gtk.Enums.PositionType
getPopoverPosition :: forall (m :: * -> *) o.
(MonadIO m, IsPopover o) =>
o -> m PositionType
getPopoverPosition o
obj = IO PositionType -> m PositionType
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO PositionType -> m PositionType)
-> IO PositionType -> m PositionType
forall a b. (a -> b) -> a -> b
$ o -> String -> IO PositionType
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj String
"position"
setPopoverPosition :: (MonadIO m, IsPopover o) => o -> Gtk.Enums.PositionType -> m ()
setPopoverPosition :: forall (m :: * -> *) o.
(MonadIO m, IsPopover o) =>
o -> PositionType -> m ()
setPopoverPosition o
obj PositionType
val = IO () -> m ()
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 -> PositionType -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj String
"position" PositionType
val
constructPopoverPosition :: (IsPopover o, MIO.MonadIO m) => Gtk.Enums.PositionType -> m (GValueConstruct o)
constructPopoverPosition :: forall o (m :: * -> *).
(IsPopover o, MonadIO m) =>
PositionType -> m (GValueConstruct o)
constructPopoverPosition PositionType
val = IO (GValueConstruct o) -> m (GValueConstruct o)
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 (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 -> PositionType -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum String
"position" PositionType
val
#if defined(ENABLE_OVERLOADING)
data PopoverPositionPropertyInfo
instance AttrInfo PopoverPositionPropertyInfo where
type AttrAllowedOps PopoverPositionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint PopoverPositionPropertyInfo = IsPopover
type AttrSetTypeConstraint PopoverPositionPropertyInfo = (~) Gtk.Enums.PositionType
type AttrTransferTypeConstraint PopoverPositionPropertyInfo = (~) Gtk.Enums.PositionType
type AttrTransferType PopoverPositionPropertyInfo = Gtk.Enums.PositionType
type AttrGetType PopoverPositionPropertyInfo = Gtk.Enums.PositionType
type AttrLabel PopoverPositionPropertyInfo = "position"
type AttrOrigin PopoverPositionPropertyInfo = Popover
attrGet = getPopoverPosition
attrSet = setPopoverPosition
attrTransfer _ v = do
return v
attrConstruct = constructPopoverPosition
attrClear = undefined
#endif
getPopoverRelativeTo :: (MonadIO m, IsPopover o) => o -> m Gtk.Widget.Widget
getPopoverRelativeTo :: forall (m :: * -> *) o. (MonadIO m, IsPopover o) => o -> m Widget
getPopoverRelativeTo o
obj = IO Widget -> m Widget
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Widget -> m Widget) -> IO Widget -> m Widget
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Widget) -> IO Widget
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getPopoverRelativeTo" (IO (Maybe Widget) -> IO Widget) -> IO (Maybe Widget) -> IO 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
"relative-to" ManagedPtr Widget -> Widget
Gtk.Widget.Widget
setPopoverRelativeTo :: (MonadIO m, IsPopover o, Gtk.Widget.IsWidget a) => o -> a -> m ()
setPopoverRelativeTo :: forall (m :: * -> *) o a.
(MonadIO m, IsPopover o, IsWidget a) =>
o -> a -> m ()
setPopoverRelativeTo o
obj a
val = IO () -> m ()
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
"relative-to" (a -> Maybe a
forall a. a -> Maybe a
Just a
val)
constructPopoverRelativeTo :: (IsPopover o, MIO.MonadIO m, Gtk.Widget.IsWidget a) => a -> m (GValueConstruct o)
constructPopoverRelativeTo :: forall o (m :: * -> *) a.
(IsPopover o, MonadIO m, IsWidget a) =>
a -> m (GValueConstruct o)
constructPopoverRelativeTo a
val = IO (GValueConstruct o) -> m (GValueConstruct o)
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 (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
"relative-to" (a -> Maybe a
forall a. a -> Maybe a
P.Just a
val)
clearPopoverRelativeTo :: (MonadIO m, IsPopover o) => o -> m ()
clearPopoverRelativeTo :: forall (m :: * -> *) o. (MonadIO m, IsPopover o) => o -> m ()
clearPopoverRelativeTo o
obj = IO () -> m ()
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
"relative-to" (Maybe Widget
forall a. Maybe a
Nothing :: Maybe Gtk.Widget.Widget)
#if defined(ENABLE_OVERLOADING)
data PopoverRelativeToPropertyInfo
instance AttrInfo PopoverRelativeToPropertyInfo where
type AttrAllowedOps PopoverRelativeToPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint PopoverRelativeToPropertyInfo = IsPopover
type AttrSetTypeConstraint PopoverRelativeToPropertyInfo = Gtk.Widget.IsWidget
type AttrTransferTypeConstraint PopoverRelativeToPropertyInfo = Gtk.Widget.IsWidget
type AttrTransferType PopoverRelativeToPropertyInfo = Gtk.Widget.Widget
type AttrGetType PopoverRelativeToPropertyInfo = Gtk.Widget.Widget
type AttrLabel PopoverRelativeToPropertyInfo = "relative-to"
type AttrOrigin PopoverRelativeToPropertyInfo = Popover
attrGet = getPopoverRelativeTo
attrSet = setPopoverRelativeTo
attrTransfer _ v = do
unsafeCastTo Gtk.Widget.Widget v
attrConstruct = constructPopoverRelativeTo
attrClear = clearPopoverRelativeTo
#endif
getPopoverTransitionsEnabled :: (MonadIO m, IsPopover o) => o -> m Bool
getPopoverTransitionsEnabled :: forall (m :: * -> *) o. (MonadIO m, IsPopover o) => o -> m Bool
getPopoverTransitionsEnabled o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"transitions-enabled"
setPopoverTransitionsEnabled :: (MonadIO m, IsPopover o) => o -> Bool -> m ()
setPopoverTransitionsEnabled :: forall (m :: * -> *) o.
(MonadIO m, IsPopover o) =>
o -> Bool -> m ()
setPopoverTransitionsEnabled o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"transitions-enabled" Bool
val
constructPopoverTransitionsEnabled :: (IsPopover o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructPopoverTransitionsEnabled :: forall o (m :: * -> *).
(IsPopover o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructPopoverTransitionsEnabled Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
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 (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"transitions-enabled" Bool
val
#if defined(ENABLE_OVERLOADING)
data PopoverTransitionsEnabledPropertyInfo
instance AttrInfo PopoverTransitionsEnabledPropertyInfo where
type AttrAllowedOps PopoverTransitionsEnabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint PopoverTransitionsEnabledPropertyInfo = IsPopover
type AttrSetTypeConstraint PopoverTransitionsEnabledPropertyInfo = (~) Bool
type AttrTransferTypeConstraint PopoverTransitionsEnabledPropertyInfo = (~) Bool
type AttrTransferType PopoverTransitionsEnabledPropertyInfo = Bool
type AttrGetType PopoverTransitionsEnabledPropertyInfo = Bool
type AttrLabel PopoverTransitionsEnabledPropertyInfo = "transitions-enabled"
type AttrOrigin PopoverTransitionsEnabledPropertyInfo = Popover
attrGet = getPopoverTransitionsEnabled
attrSet = setPopoverTransitionsEnabled
attrTransfer _ v = do
return v
attrConstruct = constructPopoverTransitionsEnabled
attrClear = undefined
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList Popover
type instance O.AttributeList Popover = PopoverAttributeList
type PopoverAttributeList = ('[ '("appPaintable", Gtk.Widget.WidgetAppPaintablePropertyInfo), '("borderWidth", Gtk.Container.ContainerBorderWidthPropertyInfo), '("canDefault", Gtk.Widget.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("child", Gtk.Container.ContainerChildPropertyInfo), '("compositeChild", Gtk.Widget.WidgetCompositeChildPropertyInfo), '("constrainTo", PopoverConstrainToPropertyInfo), '("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), '("modal", PopoverModalPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("noShowAll", Gtk.Widget.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("pointingTo", PopoverPointingToPropertyInfo), '("position", PopoverPositionPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("relativeTo", PopoverRelativeToPropertyInfo), '("resizeMode", Gtk.Container.ContainerResizeModePropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("style", Gtk.Widget.WidgetStylePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("transitionsEnabled", PopoverTransitionsEnabledPropertyInfo), '("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 defined(ENABLE_OVERLOADING)
popoverConstrainTo :: AttrLabelProxy "constrainTo"
popoverConstrainTo = AttrLabelProxy
popoverModal :: AttrLabelProxy "modal"
popoverModal = AttrLabelProxy
popoverPointingTo :: AttrLabelProxy "pointingTo"
popoverPointingTo = AttrLabelProxy
popoverPosition :: AttrLabelProxy "position"
popoverPosition = AttrLabelProxy
popoverRelativeTo :: AttrLabelProxy "relativeTo"
popoverRelativeTo = AttrLabelProxy
popoverTransitionsEnabled :: AttrLabelProxy "transitionsEnabled"
popoverTransitionsEnabled = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList Popover = PopoverSignalList
type PopoverSignalList = ('[ '("accelClosuresChanged", Gtk.Widget.WidgetAccelClosuresChangedSignalInfo), '("add", Gtk.Container.ContainerAddSignalInfo), '("buttonPressEvent", Gtk.Widget.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.Widget.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.Widget.WidgetCanActivateAccelSignalInfo), '("checkResize", Gtk.Container.ContainerCheckResizeSignalInfo), '("childNotify", Gtk.Widget.WidgetChildNotifySignalInfo), '("closed", PopoverClosedSignalInfo), '("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", Gtk.Container.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", Gtk.Container.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_popover_new" gtk_popover_new ::
Ptr Gtk.Widget.Widget ->
IO (Ptr Popover)
popoverNew ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
Maybe (a)
-> m Popover
popoverNew :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsWidget a) =>
Maybe a -> m Popover
popoverNew Maybe a
relativeTo = IO Popover -> m Popover
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Popover -> m Popover) -> IO Popover -> m Popover
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
maybeRelativeTo <- case Maybe a
relativeTo of
Maybe a
Nothing -> Ptr Widget -> IO (Ptr Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
forall a. Ptr a
nullPtr
Just a
jRelativeTo -> do
Ptr Widget
jRelativeTo' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
jRelativeTo
Ptr Widget -> IO (Ptr Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
jRelativeTo'
Ptr Popover
result <- Ptr Widget -> IO (Ptr Popover)
gtk_popover_new Ptr Widget
maybeRelativeTo
Text -> Ptr Popover -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"popoverNew" Ptr Popover
result
Popover
result' <- ((ManagedPtr Popover -> Popover) -> Ptr Popover -> IO Popover
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Popover -> Popover
Popover) Ptr Popover
result
Maybe a -> (a -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe a
relativeTo a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
Popover -> IO Popover
forall (m :: * -> *) a. Monad m => a -> m a
return Popover
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "gtk_popover_new_from_model" gtk_popover_new_from_model ::
Ptr Gtk.Widget.Widget ->
Ptr Gio.MenuModel.MenuModel ->
IO (Ptr Popover)
popoverNewFromModel ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a, Gio.MenuModel.IsMenuModel b) =>
Maybe (a)
-> b
-> m Popover
popoverNewFromModel :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsWidget a, IsMenuModel b) =>
Maybe a -> b -> m Popover
popoverNewFromModel Maybe a
relativeTo b
model = IO Popover -> m Popover
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Popover -> m Popover) -> IO Popover -> m Popover
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
maybeRelativeTo <- case Maybe a
relativeTo of
Maybe a
Nothing -> Ptr Widget -> IO (Ptr Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
forall a. Ptr a
nullPtr
Just a
jRelativeTo -> do
Ptr Widget
jRelativeTo' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
jRelativeTo
Ptr Widget -> IO (Ptr Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
jRelativeTo'
Ptr MenuModel
model' <- b -> IO (Ptr MenuModel)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
model
Ptr Popover
result <- Ptr Widget -> Ptr MenuModel -> IO (Ptr Popover)
gtk_popover_new_from_model Ptr Widget
maybeRelativeTo Ptr MenuModel
model'
Text -> Ptr Popover -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"popoverNewFromModel" Ptr Popover
result
Popover
result' <- ((ManagedPtr Popover -> Popover) -> Ptr Popover -> IO Popover
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Popover -> Popover
Popover) Ptr Popover
result
Maybe a -> (a -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe a
relativeTo a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
model
Popover -> IO Popover
forall (m :: * -> *) a. Monad m => a -> m a
return Popover
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "gtk_popover_bind_model" gtk_popover_bind_model ::
Ptr Popover ->
Ptr Gio.MenuModel.MenuModel ->
CString ->
IO ()
popoverBindModel ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a, Gio.MenuModel.IsMenuModel b) =>
a
-> Maybe (b)
-> Maybe (T.Text)
-> m ()
popoverBindModel :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsPopover a, IsMenuModel b) =>
a -> Maybe b -> Maybe Text -> m ()
popoverBindModel a
popover Maybe b
model Maybe Text
actionNamespace = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
Ptr MenuModel
maybeModel <- case Maybe b
model of
Maybe b
Nothing -> Ptr MenuModel -> IO (Ptr MenuModel)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr MenuModel
forall a. Ptr a
nullPtr
Just b
jModel -> do
Ptr MenuModel
jModel' <- b -> IO (Ptr MenuModel)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jModel
Ptr MenuModel -> IO (Ptr MenuModel)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr MenuModel
jModel'
Ptr CChar
maybeActionNamespace <- case Maybe Text
actionNamespace of
Maybe Text
Nothing -> Ptr CChar -> IO (Ptr CChar)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr CChar
forall a. Ptr a
nullPtr
Just Text
jActionNamespace -> do
Ptr CChar
jActionNamespace' <- Text -> IO (Ptr CChar)
textToCString Text
jActionNamespace
Ptr CChar -> IO (Ptr CChar)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr CChar
jActionNamespace'
Ptr Popover -> Ptr MenuModel -> Ptr CChar -> IO ()
gtk_popover_bind_model Ptr Popover
popover' Ptr MenuModel
maybeModel Ptr CChar
maybeActionNamespace
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
Maybe b -> (b -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe b
model b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
Ptr CChar -> IO ()
forall a. Ptr a -> IO ()
freeMem Ptr CChar
maybeActionNamespace
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PopoverBindModelMethodInfo
instance (signature ~ (Maybe (b) -> Maybe (T.Text) -> m ()), MonadIO m, IsPopover a, Gio.MenuModel.IsMenuModel b) => O.OverloadedMethod PopoverBindModelMethodInfo a signature where
overloadedMethod = popoverBindModel
instance O.OverloadedMethodInfo PopoverBindModelMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverBindModel",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverBindModel"
}
#endif
foreign import ccall "gtk_popover_get_constrain_to" gtk_popover_get_constrain_to ::
Ptr Popover ->
IO CUInt
popoverGetConstrainTo ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a) =>
a
-> m Gtk.Enums.PopoverConstraint
popoverGetConstrainTo :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsPopover a) =>
a -> m PopoverConstraint
popoverGetConstrainTo a
popover = IO PopoverConstraint -> m PopoverConstraint
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO PopoverConstraint -> m PopoverConstraint)
-> IO PopoverConstraint -> m PopoverConstraint
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
CUInt
result <- Ptr Popover -> IO CUInt
gtk_popover_get_constrain_to Ptr Popover
popover'
let result' :: PopoverConstraint
result' = (Int -> PopoverConstraint
forall a. Enum a => Int -> a
toEnum (Int -> PopoverConstraint)
-> (CUInt -> Int) -> CUInt -> PopoverConstraint
forall b c a. (b -> c) -> (a -> b) -> a -> c
. CUInt -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral) CUInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
PopoverConstraint -> IO PopoverConstraint
forall (m :: * -> *) a. Monad m => a -> m a
return PopoverConstraint
result'
#if defined(ENABLE_OVERLOADING)
data PopoverGetConstrainToMethodInfo
instance (signature ~ (m Gtk.Enums.PopoverConstraint), MonadIO m, IsPopover a) => O.OverloadedMethod PopoverGetConstrainToMethodInfo a signature where
overloadedMethod = popoverGetConstrainTo
instance O.OverloadedMethodInfo PopoverGetConstrainToMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverGetConstrainTo",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverGetConstrainTo"
}
#endif
foreign import ccall "gtk_popover_get_default_widget" gtk_popover_get_default_widget ::
Ptr Popover ->
IO (Ptr Gtk.Widget.Widget)
popoverGetDefaultWidget ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a) =>
a
-> m (Maybe Gtk.Widget.Widget)
popoverGetDefaultWidget :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsPopover a) =>
a -> m (Maybe Widget)
popoverGetDefaultWidget a
popover = IO (Maybe Widget) -> m (Maybe Widget)
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 Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
Ptr Widget
result <- Ptr Popover -> IO (Ptr Widget)
gtk_popover_get_default_widget Ptr Popover
popover'
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 (m :: * -> *) a. Monad m => a -> m a
return Widget
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
Maybe Widget -> IO (Maybe Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Widget
maybeResult
#if defined(ENABLE_OVERLOADING)
data PopoverGetDefaultWidgetMethodInfo
instance (signature ~ (m (Maybe Gtk.Widget.Widget)), MonadIO m, IsPopover a) => O.OverloadedMethod PopoverGetDefaultWidgetMethodInfo a signature where
overloadedMethod = popoverGetDefaultWidget
instance O.OverloadedMethodInfo PopoverGetDefaultWidgetMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverGetDefaultWidget",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverGetDefaultWidget"
}
#endif
foreign import ccall "gtk_popover_get_modal" gtk_popover_get_modal ::
Ptr Popover ->
IO CInt
popoverGetModal ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a) =>
a
-> m Bool
popoverGetModal :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsPopover a) =>
a -> m Bool
popoverGetModal a
popover = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
CInt
result <- Ptr Popover -> IO CInt
gtk_popover_get_modal Ptr Popover
popover'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data PopoverGetModalMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsPopover a) => O.OverloadedMethod PopoverGetModalMethodInfo a signature where
overloadedMethod = popoverGetModal
instance O.OverloadedMethodInfo PopoverGetModalMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverGetModal",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverGetModal"
}
#endif
foreign import ccall "gtk_popover_get_pointing_to" gtk_popover_get_pointing_to ::
Ptr Popover ->
Ptr Gdk.Rectangle.Rectangle ->
IO CInt
popoverGetPointingTo ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a) =>
a
-> m ((Bool, Gdk.Rectangle.Rectangle))
popoverGetPointingTo :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsPopover a) =>
a -> m (Bool, Rectangle)
popoverGetPointingTo a
popover = IO (Bool, Rectangle) -> m (Bool, Rectangle)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Bool, Rectangle) -> m (Bool, Rectangle))
-> IO (Bool, Rectangle) -> m (Bool, Rectangle)
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
Ptr Rectangle
rect <- Int -> IO (Ptr Rectangle)
forall a. GBoxed a => Int -> IO (Ptr a)
SP.callocBoxedBytes Int
16 :: IO (Ptr Gdk.Rectangle.Rectangle)
CInt
result <- Ptr Popover -> Ptr Rectangle -> IO CInt
gtk_popover_get_pointing_to Ptr Popover
popover' Ptr Rectangle
rect
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
Rectangle
rect' <- ((ManagedPtr Rectangle -> Rectangle)
-> Ptr Rectangle -> IO Rectangle
forall a.
(HasCallStack, GBoxed a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
wrapBoxed ManagedPtr Rectangle -> Rectangle
Gdk.Rectangle.Rectangle) Ptr Rectangle
rect
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
(Bool, Rectangle) -> IO (Bool, Rectangle)
forall (m :: * -> *) a. Monad m => a -> m a
return (Bool
result', Rectangle
rect')
#if defined(ENABLE_OVERLOADING)
data PopoverGetPointingToMethodInfo
instance (signature ~ (m ((Bool, Gdk.Rectangle.Rectangle))), MonadIO m, IsPopover a) => O.OverloadedMethod PopoverGetPointingToMethodInfo a signature where
overloadedMethod = popoverGetPointingTo
instance O.OverloadedMethodInfo PopoverGetPointingToMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverGetPointingTo",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverGetPointingTo"
}
#endif
foreign import ccall "gtk_popover_get_position" gtk_popover_get_position ::
Ptr Popover ->
IO CUInt
popoverGetPosition ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a) =>
a
-> m Gtk.Enums.PositionType
popoverGetPosition :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsPopover a) =>
a -> m PositionType
popoverGetPosition a
popover = IO PositionType -> m PositionType
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO PositionType -> m PositionType)
-> IO PositionType -> m PositionType
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
CUInt
result <- Ptr Popover -> IO CUInt
gtk_popover_get_position Ptr Popover
popover'
let result' :: PositionType
result' = (Int -> PositionType
forall a. Enum a => Int -> a
toEnum (Int -> PositionType) -> (CUInt -> Int) -> CUInt -> PositionType
forall b c a. (b -> c) -> (a -> b) -> a -> c
. CUInt -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral) CUInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
PositionType -> IO PositionType
forall (m :: * -> *) a. Monad m => a -> m a
return PositionType
result'
#if defined(ENABLE_OVERLOADING)
data PopoverGetPositionMethodInfo
instance (signature ~ (m Gtk.Enums.PositionType), MonadIO m, IsPopover a) => O.OverloadedMethod PopoverGetPositionMethodInfo a signature where
overloadedMethod = popoverGetPosition
instance O.OverloadedMethodInfo PopoverGetPositionMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverGetPosition",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverGetPosition"
}
#endif
foreign import ccall "gtk_popover_get_relative_to" gtk_popover_get_relative_to ::
Ptr Popover ->
IO (Ptr Gtk.Widget.Widget)
popoverGetRelativeTo ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a) =>
a
-> m Gtk.Widget.Widget
popoverGetRelativeTo :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsPopover a) =>
a -> m Widget
popoverGetRelativeTo a
popover = IO Widget -> m Widget
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Widget -> m Widget) -> IO Widget -> m Widget
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
Ptr Widget
result <- Ptr Popover -> IO (Ptr Widget)
gtk_popover_get_relative_to Ptr Popover
popover'
Text -> Ptr Widget -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"popoverGetRelativeTo" Ptr Widget
result
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
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
Widget -> IO Widget
forall (m :: * -> *) a. Monad m => a -> m a
return Widget
result'
#if defined(ENABLE_OVERLOADING)
data PopoverGetRelativeToMethodInfo
instance (signature ~ (m Gtk.Widget.Widget), MonadIO m, IsPopover a) => O.OverloadedMethod PopoverGetRelativeToMethodInfo a signature where
overloadedMethod = popoverGetRelativeTo
instance O.OverloadedMethodInfo PopoverGetRelativeToMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverGetRelativeTo",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverGetRelativeTo"
}
#endif
foreign import ccall "gtk_popover_get_transitions_enabled" gtk_popover_get_transitions_enabled ::
Ptr Popover ->
IO CInt
{-# DEPRECATED popoverGetTransitionsEnabled ["(Since version 3.22)","You can show or hide the popover without transitions"," using 'GI.Gtk.Objects.Widget.widgetShow' and 'GI.Gtk.Objects.Widget.widgetHide' while 'GI.Gtk.Objects.Popover.popoverPopup'"," and 'GI.Gtk.Objects.Popover.popoverPopdown' will use transitions."] #-}
popoverGetTransitionsEnabled ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a) =>
a
-> m Bool
popoverGetTransitionsEnabled :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsPopover a) =>
a -> m Bool
popoverGetTransitionsEnabled a
popover = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
CInt
result <- Ptr Popover -> IO CInt
gtk_popover_get_transitions_enabled Ptr Popover
popover'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data PopoverGetTransitionsEnabledMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsPopover a) => O.OverloadedMethod PopoverGetTransitionsEnabledMethodInfo a signature where
overloadedMethod = popoverGetTransitionsEnabled
instance O.OverloadedMethodInfo PopoverGetTransitionsEnabledMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverGetTransitionsEnabled",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverGetTransitionsEnabled"
}
#endif
foreign import ccall "gtk_popover_popdown" gtk_popover_popdown ::
Ptr Popover ->
IO ()
popoverPopdown ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a) =>
a
-> m ()
popoverPopdown :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsPopover a) =>
a -> m ()
popoverPopdown a
popover = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
Ptr Popover -> IO ()
gtk_popover_popdown Ptr Popover
popover'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PopoverPopdownMethodInfo
instance (signature ~ (m ()), MonadIO m, IsPopover a) => O.OverloadedMethod PopoverPopdownMethodInfo a signature where
overloadedMethod = popoverPopdown
instance O.OverloadedMethodInfo PopoverPopdownMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverPopdown",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverPopdown"
}
#endif
foreign import ccall "gtk_popover_popup" ::
Ptr Popover ->
IO ()
popoverPopup ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a) =>
a
-> m ()
a
popover = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
Ptr Popover -> IO ()
gtk_popover_popup Ptr Popover
popover'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PopoverPopupMethodInfo
instance (signature ~ (m ()), MonadIO m, IsPopover a) => O.OverloadedMethod PopoverPopupMethodInfo a signature where
overloadedMethod = popoverPopup
instance O.OverloadedMethodInfo PopoverPopupMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverPopup",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverPopup"
}
#endif
foreign import ccall "gtk_popover_set_constrain_to" gtk_popover_set_constrain_to ::
Ptr Popover ->
CUInt ->
IO ()
popoverSetConstrainTo ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a) =>
a
-> Gtk.Enums.PopoverConstraint
-> m ()
popoverSetConstrainTo :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsPopover a) =>
a -> PopoverConstraint -> m ()
popoverSetConstrainTo a
popover PopoverConstraint
constraint = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
let constraint' :: CUInt
constraint' = (Int -> CUInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CUInt)
-> (PopoverConstraint -> Int) -> PopoverConstraint -> CUInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. PopoverConstraint -> Int
forall a. Enum a => a -> Int
fromEnum) PopoverConstraint
constraint
Ptr Popover -> CUInt -> IO ()
gtk_popover_set_constrain_to Ptr Popover
popover' CUInt
constraint'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PopoverSetConstrainToMethodInfo
instance (signature ~ (Gtk.Enums.PopoverConstraint -> m ()), MonadIO m, IsPopover a) => O.OverloadedMethod PopoverSetConstrainToMethodInfo a signature where
overloadedMethod = popoverSetConstrainTo
instance O.OverloadedMethodInfo PopoverSetConstrainToMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverSetConstrainTo",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverSetConstrainTo"
}
#endif
foreign import ccall "gtk_popover_set_default_widget" gtk_popover_set_default_widget ::
Ptr Popover ->
Ptr Gtk.Widget.Widget ->
IO ()
popoverSetDefaultWidget ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a, Gtk.Widget.IsWidget b) =>
a
-> Maybe (b)
-> m ()
popoverSetDefaultWidget :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsPopover a, IsWidget b) =>
a -> Maybe b -> m ()
popoverSetDefaultWidget a
popover Maybe b
widget = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
Ptr Widget
maybeWidget <- case Maybe b
widget of
Maybe b
Nothing -> Ptr Widget -> IO (Ptr Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
forall a. Ptr a
nullPtr
Just b
jWidget -> do
Ptr Widget
jWidget' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jWidget
Ptr Widget -> IO (Ptr Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
jWidget'
Ptr Popover -> Ptr Widget -> IO ()
gtk_popover_set_default_widget Ptr Popover
popover' Ptr Widget
maybeWidget
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
Maybe b -> (b -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe b
widget b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PopoverSetDefaultWidgetMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsPopover a, Gtk.Widget.IsWidget b) => O.OverloadedMethod PopoverSetDefaultWidgetMethodInfo a signature where
overloadedMethod = popoverSetDefaultWidget
instance O.OverloadedMethodInfo PopoverSetDefaultWidgetMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverSetDefaultWidget",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverSetDefaultWidget"
}
#endif
foreign import ccall "gtk_popover_set_modal" gtk_popover_set_modal ::
Ptr Popover ->
CInt ->
IO ()
popoverSetModal ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a) =>
a
-> Bool
-> m ()
popoverSetModal :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsPopover a) =>
a -> Bool -> m ()
popoverSetModal a
popover Bool
modal = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
let modal' :: CInt
modal' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
modal
Ptr Popover -> CInt -> IO ()
gtk_popover_set_modal Ptr Popover
popover' CInt
modal'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PopoverSetModalMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsPopover a) => O.OverloadedMethod PopoverSetModalMethodInfo a signature where
overloadedMethod = popoverSetModal
instance O.OverloadedMethodInfo PopoverSetModalMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverSetModal",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverSetModal"
}
#endif
foreign import ccall "gtk_popover_set_pointing_to" gtk_popover_set_pointing_to ::
Ptr Popover ->
Ptr Gdk.Rectangle.Rectangle ->
IO ()
popoverSetPointingTo ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a) =>
a
-> Gdk.Rectangle.Rectangle
-> m ()
popoverSetPointingTo :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsPopover a) =>
a -> Rectangle -> m ()
popoverSetPointingTo a
popover Rectangle
rect = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
Ptr Rectangle
rect' <- Rectangle -> IO (Ptr Rectangle)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr Rectangle
rect
Ptr Popover -> Ptr Rectangle -> IO ()
gtk_popover_set_pointing_to Ptr Popover
popover' Ptr Rectangle
rect'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
Rectangle -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr Rectangle
rect
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PopoverSetPointingToMethodInfo
instance (signature ~ (Gdk.Rectangle.Rectangle -> m ()), MonadIO m, IsPopover a) => O.OverloadedMethod PopoverSetPointingToMethodInfo a signature where
overloadedMethod = popoverSetPointingTo
instance O.OverloadedMethodInfo PopoverSetPointingToMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverSetPointingTo",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverSetPointingTo"
}
#endif
foreign import ccall "gtk_popover_set_position" gtk_popover_set_position ::
Ptr Popover ->
CUInt ->
IO ()
popoverSetPosition ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a) =>
a
-> Gtk.Enums.PositionType
-> m ()
popoverSetPosition :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsPopover a) =>
a -> PositionType -> m ()
popoverSetPosition a
popover PositionType
position = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
let position' :: CUInt
position' = (Int -> CUInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CUInt) -> (PositionType -> Int) -> PositionType -> CUInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. PositionType -> Int
forall a. Enum a => a -> Int
fromEnum) PositionType
position
Ptr Popover -> CUInt -> IO ()
gtk_popover_set_position Ptr Popover
popover' CUInt
position'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PopoverSetPositionMethodInfo
instance (signature ~ (Gtk.Enums.PositionType -> m ()), MonadIO m, IsPopover a) => O.OverloadedMethod PopoverSetPositionMethodInfo a signature where
overloadedMethod = popoverSetPosition
instance O.OverloadedMethodInfo PopoverSetPositionMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverSetPosition",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverSetPosition"
}
#endif
foreign import ccall "gtk_popover_set_relative_to" gtk_popover_set_relative_to ::
Ptr Popover ->
Ptr Gtk.Widget.Widget ->
IO ()
popoverSetRelativeTo ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a, Gtk.Widget.IsWidget b) =>
a
-> Maybe (b)
-> m ()
popoverSetRelativeTo :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsPopover a, IsWidget b) =>
a -> Maybe b -> m ()
popoverSetRelativeTo a
popover Maybe b
relativeTo = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
Ptr Widget
maybeRelativeTo <- case Maybe b
relativeTo of
Maybe b
Nothing -> Ptr Widget -> IO (Ptr Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
forall a. Ptr a
nullPtr
Just b
jRelativeTo -> do
Ptr Widget
jRelativeTo' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jRelativeTo
Ptr Widget -> IO (Ptr Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
jRelativeTo'
Ptr Popover -> Ptr Widget -> IO ()
gtk_popover_set_relative_to Ptr Popover
popover' Ptr Widget
maybeRelativeTo
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
Maybe b -> (b -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe b
relativeTo b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PopoverSetRelativeToMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsPopover a, Gtk.Widget.IsWidget b) => O.OverloadedMethod PopoverSetRelativeToMethodInfo a signature where
overloadedMethod = popoverSetRelativeTo
instance O.OverloadedMethodInfo PopoverSetRelativeToMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverSetRelativeTo",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverSetRelativeTo"
}
#endif
foreign import ccall "gtk_popover_set_transitions_enabled" gtk_popover_set_transitions_enabled ::
Ptr Popover ->
CInt ->
IO ()
{-# DEPRECATED popoverSetTransitionsEnabled ["(Since version 3.22)","You can show or hide the popover without transitions"," using 'GI.Gtk.Objects.Widget.widgetShow' and 'GI.Gtk.Objects.Widget.widgetHide' while 'GI.Gtk.Objects.Popover.popoverPopup'"," and 'GI.Gtk.Objects.Popover.popoverPopdown' will use transitions."] #-}
popoverSetTransitionsEnabled ::
(B.CallStack.HasCallStack, MonadIO m, IsPopover a) =>
a
-> Bool
-> m ()
popoverSetTransitionsEnabled :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsPopover a) =>
a -> Bool -> m ()
popoverSetTransitionsEnabled a
popover Bool
transitionsEnabled = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Popover
popover' <- a -> IO (Ptr Popover)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
popover
let transitionsEnabled' :: CInt
transitionsEnabled' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
transitionsEnabled
Ptr Popover -> CInt -> IO ()
gtk_popover_set_transitions_enabled Ptr Popover
popover' CInt
transitionsEnabled'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
popover
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data PopoverSetTransitionsEnabledMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsPopover a) => O.OverloadedMethod PopoverSetTransitionsEnabledMethodInfo a signature where
overloadedMethod = popoverSetTransitionsEnabled
instance O.OverloadedMethodInfo PopoverSetTransitionsEnabledMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Gtk.Objects.Popover.popoverSetTransitionsEnabled",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-gtk-3.0.37/docs/GI-Gtk-Objects-Popover.html#v:popoverSetTransitionsEnabled"
}
#endif