{-# LANGUAGE ImplicitParams, RankNTypes, TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Dazzle.Objects.Tab
(
Tab(..) ,
IsTab ,
toTab ,
#if defined(ENABLE_OVERLOADING)
ResolveTabMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
TabGetActiveMethodInfo ,
#endif
tabGetActive ,
#if defined(ENABLE_OVERLOADING)
TabGetCanCloseMethodInfo ,
#endif
tabGetCanClose ,
#if defined(ENABLE_OVERLOADING)
TabGetEdgeMethodInfo ,
#endif
tabGetEdge ,
#if defined(ENABLE_OVERLOADING)
TabGetIconNameMethodInfo ,
#endif
tabGetIconName ,
#if defined(ENABLE_OVERLOADING)
TabGetStyleMethodInfo ,
#endif
tabGetStyle ,
#if defined(ENABLE_OVERLOADING)
TabGetTitleMethodInfo ,
#endif
tabGetTitle ,
#if defined(ENABLE_OVERLOADING)
TabGetWidgetMethodInfo ,
#endif
tabGetWidget ,
#if defined(ENABLE_OVERLOADING)
TabSetActiveMethodInfo ,
#endif
tabSetActive ,
#if defined(ENABLE_OVERLOADING)
TabSetCanCloseMethodInfo ,
#endif
tabSetCanClose ,
#if defined(ENABLE_OVERLOADING)
TabSetEdgeMethodInfo ,
#endif
tabSetEdge ,
#if defined(ENABLE_OVERLOADING)
TabSetGiconMethodInfo ,
#endif
tabSetGicon ,
#if defined(ENABLE_OVERLOADING)
TabSetIconNameMethodInfo ,
#endif
tabSetIconName ,
#if defined(ENABLE_OVERLOADING)
TabSetStyleMethodInfo ,
#endif
tabSetStyle ,
#if defined(ENABLE_OVERLOADING)
TabSetTitleMethodInfo ,
#endif
tabSetTitle ,
#if defined(ENABLE_OVERLOADING)
TabSetWidgetMethodInfo ,
#endif
tabSetWidget ,
#if defined(ENABLE_OVERLOADING)
TabActivePropertyInfo ,
#endif
constructTabActive ,
getTabActive ,
setTabActive ,
#if defined(ENABLE_OVERLOADING)
tabActive ,
#endif
#if defined(ENABLE_OVERLOADING)
TabCanClosePropertyInfo ,
#endif
constructTabCanClose ,
getTabCanClose ,
setTabCanClose ,
#if defined(ENABLE_OVERLOADING)
tabCanClose ,
#endif
#if defined(ENABLE_OVERLOADING)
TabEdgePropertyInfo ,
#endif
constructTabEdge ,
getTabEdge ,
setTabEdge ,
#if defined(ENABLE_OVERLOADING)
tabEdge ,
#endif
#if defined(ENABLE_OVERLOADING)
TabStylePropertyInfo ,
#endif
constructTabStyle ,
getTabStyle ,
setTabStyle ,
#if defined(ENABLE_OVERLOADING)
tabStyle ,
#endif
#if defined(ENABLE_OVERLOADING)
TabTitlePropertyInfo ,
#endif
constructTabTitle ,
getTabTitle ,
setTabTitle ,
#if defined(ENABLE_OVERLOADING)
tabTitle ,
#endif
#if defined(ENABLE_OVERLOADING)
TabWidgetPropertyInfo ,
#endif
constructTabWidget ,
getTabWidget ,
setTabWidget ,
#if defined(ENABLE_OVERLOADING)
tabWidget ,
#endif
TabClickedCallback ,
#if defined(ENABLE_OVERLOADING)
TabClickedSignalInfo ,
#endif
afterTabClicked ,
onTabClicked ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GHashTable as B.GHT
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Coerce as Coerce
import qualified Data.Text as T
import qualified Data.Kind as DK
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GHC.Records as R
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import {-# SOURCE #-} qualified GI.Dazzle.Flags as Dazzle.Flags
import {-# SOURCE #-} qualified GI.Dazzle.Objects.Bin as Dazzle.Bin
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gio.Interfaces.Icon as Gio.Icon
import qualified GI.Gtk.Enums as Gtk.Enums
import qualified GI.Gtk.Interfaces.Actionable as Gtk.Actionable
import qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import qualified GI.Gtk.Objects.Bin as Gtk.Bin
import qualified GI.Gtk.Objects.Container as Gtk.Container
import qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype Tab = Tab (SP.ManagedPtr Tab)
deriving (Tab -> Tab -> Bool
(Tab -> Tab -> Bool) -> (Tab -> Tab -> Bool) -> Eq Tab
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: Tab -> Tab -> Bool
== :: Tab -> Tab -> Bool
$c/= :: Tab -> Tab -> Bool
/= :: Tab -> Tab -> Bool
Eq)
instance SP.ManagedPtrNewtype Tab where
toManagedPtr :: Tab -> ManagedPtr Tab
toManagedPtr (Tab ManagedPtr Tab
p) = ManagedPtr Tab
p
foreign import ccall "dzl_tab_get_type"
c_dzl_tab_get_type :: IO B.Types.GType
instance B.Types.TypedObject Tab where
glibType :: IO GType
glibType = IO GType
c_dzl_tab_get_type
instance B.Types.GObject Tab
class (SP.GObject o, O.IsDescendantOf Tab o) => IsTab o
instance (SP.GObject o, O.IsDescendantOf Tab o) => IsTab o
instance O.HasParentTypes Tab
type instance O.ParentTypes Tab = '[Dazzle.Bin.Bin, Gtk.Bin.Bin, Gtk.Container.Container, Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Actionable.Actionable, Gtk.Buildable.Buildable]
toTab :: (MIO.MonadIO m, IsTab o) => o -> m Tab
toTab :: forall (m :: * -> *) o. (MonadIO m, IsTab o) => o -> m Tab
toTab = IO Tab -> m Tab
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Tab -> m Tab) -> (o -> IO Tab) -> o -> m Tab
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr Tab -> Tab) -> o -> IO Tab
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr Tab -> Tab
Tab
instance B.GValue.IsGValue (Maybe Tab) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_dzl_tab_get_type
gvalueSet_ :: Ptr GValue -> Maybe Tab -> IO ()
gvalueSet_ Ptr GValue
gv Maybe Tab
P.Nothing = Ptr GValue -> Ptr Tab -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr Tab
forall a. Ptr a
FP.nullPtr :: FP.Ptr Tab)
gvalueSet_ Ptr GValue
gv (P.Just Tab
obj) = Tab -> (Ptr Tab -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr Tab
obj (Ptr GValue -> Ptr Tab -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe Tab)
gvalueGet_ Ptr GValue
gv = do
Ptr Tab
ptr <- Ptr GValue -> IO (Ptr Tab)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr Tab)
if Ptr Tab
ptr Ptr Tab -> Ptr Tab -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr Tab
forall a. Ptr a
FP.nullPtr
then Tab -> Maybe Tab
forall a. a -> Maybe a
P.Just (Tab -> Maybe Tab) -> IO Tab -> IO (Maybe Tab)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr Tab -> Tab) -> Ptr Tab -> IO Tab
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr Tab -> Tab
Tab Ptr Tab
ptr
else Maybe Tab -> IO (Maybe Tab)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Tab
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveTabMethod (t :: Symbol) (o :: DK.Type) :: DK.Type where
ResolveTabMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveTabMethod "add" o = Gtk.Container.ContainerAddMethodInfo
ResolveTabMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolveTabMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveTabMethod "addDeviceEvents" o = Gtk.Widget.WidgetAddDeviceEventsMethodInfo
ResolveTabMethod "addEvents" o = Gtk.Widget.WidgetAddEventsMethodInfo
ResolveTabMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveTabMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveTabMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveTabMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveTabMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolveTabMethod "checkResize" o = Gtk.Container.ContainerCheckResizeMethodInfo
ResolveTabMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveTabMethod "childGetProperty" o = Gtk.Container.ContainerChildGetPropertyMethodInfo
ResolveTabMethod "childNotify" o = Gtk.Container.ContainerChildNotifyMethodInfo
ResolveTabMethod "childNotifyByPspec" o = Gtk.Container.ContainerChildNotifyByPspecMethodInfo
ResolveTabMethod "childSetProperty" o = Gtk.Container.ContainerChildSetPropertyMethodInfo
ResolveTabMethod "childType" o = Gtk.Container.ContainerChildTypeMethodInfo
ResolveTabMethod "classPath" o = Gtk.Widget.WidgetClassPathMethodInfo
ResolveTabMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveTabMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveTabMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveTabMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveTabMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveTabMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveTabMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveTabMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolveTabMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolveTabMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveTabMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolveTabMethod "dragBeginWithCoordinates" o = Gtk.Widget.WidgetDragBeginWithCoordinatesMethodInfo
ResolveTabMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveTabMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolveTabMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolveTabMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolveTabMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolveTabMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolveTabMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolveTabMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolveTabMethod "dragDestSetProxy" o = Gtk.Widget.WidgetDragDestSetProxyMethodInfo
ResolveTabMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolveTabMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolveTabMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolveTabMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolveTabMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolveTabMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolveTabMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolveTabMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolveTabMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolveTabMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolveTabMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolveTabMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolveTabMethod "dragSourceSetIconPixbuf" o = Gtk.Widget.WidgetDragSourceSetIconPixbufMethodInfo
ResolveTabMethod "dragSourceSetIconStock" o = Gtk.Widget.WidgetDragSourceSetIconStockMethodInfo
ResolveTabMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolveTabMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolveTabMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolveTabMethod "draw" o = Gtk.Widget.WidgetDrawMethodInfo
ResolveTabMethod "ensureStyle" o = Gtk.Widget.WidgetEnsureStyleMethodInfo
ResolveTabMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveTabMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolveTabMethod "forall" o = Gtk.Container.ContainerForallMethodInfo
ResolveTabMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveTabMethod "foreach" o = Gtk.Container.ContainerForeachMethodInfo
ResolveTabMethod "freezeChildNotify" o = Gtk.Widget.WidgetFreezeChildNotifyMethodInfo
ResolveTabMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveTabMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveTabMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolveTabMethod "grabDefault" o = Gtk.Widget.WidgetGrabDefaultMethodInfo
ResolveTabMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveTabMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolveTabMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveTabMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveTabMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolveTabMethod "hasRcStyle" o = Gtk.Widget.WidgetHasRcStyleMethodInfo
ResolveTabMethod "hasScreen" o = Gtk.Widget.WidgetHasScreenMethodInfo
ResolveTabMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveTabMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveTabMethod "hideOnDelete" o = Gtk.Widget.WidgetHideOnDeleteMethodInfo
ResolveTabMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveTabMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveTabMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolveTabMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveTabMethod "intersect" o = Gtk.Widget.WidgetIntersectMethodInfo
ResolveTabMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveTabMethod "isComposited" o = Gtk.Widget.WidgetIsCompositedMethodInfo
ResolveTabMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveTabMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveTabMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveTabMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveTabMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolveTabMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveTabMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveTabMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolveTabMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolveTabMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveTabMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveTabMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveTabMethod "modifyBase" o = Gtk.Widget.WidgetModifyBaseMethodInfo
ResolveTabMethod "modifyBg" o = Gtk.Widget.WidgetModifyBgMethodInfo
ResolveTabMethod "modifyCursor" o = Gtk.Widget.WidgetModifyCursorMethodInfo
ResolveTabMethod "modifyFg" o = Gtk.Widget.WidgetModifyFgMethodInfo
ResolveTabMethod "modifyFont" o = Gtk.Widget.WidgetModifyFontMethodInfo
ResolveTabMethod "modifyStyle" o = Gtk.Widget.WidgetModifyStyleMethodInfo
ResolveTabMethod "modifyText" o = Gtk.Widget.WidgetModifyTextMethodInfo
ResolveTabMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveTabMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveTabMethod "overrideBackgroundColor" o = Gtk.Widget.WidgetOverrideBackgroundColorMethodInfo
ResolveTabMethod "overrideColor" o = Gtk.Widget.WidgetOverrideColorMethodInfo
ResolveTabMethod "overrideCursor" o = Gtk.Widget.WidgetOverrideCursorMethodInfo
ResolveTabMethod "overrideFont" o = Gtk.Widget.WidgetOverrideFontMethodInfo
ResolveTabMethod "overrideSymbolicColor" o = Gtk.Widget.WidgetOverrideSymbolicColorMethodInfo
ResolveTabMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveTabMethod "path" o = Gtk.Widget.WidgetPathMethodInfo
ResolveTabMethod "propagateDraw" o = Gtk.Container.ContainerPropagateDrawMethodInfo
ResolveTabMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveTabMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolveTabMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveTabMethod "queueDrawArea" o = Gtk.Widget.WidgetQueueDrawAreaMethodInfo
ResolveTabMethod "queueDrawRegion" o = Gtk.Widget.WidgetQueueDrawRegionMethodInfo
ResolveTabMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveTabMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolveTabMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveTabMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveTabMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveTabMethod "regionIntersect" o = Gtk.Widget.WidgetRegionIntersectMethodInfo
ResolveTabMethod "registerWindow" o = Gtk.Widget.WidgetRegisterWindowMethodInfo
ResolveTabMethod "remove" o = Gtk.Container.ContainerRemoveMethodInfo
ResolveTabMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolveTabMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveTabMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveTabMethod "renderIcon" o = Gtk.Widget.WidgetRenderIconMethodInfo
ResolveTabMethod "renderIconPixbuf" o = Gtk.Widget.WidgetRenderIconPixbufMethodInfo
ResolveTabMethod "reparent" o = Gtk.Widget.WidgetReparentMethodInfo
ResolveTabMethod "resetRcStyles" o = Gtk.Widget.WidgetResetRcStylesMethodInfo
ResolveTabMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolveTabMethod "resizeChildren" o = Gtk.Container.ContainerResizeChildrenMethodInfo
ResolveTabMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveTabMethod "sendExpose" o = Gtk.Widget.WidgetSendExposeMethodInfo
ResolveTabMethod "sendFocusChange" o = Gtk.Widget.WidgetSendFocusChangeMethodInfo
ResolveTabMethod "shapeCombineRegion" o = Gtk.Widget.WidgetShapeCombineRegionMethodInfo
ResolveTabMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveTabMethod "showAll" o = Gtk.Widget.WidgetShowAllMethodInfo
ResolveTabMethod "showNow" o = Gtk.Widget.WidgetShowNowMethodInfo
ResolveTabMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveTabMethod "sizeAllocateWithBaseline" o = Gtk.Widget.WidgetSizeAllocateWithBaselineMethodInfo
ResolveTabMethod "sizeRequest" o = Gtk.Widget.WidgetSizeRequestMethodInfo
ResolveTabMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveTabMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveTabMethod "styleAttach" o = Gtk.Widget.WidgetStyleAttachMethodInfo
ResolveTabMethod "styleGetProperty" o = Gtk.Widget.WidgetStyleGetPropertyMethodInfo
ResolveTabMethod "thawChildNotify" o = Gtk.Widget.WidgetThawChildNotifyMethodInfo
ResolveTabMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveTabMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveTabMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveTabMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveTabMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveTabMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveTabMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveTabMethod "unregisterWindow" o = Gtk.Widget.WidgetUnregisterWindowMethodInfo
ResolveTabMethod "unsetFocusChain" o = Gtk.Container.ContainerUnsetFocusChainMethodInfo
ResolveTabMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveTabMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveTabMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveTabMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolveTabMethod "getActionName" o = Gtk.Actionable.ActionableGetActionNameMethodInfo
ResolveTabMethod "getActionTargetValue" o = Gtk.Actionable.ActionableGetActionTargetValueMethodInfo
ResolveTabMethod "getActive" o = TabGetActiveMethodInfo
ResolveTabMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveTabMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveTabMethod "getAllocatedSize" o = Gtk.Widget.WidgetGetAllocatedSizeMethodInfo
ResolveTabMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveTabMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveTabMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveTabMethod "getAppPaintable" o = Gtk.Widget.WidgetGetAppPaintableMethodInfo
ResolveTabMethod "getBorderWidth" o = Gtk.Container.ContainerGetBorderWidthMethodInfo
ResolveTabMethod "getCanClose" o = TabGetCanCloseMethodInfo
ResolveTabMethod "getCanDefault" o = Gtk.Widget.WidgetGetCanDefaultMethodInfo
ResolveTabMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveTabMethod "getChild" o = Gtk.Bin.BinGetChildMethodInfo
ResolveTabMethod "getChildRequisition" o = Gtk.Widget.WidgetGetChildRequisitionMethodInfo
ResolveTabMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveTabMethod "getChildren" o = Gtk.Container.ContainerGetChildrenMethodInfo
ResolveTabMethod "getClip" o = Gtk.Widget.WidgetGetClipMethodInfo
ResolveTabMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveTabMethod "getCompositeName" o = Gtk.Widget.WidgetGetCompositeNameMethodInfo
ResolveTabMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveTabMethod "getDeviceEnabled" o = Gtk.Widget.WidgetGetDeviceEnabledMethodInfo
ResolveTabMethod "getDeviceEvents" o = Gtk.Widget.WidgetGetDeviceEventsMethodInfo
ResolveTabMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveTabMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveTabMethod "getDoubleBuffered" o = Gtk.Widget.WidgetGetDoubleBufferedMethodInfo
ResolveTabMethod "getEdge" o = TabGetEdgeMethodInfo
ResolveTabMethod "getEvents" o = Gtk.Widget.WidgetGetEventsMethodInfo
ResolveTabMethod "getFocusChain" o = Gtk.Container.ContainerGetFocusChainMethodInfo
ResolveTabMethod "getFocusChild" o = Gtk.Container.ContainerGetFocusChildMethodInfo
ResolveTabMethod "getFocusHadjustment" o = Gtk.Container.ContainerGetFocusHadjustmentMethodInfo
ResolveTabMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveTabMethod "getFocusVadjustment" o = Gtk.Container.ContainerGetFocusVadjustmentMethodInfo
ResolveTabMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveTabMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveTabMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveTabMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveTabMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveTabMethod "getHasWindow" o = Gtk.Widget.WidgetGetHasWindowMethodInfo
ResolveTabMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveTabMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveTabMethod "getIconName" o = TabGetIconNameMethodInfo
ResolveTabMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveTabMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveTabMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveTabMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveTabMethod "getMarginLeft" o = Gtk.Widget.WidgetGetMarginLeftMethodInfo
ResolveTabMethod "getMarginRight" o = Gtk.Widget.WidgetGetMarginRightMethodInfo
ResolveTabMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveTabMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveTabMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolveTabMethod "getModifierStyle" o = Gtk.Widget.WidgetGetModifierStyleMethodInfo
ResolveTabMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveTabMethod "getNoShowAll" o = Gtk.Widget.WidgetGetNoShowAllMethodInfo
ResolveTabMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveTabMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveTabMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveTabMethod "getParentWindow" o = Gtk.Widget.WidgetGetParentWindowMethodInfo
ResolveTabMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolveTabMethod "getPathForChild" o = Gtk.Container.ContainerGetPathForChildMethodInfo
ResolveTabMethod "getPointer" o = Gtk.Widget.WidgetGetPointerMethodInfo
ResolveTabMethod "getPreferredHeight" o = Gtk.Widget.WidgetGetPreferredHeightMethodInfo
ResolveTabMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.Widget.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo
ResolveTabMethod "getPreferredHeightForWidth" o = Gtk.Widget.WidgetGetPreferredHeightForWidthMethodInfo
ResolveTabMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveTabMethod "getPreferredWidth" o = Gtk.Widget.WidgetGetPreferredWidthMethodInfo
ResolveTabMethod "getPreferredWidthForHeight" o = Gtk.Widget.WidgetGetPreferredWidthForHeightMethodInfo
ResolveTabMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveTabMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveTabMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveTabMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveTabMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveTabMethod "getRequisition" o = Gtk.Widget.WidgetGetRequisitionMethodInfo
ResolveTabMethod "getResizeMode" o = Gtk.Container.ContainerGetResizeModeMethodInfo
ResolveTabMethod "getRootWindow" o = Gtk.Widget.WidgetGetRootWindowMethodInfo
ResolveTabMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveTabMethod "getScreen" o = Gtk.Widget.WidgetGetScreenMethodInfo
ResolveTabMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveTabMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveTabMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveTabMethod "getState" o = Gtk.Widget.WidgetGetStateMethodInfo
ResolveTabMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveTabMethod "getStyle" o = TabGetStyleMethodInfo
ResolveTabMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveTabMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveTabMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveTabMethod "getTitle" o = TabGetTitleMethodInfo
ResolveTabMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveTabMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveTabMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolveTabMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolveTabMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveTabMethod "getValignWithBaseline" o = Gtk.Widget.WidgetGetValignWithBaselineMethodInfo
ResolveTabMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveTabMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveTabMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveTabMethod "getVisual" o = Gtk.Widget.WidgetGetVisualMethodInfo
ResolveTabMethod "getWidget" o = TabGetWidgetMethodInfo
ResolveTabMethod "getWindow" o = Gtk.Widget.WidgetGetWindowMethodInfo
ResolveTabMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolveTabMethod "setActionName" o = Gtk.Actionable.ActionableSetActionNameMethodInfo
ResolveTabMethod "setActionTargetValue" o = Gtk.Actionable.ActionableSetActionTargetValueMethodInfo
ResolveTabMethod "setActive" o = TabSetActiveMethodInfo
ResolveTabMethod "setAllocation" o = Gtk.Widget.WidgetSetAllocationMethodInfo
ResolveTabMethod "setAppPaintable" o = Gtk.Widget.WidgetSetAppPaintableMethodInfo
ResolveTabMethod "setBorderWidth" o = Gtk.Container.ContainerSetBorderWidthMethodInfo
ResolveTabMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveTabMethod "setCanClose" o = TabSetCanCloseMethodInfo
ResolveTabMethod "setCanDefault" o = Gtk.Widget.WidgetSetCanDefaultMethodInfo
ResolveTabMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveTabMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveTabMethod "setClip" o = Gtk.Widget.WidgetSetClipMethodInfo
ResolveTabMethod "setCompositeName" o = Gtk.Widget.WidgetSetCompositeNameMethodInfo
ResolveTabMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveTabMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveTabMethod "setDetailedActionName" o = Gtk.Actionable.ActionableSetDetailedActionNameMethodInfo
ResolveTabMethod "setDeviceEnabled" o = Gtk.Widget.WidgetSetDeviceEnabledMethodInfo
ResolveTabMethod "setDeviceEvents" o = Gtk.Widget.WidgetSetDeviceEventsMethodInfo
ResolveTabMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveTabMethod "setDoubleBuffered" o = Gtk.Widget.WidgetSetDoubleBufferedMethodInfo
ResolveTabMethod "setEdge" o = TabSetEdgeMethodInfo
ResolveTabMethod "setEvents" o = Gtk.Widget.WidgetSetEventsMethodInfo
ResolveTabMethod "setFocusChain" o = Gtk.Container.ContainerSetFocusChainMethodInfo
ResolveTabMethod "setFocusChild" o = Gtk.Container.ContainerSetFocusChildMethodInfo
ResolveTabMethod "setFocusHadjustment" o = Gtk.Container.ContainerSetFocusHadjustmentMethodInfo
ResolveTabMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveTabMethod "setFocusVadjustment" o = Gtk.Container.ContainerSetFocusVadjustmentMethodInfo
ResolveTabMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveTabMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveTabMethod "setGicon" o = TabSetGiconMethodInfo
ResolveTabMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveTabMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveTabMethod "setHasWindow" o = Gtk.Widget.WidgetSetHasWindowMethodInfo
ResolveTabMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveTabMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveTabMethod "setIconName" o = TabSetIconNameMethodInfo
ResolveTabMethod "setMapped" o = Gtk.Widget.WidgetSetMappedMethodInfo
ResolveTabMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveTabMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveTabMethod "setMarginLeft" o = Gtk.Widget.WidgetSetMarginLeftMethodInfo
ResolveTabMethod "setMarginRight" o = Gtk.Widget.WidgetSetMarginRightMethodInfo
ResolveTabMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveTabMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveTabMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveTabMethod "setNoShowAll" o = Gtk.Widget.WidgetSetNoShowAllMethodInfo
ResolveTabMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveTabMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveTabMethod "setParentWindow" o = Gtk.Widget.WidgetSetParentWindowMethodInfo
ResolveTabMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveTabMethod "setRealized" o = Gtk.Widget.WidgetSetRealizedMethodInfo
ResolveTabMethod "setReallocateRedraws" o = Gtk.Container.ContainerSetReallocateRedrawsMethodInfo
ResolveTabMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveTabMethod "setRedrawOnAllocate" o = Gtk.Widget.WidgetSetRedrawOnAllocateMethodInfo
ResolveTabMethod "setResizeMode" o = Gtk.Container.ContainerSetResizeModeMethodInfo
ResolveTabMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveTabMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveTabMethod "setState" o = Gtk.Widget.WidgetSetStateMethodInfo
ResolveTabMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveTabMethod "setStyle" o = TabSetStyleMethodInfo
ResolveTabMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveTabMethod "setTitle" o = TabSetTitleMethodInfo
ResolveTabMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveTabMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveTabMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolveTabMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveTabMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveTabMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveTabMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveTabMethod "setVisual" o = Gtk.Widget.WidgetSetVisualMethodInfo
ResolveTabMethod "setWidget" o = TabSetWidgetMethodInfo
ResolveTabMethod "setWindow" o = Gtk.Widget.WidgetSetWindowMethodInfo
ResolveTabMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveTabMethod t Tab, O.OverloadedMethod info Tab p) => OL.IsLabel t (Tab -> 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 ~ ResolveTabMethod t Tab, O.OverloadedMethod info Tab p, R.HasField t Tab p) => R.HasField t Tab p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveTabMethod t Tab, O.OverloadedMethodInfo info Tab) => OL.IsLabel t (O.MethodProxy info Tab) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
type TabClickedCallback =
IO ()
type C_TabClickedCallback =
Ptr Tab ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TabClickedCallback :: C_TabClickedCallback -> IO (FunPtr C_TabClickedCallback)
wrap_TabClickedCallback ::
GObject a => (a -> TabClickedCallback) ->
C_TabClickedCallback
wrap_TabClickedCallback :: forall a. GObject a => (a -> IO ()) -> C_TabClickedCallback
wrap_TabClickedCallback a -> IO ()
gi'cb Ptr Tab
gi'selfPtr Ptr ()
_ = do
Ptr Tab -> (Tab -> IO ()) -> IO ()
forall o b.
(HasCallStack, GObject o) =>
Ptr o -> (o -> IO b) -> IO b
B.ManagedPtr.withNewObject Ptr Tab
gi'selfPtr ((Tab -> IO ()) -> IO ()) -> (Tab -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \Tab
gi'self -> a -> IO ()
gi'cb (Tab -> a
forall a b. Coercible a b => a -> b
Coerce.coerce Tab
gi'self)
onTabClicked :: (IsTab a, MonadIO m) => a -> ((?self :: a) => TabClickedCallback) -> m SignalHandlerId
onTabClicked :: forall a (m :: * -> *).
(IsTab a, MonadIO m) =>
a -> ((?self::a) => IO ()) -> m SignalHandlerId
onTabClicked a
obj (?self::a) => IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let wrapped :: a -> IO ()
wrapped a
self = let ?self = a
?self::a
self in IO ()
(?self::a) => IO ()
cb
let wrapped' :: C_TabClickedCallback
wrapped' = (a -> IO ()) -> C_TabClickedCallback
forall a. GObject a => (a -> IO ()) -> C_TabClickedCallback
wrap_TabClickedCallback a -> IO ()
wrapped
FunPtr C_TabClickedCallback
wrapped'' <- C_TabClickedCallback -> IO (FunPtr C_TabClickedCallback)
mk_TabClickedCallback C_TabClickedCallback
wrapped'
a
-> Text
-> FunPtr C_TabClickedCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"clicked" FunPtr C_TabClickedCallback
wrapped'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterTabClicked :: (IsTab a, MonadIO m) => a -> ((?self :: a) => TabClickedCallback) -> m SignalHandlerId
afterTabClicked :: forall a (m :: * -> *).
(IsTab a, MonadIO m) =>
a -> ((?self::a) => IO ()) -> m SignalHandlerId
afterTabClicked a
obj (?self::a) => IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let wrapped :: a -> IO ()
wrapped a
self = let ?self = a
?self::a
self in IO ()
(?self::a) => IO ()
cb
let wrapped' :: C_TabClickedCallback
wrapped' = (a -> IO ()) -> C_TabClickedCallback
forall a. GObject a => (a -> IO ()) -> C_TabClickedCallback
wrap_TabClickedCallback a -> IO ()
wrapped
FunPtr C_TabClickedCallback
wrapped'' <- C_TabClickedCallback -> IO (FunPtr C_TabClickedCallback)
mk_TabClickedCallback C_TabClickedCallback
wrapped'
a
-> Text
-> FunPtr C_TabClickedCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"clicked" FunPtr C_TabClickedCallback
wrapped'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data TabClickedSignalInfo
instance SignalInfo TabClickedSignalInfo where
type HaskellCallbackType TabClickedSignalInfo = TabClickedCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_TabClickedCallback cb
cb'' <- mk_TabClickedCallback cb'
connectSignalFunPtr obj "clicked" cb'' connectMode detail
dbgSignalInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab::clicked"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#g:signal:clicked"})
#endif
getTabActive :: (MonadIO m, IsTab o) => o -> m Bool
getTabActive :: forall (m :: * -> *) o. (MonadIO m, IsTab o) => o -> m Bool
getTabActive o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"active"
setTabActive :: (MonadIO m, IsTab o) => o -> Bool -> m ()
setTabActive :: forall (m :: * -> *) o. (MonadIO m, IsTab o) => o -> Bool -> m ()
setTabActive o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"active" Bool
val
constructTabActive :: (IsTab o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructTabActive :: forall o (m :: * -> *).
(IsTab o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructTabActive Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"active" Bool
val
#if defined(ENABLE_OVERLOADING)
data TabActivePropertyInfo
instance AttrInfo TabActivePropertyInfo where
type AttrAllowedOps TabActivePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint TabActivePropertyInfo = IsTab
type AttrSetTypeConstraint TabActivePropertyInfo = (~) Bool
type AttrTransferTypeConstraint TabActivePropertyInfo = (~) Bool
type AttrTransferType TabActivePropertyInfo = Bool
type AttrGetType TabActivePropertyInfo = Bool
type AttrLabel TabActivePropertyInfo = "active"
type AttrOrigin TabActivePropertyInfo = Tab
attrGet = getTabActive
attrSet = setTabActive
attrTransfer _ v = do
return v
attrConstruct = constructTabActive
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.active"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#g:attr:active"
})
#endif
getTabCanClose :: (MonadIO m, IsTab o) => o -> m Bool
getTabCanClose :: forall (m :: * -> *) o. (MonadIO m, IsTab o) => o -> m Bool
getTabCanClose o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"can-close"
setTabCanClose :: (MonadIO m, IsTab o) => o -> Bool -> m ()
setTabCanClose :: forall (m :: * -> *) o. (MonadIO m, IsTab o) => o -> Bool -> m ()
setTabCanClose o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"can-close" Bool
val
constructTabCanClose :: (IsTab o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructTabCanClose :: forall o (m :: * -> *).
(IsTab o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructTabCanClose Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"can-close" Bool
val
#if defined(ENABLE_OVERLOADING)
data TabCanClosePropertyInfo
instance AttrInfo TabCanClosePropertyInfo where
type AttrAllowedOps TabCanClosePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint TabCanClosePropertyInfo = IsTab
type AttrSetTypeConstraint TabCanClosePropertyInfo = (~) Bool
type AttrTransferTypeConstraint TabCanClosePropertyInfo = (~) Bool
type AttrTransferType TabCanClosePropertyInfo = Bool
type AttrGetType TabCanClosePropertyInfo = Bool
type AttrLabel TabCanClosePropertyInfo = "can-close"
type AttrOrigin TabCanClosePropertyInfo = Tab
attrGet = getTabCanClose
attrSet = setTabCanClose
attrTransfer _ v = do
return v
attrConstruct = constructTabCanClose
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.canClose"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#g:attr:canClose"
})
#endif
getTabEdge :: (MonadIO m, IsTab o) => o -> m Gtk.Enums.PositionType
getTabEdge :: forall (m :: * -> *) o. (MonadIO m, IsTab o) => o -> m PositionType
getTabEdge o
obj = IO PositionType -> m PositionType
forall a. IO a -> m a
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
"edge"
setTabEdge :: (MonadIO m, IsTab o) => o -> Gtk.Enums.PositionType -> m ()
setTabEdge :: forall (m :: * -> *) o.
(MonadIO m, IsTab o) =>
o -> PositionType -> m ()
setTabEdge o
obj PositionType
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> PositionType -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj String
"edge" PositionType
val
constructTabEdge :: (IsTab o, MIO.MonadIO m) => Gtk.Enums.PositionType -> m (GValueConstruct o)
constructTabEdge :: forall o (m :: * -> *).
(IsTab o, MonadIO m) =>
PositionType -> m (GValueConstruct o)
constructTabEdge PositionType
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> PositionType -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum String
"edge" PositionType
val
#if defined(ENABLE_OVERLOADING)
data TabEdgePropertyInfo
instance AttrInfo TabEdgePropertyInfo where
type AttrAllowedOps TabEdgePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint TabEdgePropertyInfo = IsTab
type AttrSetTypeConstraint TabEdgePropertyInfo = (~) Gtk.Enums.PositionType
type AttrTransferTypeConstraint TabEdgePropertyInfo = (~) Gtk.Enums.PositionType
type AttrTransferType TabEdgePropertyInfo = Gtk.Enums.PositionType
type AttrGetType TabEdgePropertyInfo = Gtk.Enums.PositionType
type AttrLabel TabEdgePropertyInfo = "edge"
type AttrOrigin TabEdgePropertyInfo = Tab
attrGet = getTabEdge
attrSet = setTabEdge
attrTransfer _ v = do
return v
attrConstruct = constructTabEdge
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.edge"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#g:attr:edge"
})
#endif
getTabStyle :: (MonadIO m, IsTab o) => o -> m [Dazzle.Flags.TabStyle]
getTabStyle :: forall (m :: * -> *) o. (MonadIO m, IsTab o) => o -> m [TabStyle]
getTabStyle o
obj = IO [TabStyle] -> m [TabStyle]
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO [TabStyle] -> m [TabStyle]) -> IO [TabStyle] -> m [TabStyle]
forall a b. (a -> b) -> a -> b
$ o -> String -> IO [TabStyle]
forall a b.
(GObject a, IsGFlag b, BoxedFlags b) =>
a -> String -> IO [b]
B.Properties.getObjectPropertyFlags o
obj String
"style"
setTabStyle :: (MonadIO m, IsTab o) => o -> [Dazzle.Flags.TabStyle] -> m ()
setTabStyle :: forall (m :: * -> *) o.
(MonadIO m, IsTab o) =>
o -> [TabStyle] -> m ()
setTabStyle o
obj [TabStyle]
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> [TabStyle] -> IO ()
forall a b.
(IsGFlag b, BoxedFlags b, GObject a) =>
a -> String -> [b] -> IO ()
B.Properties.setObjectPropertyFlags o
obj String
"style" [TabStyle]
val
constructTabStyle :: (IsTab o, MIO.MonadIO m) => [Dazzle.Flags.TabStyle] -> m (GValueConstruct o)
constructTabStyle :: forall o (m :: * -> *).
(IsTab o, MonadIO m) =>
[TabStyle] -> m (GValueConstruct o)
constructTabStyle [TabStyle]
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> [TabStyle] -> IO (GValueConstruct o)
forall a o.
(IsGFlag a, BoxedFlags a) =>
String -> [a] -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyFlags String
"style" [TabStyle]
val
#if defined(ENABLE_OVERLOADING)
data TabStylePropertyInfo
instance AttrInfo TabStylePropertyInfo where
type AttrAllowedOps TabStylePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint TabStylePropertyInfo = IsTab
type AttrSetTypeConstraint TabStylePropertyInfo = (~) [Dazzle.Flags.TabStyle]
type AttrTransferTypeConstraint TabStylePropertyInfo = (~) [Dazzle.Flags.TabStyle]
type AttrTransferType TabStylePropertyInfo = [Dazzle.Flags.TabStyle]
type AttrGetType TabStylePropertyInfo = [Dazzle.Flags.TabStyle]
type AttrLabel TabStylePropertyInfo = "style"
type AttrOrigin TabStylePropertyInfo = Tab
attrGet = getTabStyle
attrSet = setTabStyle
attrTransfer _ v = do
return v
attrConstruct = constructTabStyle
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.style"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#g:attr:style"
})
#endif
getTabTitle :: (MonadIO m, IsTab o) => o -> m T.Text
getTabTitle :: forall (m :: * -> *) o. (MonadIO m, IsTab o) => o -> m Text
getTabTitle o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getTabTitle" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"title"
setTabTitle :: (MonadIO m, IsTab o) => o -> T.Text -> m ()
setTabTitle :: forall (m :: * -> *) o. (MonadIO m, IsTab o) => o -> Text -> m ()
setTabTitle o
obj Text
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"title" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructTabTitle :: (IsTab o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructTabTitle :: forall o (m :: * -> *).
(IsTab o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructTabTitle Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"title" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data TabTitlePropertyInfo
instance AttrInfo TabTitlePropertyInfo where
type AttrAllowedOps TabTitlePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint TabTitlePropertyInfo = IsTab
type AttrSetTypeConstraint TabTitlePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint TabTitlePropertyInfo = (~) T.Text
type AttrTransferType TabTitlePropertyInfo = T.Text
type AttrGetType TabTitlePropertyInfo = T.Text
type AttrLabel TabTitlePropertyInfo = "title"
type AttrOrigin TabTitlePropertyInfo = Tab
attrGet = getTabTitle
attrSet = setTabTitle
attrTransfer _ v = do
return v
attrConstruct = constructTabTitle
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.title"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#g:attr:title"
})
#endif
getTabWidget :: (MonadIO m, IsTab o) => o -> m (Maybe Gtk.Widget.Widget)
getTabWidget :: forall (m :: * -> *) o.
(MonadIO m, IsTab o) =>
o -> m (Maybe Widget)
getTabWidget o
obj = IO (Maybe Widget) -> m (Maybe Widget)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Widget) -> m (Maybe Widget))
-> IO (Maybe Widget) -> m (Maybe Widget)
forall a b. (a -> b) -> a -> b
$ o -> String -> (ManagedPtr Widget -> Widget) -> IO (Maybe Widget)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj String
"widget" ManagedPtr Widget -> Widget
Gtk.Widget.Widget
setTabWidget :: (MonadIO m, IsTab o, Gtk.Widget.IsWidget a) => o -> a -> m ()
setTabWidget :: forall (m :: * -> *) o a.
(MonadIO m, IsTab o, IsWidget a) =>
o -> a -> m ()
setTabWidget o
obj a
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe a -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"widget" (a -> Maybe a
forall a. a -> Maybe a
Just a
val)
constructTabWidget :: (IsTab o, MIO.MonadIO m, Gtk.Widget.IsWidget a) => a -> m (GValueConstruct o)
constructTabWidget :: forall o (m :: * -> *) a.
(IsTab o, MonadIO m, IsWidget a) =>
a -> m (GValueConstruct o)
constructTabWidget a
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe a -> IO (GValueConstruct o)
forall a o.
GObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyObject String
"widget" (a -> Maybe a
forall a. a -> Maybe a
P.Just a
val)
#if defined(ENABLE_OVERLOADING)
data TabWidgetPropertyInfo
instance AttrInfo TabWidgetPropertyInfo where
type AttrAllowedOps TabWidgetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint TabWidgetPropertyInfo = IsTab
type AttrSetTypeConstraint TabWidgetPropertyInfo = Gtk.Widget.IsWidget
type AttrTransferTypeConstraint TabWidgetPropertyInfo = Gtk.Widget.IsWidget
type AttrTransferType TabWidgetPropertyInfo = Gtk.Widget.Widget
type AttrGetType TabWidgetPropertyInfo = (Maybe Gtk.Widget.Widget)
type AttrLabel TabWidgetPropertyInfo = "widget"
type AttrOrigin TabWidgetPropertyInfo = Tab
attrGet = getTabWidget
attrSet = setTabWidget
attrTransfer _ v = do
unsafeCastTo Gtk.Widget.Widget v
attrConstruct = constructTabWidget
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.widget"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#g:attr:widget"
})
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList Tab
type instance O.AttributeList Tab = TabAttributeList
type TabAttributeList = ('[ '("actionName", Gtk.Actionable.ActionableActionNamePropertyInfo), '("actionTarget", Gtk.Actionable.ActionableActionTargetPropertyInfo), '("active", TabActivePropertyInfo), '("appPaintable", Gtk.Widget.WidgetAppPaintablePropertyInfo), '("borderWidth", Gtk.Container.ContainerBorderWidthPropertyInfo), '("canClose", TabCanClosePropertyInfo), '("canDefault", Gtk.Widget.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("child", Gtk.Container.ContainerChildPropertyInfo), '("compositeChild", Gtk.Widget.WidgetCompositeChildPropertyInfo), '("doubleBuffered", Gtk.Widget.WidgetDoubleBufferedPropertyInfo), '("edge", TabEdgePropertyInfo), '("events", Gtk.Widget.WidgetEventsPropertyInfo), '("expand", Gtk.Widget.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("isFocus", Gtk.Widget.WidgetIsFocusPropertyInfo), '("margin", Gtk.Widget.WidgetMarginPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.Widget.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.Widget.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("noShowAll", Gtk.Widget.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("resizeMode", Gtk.Container.ContainerResizeModePropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("style", TabStylePropertyInfo), '("title", TabTitlePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widget", TabWidgetPropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("window", Gtk.Widget.WidgetWindowPropertyInfo)] :: [(Symbol, DK.Type)])
#endif
#if defined(ENABLE_OVERLOADING)
tabActive :: AttrLabelProxy "active"
tabActive = AttrLabelProxy
tabCanClose :: AttrLabelProxy "canClose"
tabCanClose = AttrLabelProxy
tabEdge :: AttrLabelProxy "edge"
tabEdge = AttrLabelProxy
tabStyle :: AttrLabelProxy "style"
tabStyle = AttrLabelProxy
tabTitle :: AttrLabelProxy "title"
tabTitle = AttrLabelProxy
tabWidget :: AttrLabelProxy "widget"
tabWidget = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList Tab = TabSignalList
type TabSignalList = ('[ '("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), '("clicked", TabClickedSignalInfo), '("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, DK.Type)])
#endif
foreign import ccall "dzl_tab_get_active" dzl_tab_get_active ::
Ptr Tab ->
IO CInt
tabGetActive ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a) =>
a
-> m Bool
tabGetActive :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsTab a) =>
a -> m Bool
tabGetActive a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr Tab -> IO CInt
dzl_tab_get_active Ptr Tab
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data TabGetActiveMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsTab a) => O.OverloadedMethod TabGetActiveMethodInfo a signature where
overloadedMethod = tabGetActive
instance O.OverloadedMethodInfo TabGetActiveMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabGetActive",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabGetActive"
})
#endif
foreign import ccall "dzl_tab_get_can_close" dzl_tab_get_can_close ::
Ptr Tab ->
IO CInt
tabGetCanClose ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a) =>
a
-> m Bool
tabGetCanClose :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsTab a) =>
a -> m Bool
tabGetCanClose a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr Tab -> IO CInt
dzl_tab_get_can_close Ptr Tab
self'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data TabGetCanCloseMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsTab a) => O.OverloadedMethod TabGetCanCloseMethodInfo a signature where
overloadedMethod = tabGetCanClose
instance O.OverloadedMethodInfo TabGetCanCloseMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabGetCanClose",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabGetCanClose"
})
#endif
foreign import ccall "dzl_tab_get_edge" dzl_tab_get_edge ::
Ptr Tab ->
IO CUInt
tabGetEdge ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a) =>
a
-> m Gtk.Enums.PositionType
tabGetEdge :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsTab a) =>
a -> m PositionType
tabGetEdge a
self = IO PositionType -> m PositionType
forall a. IO a -> m a
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 Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CUInt
result <- Ptr Tab -> IO CUInt
dzl_tab_get_edge Ptr Tab
self'
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
self
PositionType -> IO PositionType
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return PositionType
result'
#if defined(ENABLE_OVERLOADING)
data TabGetEdgeMethodInfo
instance (signature ~ (m Gtk.Enums.PositionType), MonadIO m, IsTab a) => O.OverloadedMethod TabGetEdgeMethodInfo a signature where
overloadedMethod = tabGetEdge
instance O.OverloadedMethodInfo TabGetEdgeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabGetEdge",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabGetEdge"
})
#endif
foreign import ccall "dzl_tab_get_icon_name" dzl_tab_get_icon_name ::
Ptr Tab ->
IO CString
tabGetIconName ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a) =>
a
-> m T.Text
tabGetIconName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsTab a) =>
a -> m Text
tabGetIconName a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr Tab -> IO CString
dzl_tab_get_icon_name Ptr Tab
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"tabGetIconName" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data TabGetIconNameMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsTab a) => O.OverloadedMethod TabGetIconNameMethodInfo a signature where
overloadedMethod = tabGetIconName
instance O.OverloadedMethodInfo TabGetIconNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabGetIconName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabGetIconName"
})
#endif
foreign import ccall "dzl_tab_get_style" dzl_tab_get_style ::
Ptr Tab ->
IO CUInt
tabGetStyle ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a) =>
a
-> m [Dazzle.Flags.TabStyle]
tabGetStyle :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsTab a) =>
a -> m [TabStyle]
tabGetStyle a
self = IO [TabStyle] -> m [TabStyle]
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO [TabStyle] -> m [TabStyle]) -> IO [TabStyle] -> m [TabStyle]
forall a b. (a -> b) -> a -> b
$ do
Ptr Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CUInt
result <- Ptr Tab -> IO CUInt
dzl_tab_get_style Ptr Tab
self'
let result' :: [TabStyle]
result' = CUInt -> [TabStyle]
forall a b. (Storable a, Integral a, Bits a, IsGFlag b) => a -> [b]
wordToGFlags CUInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
[TabStyle] -> IO [TabStyle]
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return [TabStyle]
result'
#if defined(ENABLE_OVERLOADING)
data TabGetStyleMethodInfo
instance (signature ~ (m [Dazzle.Flags.TabStyle]), MonadIO m, IsTab a) => O.OverloadedMethod TabGetStyleMethodInfo a signature where
overloadedMethod = tabGetStyle
instance O.OverloadedMethodInfo TabGetStyleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabGetStyle",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabGetStyle"
})
#endif
foreign import ccall "dzl_tab_get_title" dzl_tab_get_title ::
Ptr Tab ->
IO CString
tabGetTitle ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a) =>
a
-> m T.Text
tabGetTitle :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsTab a) =>
a -> m Text
tabGetTitle a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr Tab -> IO CString
dzl_tab_get_title Ptr Tab
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"tabGetTitle" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data TabGetTitleMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsTab a) => O.OverloadedMethod TabGetTitleMethodInfo a signature where
overloadedMethod = tabGetTitle
instance O.OverloadedMethodInfo TabGetTitleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabGetTitle",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabGetTitle"
})
#endif
foreign import ccall "dzl_tab_get_widget" dzl_tab_get_widget ::
Ptr Tab ->
IO (Ptr Gtk.Widget.Widget)
tabGetWidget ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a) =>
a
-> m (Maybe Gtk.Widget.Widget)
tabGetWidget :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsTab a) =>
a -> m (Maybe Widget)
tabGetWidget a
self = IO (Maybe Widget) -> m (Maybe Widget)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Widget) -> m (Maybe Widget))
-> IO (Maybe Widget) -> m (Maybe Widget)
forall a b. (a -> b) -> a -> b
$ do
Ptr Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Widget
result <- Ptr Tab -> IO (Ptr Widget)
dzl_tab_get_widget Ptr Tab
self'
Maybe Widget
maybeResult <- Ptr Widget -> (Ptr Widget -> IO Widget) -> IO (Maybe Widget)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr Widget
result ((Ptr Widget -> IO Widget) -> IO (Maybe Widget))
-> (Ptr Widget -> IO Widget) -> IO (Maybe Widget)
forall a b. (a -> b) -> a -> b
$ \Ptr Widget
result' -> do
Widget
result'' <- ((ManagedPtr Widget -> Widget) -> Ptr Widget -> IO Widget
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Widget -> Widget
Gtk.Widget.Widget) Ptr Widget
result'
Widget -> IO Widget
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Widget
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe Widget -> IO (Maybe Widget)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Widget
maybeResult
#if defined(ENABLE_OVERLOADING)
data TabGetWidgetMethodInfo
instance (signature ~ (m (Maybe Gtk.Widget.Widget)), MonadIO m, IsTab a) => O.OverloadedMethod TabGetWidgetMethodInfo a signature where
overloadedMethod = tabGetWidget
instance O.OverloadedMethodInfo TabGetWidgetMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabGetWidget",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabGetWidget"
})
#endif
foreign import ccall "dzl_tab_set_active" dzl_tab_set_active ::
Ptr Tab ->
CInt ->
IO ()
tabSetActive ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a) =>
a
-> Bool
-> m ()
tabSetActive :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsTab a) =>
a -> Bool -> m ()
tabSetActive a
self Bool
active = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let active' :: CInt
active' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
P.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
P.fromEnum) Bool
active
Ptr Tab -> CInt -> IO ()
dzl_tab_set_active Ptr Tab
self' CInt
active'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data TabSetActiveMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsTab a) => O.OverloadedMethod TabSetActiveMethodInfo a signature where
overloadedMethod = tabSetActive
instance O.OverloadedMethodInfo TabSetActiveMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabSetActive",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabSetActive"
})
#endif
foreign import ccall "dzl_tab_set_can_close" dzl_tab_set_can_close ::
Ptr Tab ->
CInt ->
IO ()
tabSetCanClose ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a) =>
a
-> Bool
-> m ()
tabSetCanClose :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsTab a) =>
a -> Bool -> m ()
tabSetCanClose a
self Bool
canClose = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let canClose' :: CInt
canClose' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
P.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
P.fromEnum) Bool
canClose
Ptr Tab -> CInt -> IO ()
dzl_tab_set_can_close Ptr Tab
self' CInt
canClose'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data TabSetCanCloseMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsTab a) => O.OverloadedMethod TabSetCanCloseMethodInfo a signature where
overloadedMethod = tabSetCanClose
instance O.OverloadedMethodInfo TabSetCanCloseMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabSetCanClose",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabSetCanClose"
})
#endif
foreign import ccall "dzl_tab_set_edge" dzl_tab_set_edge ::
Ptr Tab ->
CUInt ->
IO ()
tabSetEdge ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a) =>
a
-> Gtk.Enums.PositionType
-> m ()
tabSetEdge :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsTab a) =>
a -> PositionType -> m ()
tabSetEdge a
self PositionType
edge = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let edge' :: CUInt
edge' = (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
edge
Ptr Tab -> CUInt -> IO ()
dzl_tab_set_edge Ptr Tab
self' CUInt
edge'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data TabSetEdgeMethodInfo
instance (signature ~ (Gtk.Enums.PositionType -> m ()), MonadIO m, IsTab a) => O.OverloadedMethod TabSetEdgeMethodInfo a signature where
overloadedMethod = tabSetEdge
instance O.OverloadedMethodInfo TabSetEdgeMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabSetEdge",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabSetEdge"
})
#endif
foreign import ccall "dzl_tab_set_gicon" dzl_tab_set_gicon ::
Ptr Tab ->
Ptr Gio.Icon.Icon ->
IO ()
tabSetGicon ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a, Gio.Icon.IsIcon b) =>
a
-> b
-> m ()
tabSetGicon :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsTab a, IsIcon b) =>
a -> b -> m ()
tabSetGicon a
self b
gicon = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Icon
gicon' <- b -> IO (Ptr Icon)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
gicon
Ptr Tab -> Ptr Icon -> IO ()
dzl_tab_set_gicon Ptr Tab
self' Ptr Icon
gicon'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
gicon
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data TabSetGiconMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsTab a, Gio.Icon.IsIcon b) => O.OverloadedMethod TabSetGiconMethodInfo a signature where
overloadedMethod = tabSetGicon
instance O.OverloadedMethodInfo TabSetGiconMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabSetGicon",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabSetGicon"
})
#endif
foreign import ccall "dzl_tab_set_icon_name" dzl_tab_set_icon_name ::
Ptr Tab ->
CString ->
IO ()
tabSetIconName ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a) =>
a
-> T.Text
-> m ()
tabSetIconName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsTab a) =>
a -> Text -> m ()
tabSetIconName a
self Text
iconName = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
iconName' <- Text -> IO CString
textToCString Text
iconName
Ptr Tab -> CString -> IO ()
dzl_tab_set_icon_name Ptr Tab
self' CString
iconName'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
iconName'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data TabSetIconNameMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsTab a) => O.OverloadedMethod TabSetIconNameMethodInfo a signature where
overloadedMethod = tabSetIconName
instance O.OverloadedMethodInfo TabSetIconNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabSetIconName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabSetIconName"
})
#endif
foreign import ccall "dzl_tab_set_style" dzl_tab_set_style ::
Ptr Tab ->
CUInt ->
IO ()
tabSetStyle ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a) =>
a
-> [Dazzle.Flags.TabStyle]
-> m ()
tabSetStyle :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsTab a) =>
a -> [TabStyle] -> m ()
tabSetStyle a
self [TabStyle]
style = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let style' :: CUInt
style' = [TabStyle] -> CUInt
forall b a. (Num b, IsGFlag a) => [a] -> b
gflagsToWord [TabStyle]
style
Ptr Tab -> CUInt -> IO ()
dzl_tab_set_style Ptr Tab
self' CUInt
style'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data TabSetStyleMethodInfo
instance (signature ~ ([Dazzle.Flags.TabStyle] -> m ()), MonadIO m, IsTab a) => O.OverloadedMethod TabSetStyleMethodInfo a signature where
overloadedMethod = tabSetStyle
instance O.OverloadedMethodInfo TabSetStyleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabSetStyle",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabSetStyle"
})
#endif
foreign import ccall "dzl_tab_set_title" dzl_tab_set_title ::
Ptr Tab ->
CString ->
IO ()
tabSetTitle ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a) =>
a
-> T.Text
-> m ()
tabSetTitle :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsTab a) =>
a -> Text -> m ()
tabSetTitle a
self Text
title = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
title' <- Text -> IO CString
textToCString Text
title
Ptr Tab -> CString -> IO ()
dzl_tab_set_title Ptr Tab
self' CString
title'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
title'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data TabSetTitleMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsTab a) => O.OverloadedMethod TabSetTitleMethodInfo a signature where
overloadedMethod = tabSetTitle
instance O.OverloadedMethodInfo TabSetTitleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabSetTitle",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabSetTitle"
})
#endif
foreign import ccall "dzl_tab_set_widget" dzl_tab_set_widget ::
Ptr Tab ->
Ptr Gtk.Widget.Widget ->
IO ()
tabSetWidget ::
(B.CallStack.HasCallStack, MonadIO m, IsTab a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m ()
tabSetWidget :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsTab a, IsWidget b) =>
a -> b -> m ()
tabSetWidget a
self b
widget = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Tab
self' <- a -> IO (Ptr Tab)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Widget
widget' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
widget
Ptr Tab -> Ptr Widget -> IO ()
dzl_tab_set_widget Ptr Tab
self' Ptr Widget
widget'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
widget
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data TabSetWidgetMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsTab a, Gtk.Widget.IsWidget b) => O.OverloadedMethod TabSetWidgetMethodInfo a signature where
overloadedMethod = tabSetWidget
instance O.OverloadedMethodInfo TabSetWidgetMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Dazzle.Objects.Tab.tabSetWidget",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-dazzle-1.0.1/docs/GI-Dazzle-Objects-Tab.html#v:tabSetWidget"
})
#endif