{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Handy.Objects.ViewSwitcherTitle
(
ViewSwitcherTitle(..) ,
IsViewSwitcherTitle ,
toViewSwitcherTitle ,
#if defined(ENABLE_OVERLOADING)
ResolveViewSwitcherTitleMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleGetPolicyMethodInfo ,
#endif
viewSwitcherTitleGetPolicy ,
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleGetStackMethodInfo ,
#endif
viewSwitcherTitleGetStack ,
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleGetSubtitleMethodInfo ,
#endif
viewSwitcherTitleGetSubtitle ,
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleGetTitleMethodInfo ,
#endif
viewSwitcherTitleGetTitle ,
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleGetTitleVisibleMethodInfo,
#endif
viewSwitcherTitleGetTitleVisible ,
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleGetViewSwitcherEnabledMethodInfo,
#endif
viewSwitcherTitleGetViewSwitcherEnabled ,
viewSwitcherTitleNew ,
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleSetPolicyMethodInfo ,
#endif
viewSwitcherTitleSetPolicy ,
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleSetStackMethodInfo ,
#endif
viewSwitcherTitleSetStack ,
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleSetSubtitleMethodInfo ,
#endif
viewSwitcherTitleSetSubtitle ,
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleSetTitleMethodInfo ,
#endif
viewSwitcherTitleSetTitle ,
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleSetViewSwitcherEnabledMethodInfo,
#endif
viewSwitcherTitleSetViewSwitcherEnabled ,
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitlePolicyPropertyInfo ,
#endif
constructViewSwitcherTitlePolicy ,
getViewSwitcherTitlePolicy ,
setViewSwitcherTitlePolicy ,
#if defined(ENABLE_OVERLOADING)
viewSwitcherTitlePolicy ,
#endif
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleStackPropertyInfo ,
#endif
clearViewSwitcherTitleStack ,
constructViewSwitcherTitleStack ,
getViewSwitcherTitleStack ,
setViewSwitcherTitleStack ,
#if defined(ENABLE_OVERLOADING)
viewSwitcherTitleStack ,
#endif
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleSubtitlePropertyInfo ,
#endif
clearViewSwitcherTitleSubtitle ,
constructViewSwitcherTitleSubtitle ,
getViewSwitcherTitleSubtitle ,
setViewSwitcherTitleSubtitle ,
#if defined(ENABLE_OVERLOADING)
viewSwitcherTitleSubtitle ,
#endif
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleTitlePropertyInfo ,
#endif
clearViewSwitcherTitleTitle ,
constructViewSwitcherTitleTitle ,
getViewSwitcherTitleTitle ,
setViewSwitcherTitleTitle ,
#if defined(ENABLE_OVERLOADING)
viewSwitcherTitleTitle ,
#endif
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleTitleVisiblePropertyInfo,
#endif
getViewSwitcherTitleTitleVisible ,
#if defined(ENABLE_OVERLOADING)
viewSwitcherTitleTitleVisible ,
#endif
#if defined(ENABLE_OVERLOADING)
ViewSwitcherTitleViewSwitcherEnabledPropertyInfo,
#endif
constructViewSwitcherTitleViewSwitcherEnabled,
getViewSwitcherTitleViewSwitcherEnabled ,
setViewSwitcherTitleViewSwitcherEnabled ,
#if defined(ENABLE_OVERLOADING)
viewSwitcherTitleViewSwitcherEnabled ,
#endif
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GHashTable as B.GHT
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Coerce as Coerce
import qualified Data.Text as T
import qualified Data.Kind as DK
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GHC.Records as R
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
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.Stack as Gtk.Stack
import qualified GI.Gtk.Objects.Widget as Gtk.Widget
import {-# SOURCE #-} qualified GI.Handy.Enums as Handy.Enums
newtype ViewSwitcherTitle = ViewSwitcherTitle (SP.ManagedPtr ViewSwitcherTitle)
deriving (ViewSwitcherTitle -> ViewSwitcherTitle -> Bool
(ViewSwitcherTitle -> ViewSwitcherTitle -> Bool)
-> (ViewSwitcherTitle -> ViewSwitcherTitle -> Bool)
-> Eq ViewSwitcherTitle
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ViewSwitcherTitle -> ViewSwitcherTitle -> Bool
== :: ViewSwitcherTitle -> ViewSwitcherTitle -> Bool
$c/= :: ViewSwitcherTitle -> ViewSwitcherTitle -> Bool
/= :: ViewSwitcherTitle -> ViewSwitcherTitle -> Bool
Eq)
instance SP.ManagedPtrNewtype ViewSwitcherTitle where
toManagedPtr :: ViewSwitcherTitle -> ManagedPtr ViewSwitcherTitle
toManagedPtr (ViewSwitcherTitle ManagedPtr ViewSwitcherTitle
p) = ManagedPtr ViewSwitcherTitle
p
foreign import ccall "hdy_view_switcher_title_get_type"
c_hdy_view_switcher_title_get_type :: IO B.Types.GType
instance B.Types.TypedObject ViewSwitcherTitle where
glibType :: IO GType
glibType = IO GType
c_hdy_view_switcher_title_get_type
instance B.Types.GObject ViewSwitcherTitle
class (SP.GObject o, O.IsDescendantOf ViewSwitcherTitle o) => IsViewSwitcherTitle o
instance (SP.GObject o, O.IsDescendantOf ViewSwitcherTitle o) => IsViewSwitcherTitle o
instance O.HasParentTypes ViewSwitcherTitle
type instance O.ParentTypes ViewSwitcherTitle = '[Gtk.Bin.Bin, Gtk.Container.Container, Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable]
toViewSwitcherTitle :: (MIO.MonadIO m, IsViewSwitcherTitle o) => o -> m ViewSwitcherTitle
toViewSwitcherTitle :: forall (m :: * -> *) o.
(MonadIO m, IsViewSwitcherTitle o) =>
o -> m ViewSwitcherTitle
toViewSwitcherTitle = IO ViewSwitcherTitle -> m ViewSwitcherTitle
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO ViewSwitcherTitle -> m ViewSwitcherTitle)
-> (o -> IO ViewSwitcherTitle) -> o -> m ViewSwitcherTitle
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr ViewSwitcherTitle -> ViewSwitcherTitle)
-> o -> IO ViewSwitcherTitle
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr ViewSwitcherTitle -> ViewSwitcherTitle
ViewSwitcherTitle
instance B.GValue.IsGValue (Maybe ViewSwitcherTitle) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_hdy_view_switcher_title_get_type
gvalueSet_ :: Ptr GValue -> Maybe ViewSwitcherTitle -> IO ()
gvalueSet_ Ptr GValue
gv Maybe ViewSwitcherTitle
P.Nothing = Ptr GValue -> Ptr ViewSwitcherTitle -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr ViewSwitcherTitle
forall a. Ptr a
FP.nullPtr :: FP.Ptr ViewSwitcherTitle)
gvalueSet_ Ptr GValue
gv (P.Just ViewSwitcherTitle
obj) = ViewSwitcherTitle -> (Ptr ViewSwitcherTitle -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr ViewSwitcherTitle
obj (Ptr GValue -> Ptr ViewSwitcherTitle -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe ViewSwitcherTitle)
gvalueGet_ Ptr GValue
gv = do
Ptr ViewSwitcherTitle
ptr <- Ptr GValue -> IO (Ptr ViewSwitcherTitle)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr ViewSwitcherTitle)
if Ptr ViewSwitcherTitle
ptr Ptr ViewSwitcherTitle -> Ptr ViewSwitcherTitle -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr ViewSwitcherTitle
forall a. Ptr a
FP.nullPtr
then ViewSwitcherTitle -> Maybe ViewSwitcherTitle
forall a. a -> Maybe a
P.Just (ViewSwitcherTitle -> Maybe ViewSwitcherTitle)
-> IO ViewSwitcherTitle -> IO (Maybe ViewSwitcherTitle)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr ViewSwitcherTitle -> ViewSwitcherTitle)
-> Ptr ViewSwitcherTitle -> IO ViewSwitcherTitle
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr ViewSwitcherTitle -> ViewSwitcherTitle
ViewSwitcherTitle Ptr ViewSwitcherTitle
ptr
else Maybe ViewSwitcherTitle -> IO (Maybe ViewSwitcherTitle)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe ViewSwitcherTitle
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveViewSwitcherTitleMethod (t :: Symbol) (o :: DK.Type) :: DK.Type where
ResolveViewSwitcherTitleMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveViewSwitcherTitleMethod "add" o = Gtk.Container.ContainerAddMethodInfo
ResolveViewSwitcherTitleMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolveViewSwitcherTitleMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveViewSwitcherTitleMethod "addDeviceEvents" o = Gtk.Widget.WidgetAddDeviceEventsMethodInfo
ResolveViewSwitcherTitleMethod "addEvents" o = Gtk.Widget.WidgetAddEventsMethodInfo
ResolveViewSwitcherTitleMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveViewSwitcherTitleMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveViewSwitcherTitleMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveViewSwitcherTitleMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveViewSwitcherTitleMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolveViewSwitcherTitleMethod "checkResize" o = Gtk.Container.ContainerCheckResizeMethodInfo
ResolveViewSwitcherTitleMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveViewSwitcherTitleMethod "childGetProperty" o = Gtk.Container.ContainerChildGetPropertyMethodInfo
ResolveViewSwitcherTitleMethod "childNotify" o = Gtk.Container.ContainerChildNotifyMethodInfo
ResolveViewSwitcherTitleMethod "childNotifyByPspec" o = Gtk.Container.ContainerChildNotifyByPspecMethodInfo
ResolveViewSwitcherTitleMethod "childSetProperty" o = Gtk.Container.ContainerChildSetPropertyMethodInfo
ResolveViewSwitcherTitleMethod "childType" o = Gtk.Container.ContainerChildTypeMethodInfo
ResolveViewSwitcherTitleMethod "classPath" o = Gtk.Widget.WidgetClassPathMethodInfo
ResolveViewSwitcherTitleMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveViewSwitcherTitleMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveViewSwitcherTitleMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveViewSwitcherTitleMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveViewSwitcherTitleMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveViewSwitcherTitleMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveViewSwitcherTitleMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveViewSwitcherTitleMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolveViewSwitcherTitleMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolveViewSwitcherTitleMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveViewSwitcherTitleMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolveViewSwitcherTitleMethod "dragBeginWithCoordinates" o = Gtk.Widget.WidgetDragBeginWithCoordinatesMethodInfo
ResolveViewSwitcherTitleMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveViewSwitcherTitleMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolveViewSwitcherTitleMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolveViewSwitcherTitleMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolveViewSwitcherTitleMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolveViewSwitcherTitleMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolveViewSwitcherTitleMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolveViewSwitcherTitleMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolveViewSwitcherTitleMethod "dragDestSetProxy" o = Gtk.Widget.WidgetDragDestSetProxyMethodInfo
ResolveViewSwitcherTitleMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolveViewSwitcherTitleMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolveViewSwitcherTitleMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolveViewSwitcherTitleMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolveViewSwitcherTitleMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolveViewSwitcherTitleMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolveViewSwitcherTitleMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolveViewSwitcherTitleMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolveViewSwitcherTitleMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolveViewSwitcherTitleMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolveViewSwitcherTitleMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolveViewSwitcherTitleMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolveViewSwitcherTitleMethod "dragSourceSetIconPixbuf" o = Gtk.Widget.WidgetDragSourceSetIconPixbufMethodInfo
ResolveViewSwitcherTitleMethod "dragSourceSetIconStock" o = Gtk.Widget.WidgetDragSourceSetIconStockMethodInfo
ResolveViewSwitcherTitleMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolveViewSwitcherTitleMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolveViewSwitcherTitleMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolveViewSwitcherTitleMethod "draw" o = Gtk.Widget.WidgetDrawMethodInfo
ResolveViewSwitcherTitleMethod "ensureStyle" o = Gtk.Widget.WidgetEnsureStyleMethodInfo
ResolveViewSwitcherTitleMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveViewSwitcherTitleMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolveViewSwitcherTitleMethod "forall" o = Gtk.Container.ContainerForallMethodInfo
ResolveViewSwitcherTitleMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveViewSwitcherTitleMethod "foreach" o = Gtk.Container.ContainerForeachMethodInfo
ResolveViewSwitcherTitleMethod "freezeChildNotify" o = Gtk.Widget.WidgetFreezeChildNotifyMethodInfo
ResolveViewSwitcherTitleMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveViewSwitcherTitleMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveViewSwitcherTitleMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolveViewSwitcherTitleMethod "grabDefault" o = Gtk.Widget.WidgetGrabDefaultMethodInfo
ResolveViewSwitcherTitleMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveViewSwitcherTitleMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolveViewSwitcherTitleMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveViewSwitcherTitleMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveViewSwitcherTitleMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolveViewSwitcherTitleMethod "hasRcStyle" o = Gtk.Widget.WidgetHasRcStyleMethodInfo
ResolveViewSwitcherTitleMethod "hasScreen" o = Gtk.Widget.WidgetHasScreenMethodInfo
ResolveViewSwitcherTitleMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveViewSwitcherTitleMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveViewSwitcherTitleMethod "hideOnDelete" o = Gtk.Widget.WidgetHideOnDeleteMethodInfo
ResolveViewSwitcherTitleMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveViewSwitcherTitleMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveViewSwitcherTitleMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolveViewSwitcherTitleMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveViewSwitcherTitleMethod "intersect" o = Gtk.Widget.WidgetIntersectMethodInfo
ResolveViewSwitcherTitleMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveViewSwitcherTitleMethod "isComposited" o = Gtk.Widget.WidgetIsCompositedMethodInfo
ResolveViewSwitcherTitleMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveViewSwitcherTitleMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveViewSwitcherTitleMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveViewSwitcherTitleMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveViewSwitcherTitleMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolveViewSwitcherTitleMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveViewSwitcherTitleMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveViewSwitcherTitleMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolveViewSwitcherTitleMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolveViewSwitcherTitleMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveViewSwitcherTitleMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveViewSwitcherTitleMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveViewSwitcherTitleMethod "modifyBase" o = Gtk.Widget.WidgetModifyBaseMethodInfo
ResolveViewSwitcherTitleMethod "modifyBg" o = Gtk.Widget.WidgetModifyBgMethodInfo
ResolveViewSwitcherTitleMethod "modifyCursor" o = Gtk.Widget.WidgetModifyCursorMethodInfo
ResolveViewSwitcherTitleMethod "modifyFg" o = Gtk.Widget.WidgetModifyFgMethodInfo
ResolveViewSwitcherTitleMethod "modifyFont" o = Gtk.Widget.WidgetModifyFontMethodInfo
ResolveViewSwitcherTitleMethod "modifyStyle" o = Gtk.Widget.WidgetModifyStyleMethodInfo
ResolveViewSwitcherTitleMethod "modifyText" o = Gtk.Widget.WidgetModifyTextMethodInfo
ResolveViewSwitcherTitleMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveViewSwitcherTitleMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveViewSwitcherTitleMethod "overrideBackgroundColor" o = Gtk.Widget.WidgetOverrideBackgroundColorMethodInfo
ResolveViewSwitcherTitleMethod "overrideColor" o = Gtk.Widget.WidgetOverrideColorMethodInfo
ResolveViewSwitcherTitleMethod "overrideCursor" o = Gtk.Widget.WidgetOverrideCursorMethodInfo
ResolveViewSwitcherTitleMethod "overrideFont" o = Gtk.Widget.WidgetOverrideFontMethodInfo
ResolveViewSwitcherTitleMethod "overrideSymbolicColor" o = Gtk.Widget.WidgetOverrideSymbolicColorMethodInfo
ResolveViewSwitcherTitleMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveViewSwitcherTitleMethod "path" o = Gtk.Widget.WidgetPathMethodInfo
ResolveViewSwitcherTitleMethod "propagateDraw" o = Gtk.Container.ContainerPropagateDrawMethodInfo
ResolveViewSwitcherTitleMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveViewSwitcherTitleMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolveViewSwitcherTitleMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveViewSwitcherTitleMethod "queueDrawArea" o = Gtk.Widget.WidgetQueueDrawAreaMethodInfo
ResolveViewSwitcherTitleMethod "queueDrawRegion" o = Gtk.Widget.WidgetQueueDrawRegionMethodInfo
ResolveViewSwitcherTitleMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveViewSwitcherTitleMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolveViewSwitcherTitleMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveViewSwitcherTitleMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveViewSwitcherTitleMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveViewSwitcherTitleMethod "regionIntersect" o = Gtk.Widget.WidgetRegionIntersectMethodInfo
ResolveViewSwitcherTitleMethod "registerWindow" o = Gtk.Widget.WidgetRegisterWindowMethodInfo
ResolveViewSwitcherTitleMethod "remove" o = Gtk.Container.ContainerRemoveMethodInfo
ResolveViewSwitcherTitleMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolveViewSwitcherTitleMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveViewSwitcherTitleMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveViewSwitcherTitleMethod "renderIcon" o = Gtk.Widget.WidgetRenderIconMethodInfo
ResolveViewSwitcherTitleMethod "renderIconPixbuf" o = Gtk.Widget.WidgetRenderIconPixbufMethodInfo
ResolveViewSwitcherTitleMethod "reparent" o = Gtk.Widget.WidgetReparentMethodInfo
ResolveViewSwitcherTitleMethod "resetRcStyles" o = Gtk.Widget.WidgetResetRcStylesMethodInfo
ResolveViewSwitcherTitleMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolveViewSwitcherTitleMethod "resizeChildren" o = Gtk.Container.ContainerResizeChildrenMethodInfo
ResolveViewSwitcherTitleMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveViewSwitcherTitleMethod "sendExpose" o = Gtk.Widget.WidgetSendExposeMethodInfo
ResolveViewSwitcherTitleMethod "sendFocusChange" o = Gtk.Widget.WidgetSendFocusChangeMethodInfo
ResolveViewSwitcherTitleMethod "shapeCombineRegion" o = Gtk.Widget.WidgetShapeCombineRegionMethodInfo
ResolveViewSwitcherTitleMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveViewSwitcherTitleMethod "showAll" o = Gtk.Widget.WidgetShowAllMethodInfo
ResolveViewSwitcherTitleMethod "showNow" o = Gtk.Widget.WidgetShowNowMethodInfo
ResolveViewSwitcherTitleMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveViewSwitcherTitleMethod "sizeAllocateWithBaseline" o = Gtk.Widget.WidgetSizeAllocateWithBaselineMethodInfo
ResolveViewSwitcherTitleMethod "sizeRequest" o = Gtk.Widget.WidgetSizeRequestMethodInfo
ResolveViewSwitcherTitleMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveViewSwitcherTitleMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveViewSwitcherTitleMethod "styleAttach" o = Gtk.Widget.WidgetStyleAttachMethodInfo
ResolveViewSwitcherTitleMethod "styleGetProperty" o = Gtk.Widget.WidgetStyleGetPropertyMethodInfo
ResolveViewSwitcherTitleMethod "thawChildNotify" o = Gtk.Widget.WidgetThawChildNotifyMethodInfo
ResolveViewSwitcherTitleMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveViewSwitcherTitleMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveViewSwitcherTitleMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveViewSwitcherTitleMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveViewSwitcherTitleMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveViewSwitcherTitleMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveViewSwitcherTitleMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveViewSwitcherTitleMethod "unregisterWindow" o = Gtk.Widget.WidgetUnregisterWindowMethodInfo
ResolveViewSwitcherTitleMethod "unsetFocusChain" o = Gtk.Container.ContainerUnsetFocusChainMethodInfo
ResolveViewSwitcherTitleMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveViewSwitcherTitleMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveViewSwitcherTitleMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveViewSwitcherTitleMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolveViewSwitcherTitleMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveViewSwitcherTitleMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveViewSwitcherTitleMethod "getAllocatedSize" o = Gtk.Widget.WidgetGetAllocatedSizeMethodInfo
ResolveViewSwitcherTitleMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveViewSwitcherTitleMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveViewSwitcherTitleMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveViewSwitcherTitleMethod "getAppPaintable" o = Gtk.Widget.WidgetGetAppPaintableMethodInfo
ResolveViewSwitcherTitleMethod "getBorderWidth" o = Gtk.Container.ContainerGetBorderWidthMethodInfo
ResolveViewSwitcherTitleMethod "getCanDefault" o = Gtk.Widget.WidgetGetCanDefaultMethodInfo
ResolveViewSwitcherTitleMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveViewSwitcherTitleMethod "getChild" o = Gtk.Bin.BinGetChildMethodInfo
ResolveViewSwitcherTitleMethod "getChildRequisition" o = Gtk.Widget.WidgetGetChildRequisitionMethodInfo
ResolveViewSwitcherTitleMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveViewSwitcherTitleMethod "getChildren" o = Gtk.Container.ContainerGetChildrenMethodInfo
ResolveViewSwitcherTitleMethod "getClip" o = Gtk.Widget.WidgetGetClipMethodInfo
ResolveViewSwitcherTitleMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveViewSwitcherTitleMethod "getCompositeName" o = Gtk.Widget.WidgetGetCompositeNameMethodInfo
ResolveViewSwitcherTitleMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveViewSwitcherTitleMethod "getDeviceEnabled" o = Gtk.Widget.WidgetGetDeviceEnabledMethodInfo
ResolveViewSwitcherTitleMethod "getDeviceEvents" o = Gtk.Widget.WidgetGetDeviceEventsMethodInfo
ResolveViewSwitcherTitleMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveViewSwitcherTitleMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveViewSwitcherTitleMethod "getDoubleBuffered" o = Gtk.Widget.WidgetGetDoubleBufferedMethodInfo
ResolveViewSwitcherTitleMethod "getEvents" o = Gtk.Widget.WidgetGetEventsMethodInfo
ResolveViewSwitcherTitleMethod "getFocusChain" o = Gtk.Container.ContainerGetFocusChainMethodInfo
ResolveViewSwitcherTitleMethod "getFocusChild" o = Gtk.Container.ContainerGetFocusChildMethodInfo
ResolveViewSwitcherTitleMethod "getFocusHadjustment" o = Gtk.Container.ContainerGetFocusHadjustmentMethodInfo
ResolveViewSwitcherTitleMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveViewSwitcherTitleMethod "getFocusVadjustment" o = Gtk.Container.ContainerGetFocusVadjustmentMethodInfo
ResolveViewSwitcherTitleMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveViewSwitcherTitleMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveViewSwitcherTitleMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveViewSwitcherTitleMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveViewSwitcherTitleMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveViewSwitcherTitleMethod "getHasWindow" o = Gtk.Widget.WidgetGetHasWindowMethodInfo
ResolveViewSwitcherTitleMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveViewSwitcherTitleMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveViewSwitcherTitleMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveViewSwitcherTitleMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveViewSwitcherTitleMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveViewSwitcherTitleMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveViewSwitcherTitleMethod "getMarginLeft" o = Gtk.Widget.WidgetGetMarginLeftMethodInfo
ResolveViewSwitcherTitleMethod "getMarginRight" o = Gtk.Widget.WidgetGetMarginRightMethodInfo
ResolveViewSwitcherTitleMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveViewSwitcherTitleMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveViewSwitcherTitleMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolveViewSwitcherTitleMethod "getModifierStyle" o = Gtk.Widget.WidgetGetModifierStyleMethodInfo
ResolveViewSwitcherTitleMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveViewSwitcherTitleMethod "getNoShowAll" o = Gtk.Widget.WidgetGetNoShowAllMethodInfo
ResolveViewSwitcherTitleMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveViewSwitcherTitleMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveViewSwitcherTitleMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveViewSwitcherTitleMethod "getParentWindow" o = Gtk.Widget.WidgetGetParentWindowMethodInfo
ResolveViewSwitcherTitleMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolveViewSwitcherTitleMethod "getPathForChild" o = Gtk.Container.ContainerGetPathForChildMethodInfo
ResolveViewSwitcherTitleMethod "getPointer" o = Gtk.Widget.WidgetGetPointerMethodInfo
ResolveViewSwitcherTitleMethod "getPolicy" o = ViewSwitcherTitleGetPolicyMethodInfo
ResolveViewSwitcherTitleMethod "getPreferredHeight" o = Gtk.Widget.WidgetGetPreferredHeightMethodInfo
ResolveViewSwitcherTitleMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.Widget.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo
ResolveViewSwitcherTitleMethod "getPreferredHeightForWidth" o = Gtk.Widget.WidgetGetPreferredHeightForWidthMethodInfo
ResolveViewSwitcherTitleMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveViewSwitcherTitleMethod "getPreferredWidth" o = Gtk.Widget.WidgetGetPreferredWidthMethodInfo
ResolveViewSwitcherTitleMethod "getPreferredWidthForHeight" o = Gtk.Widget.WidgetGetPreferredWidthForHeightMethodInfo
ResolveViewSwitcherTitleMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveViewSwitcherTitleMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveViewSwitcherTitleMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveViewSwitcherTitleMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveViewSwitcherTitleMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveViewSwitcherTitleMethod "getRequisition" o = Gtk.Widget.WidgetGetRequisitionMethodInfo
ResolveViewSwitcherTitleMethod "getResizeMode" o = Gtk.Container.ContainerGetResizeModeMethodInfo
ResolveViewSwitcherTitleMethod "getRootWindow" o = Gtk.Widget.WidgetGetRootWindowMethodInfo
ResolveViewSwitcherTitleMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveViewSwitcherTitleMethod "getScreen" o = Gtk.Widget.WidgetGetScreenMethodInfo
ResolveViewSwitcherTitleMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveViewSwitcherTitleMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveViewSwitcherTitleMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveViewSwitcherTitleMethod "getStack" o = ViewSwitcherTitleGetStackMethodInfo
ResolveViewSwitcherTitleMethod "getState" o = Gtk.Widget.WidgetGetStateMethodInfo
ResolveViewSwitcherTitleMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveViewSwitcherTitleMethod "getStyle" o = Gtk.Widget.WidgetGetStyleMethodInfo
ResolveViewSwitcherTitleMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveViewSwitcherTitleMethod "getSubtitle" o = ViewSwitcherTitleGetSubtitleMethodInfo
ResolveViewSwitcherTitleMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveViewSwitcherTitleMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveViewSwitcherTitleMethod "getTitle" o = ViewSwitcherTitleGetTitleMethodInfo
ResolveViewSwitcherTitleMethod "getTitleVisible" o = ViewSwitcherTitleGetTitleVisibleMethodInfo
ResolveViewSwitcherTitleMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveViewSwitcherTitleMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveViewSwitcherTitleMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolveViewSwitcherTitleMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolveViewSwitcherTitleMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveViewSwitcherTitleMethod "getValignWithBaseline" o = Gtk.Widget.WidgetGetValignWithBaselineMethodInfo
ResolveViewSwitcherTitleMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveViewSwitcherTitleMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveViewSwitcherTitleMethod "getViewSwitcherEnabled" o = ViewSwitcherTitleGetViewSwitcherEnabledMethodInfo
ResolveViewSwitcherTitleMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveViewSwitcherTitleMethod "getVisual" o = Gtk.Widget.WidgetGetVisualMethodInfo
ResolveViewSwitcherTitleMethod "getWindow" o = Gtk.Widget.WidgetGetWindowMethodInfo
ResolveViewSwitcherTitleMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolveViewSwitcherTitleMethod "setAllocation" o = Gtk.Widget.WidgetSetAllocationMethodInfo
ResolveViewSwitcherTitleMethod "setAppPaintable" o = Gtk.Widget.WidgetSetAppPaintableMethodInfo
ResolveViewSwitcherTitleMethod "setBorderWidth" o = Gtk.Container.ContainerSetBorderWidthMethodInfo
ResolveViewSwitcherTitleMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveViewSwitcherTitleMethod "setCanDefault" o = Gtk.Widget.WidgetSetCanDefaultMethodInfo
ResolveViewSwitcherTitleMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveViewSwitcherTitleMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveViewSwitcherTitleMethod "setClip" o = Gtk.Widget.WidgetSetClipMethodInfo
ResolveViewSwitcherTitleMethod "setCompositeName" o = Gtk.Widget.WidgetSetCompositeNameMethodInfo
ResolveViewSwitcherTitleMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveViewSwitcherTitleMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveViewSwitcherTitleMethod "setDeviceEnabled" o = Gtk.Widget.WidgetSetDeviceEnabledMethodInfo
ResolveViewSwitcherTitleMethod "setDeviceEvents" o = Gtk.Widget.WidgetSetDeviceEventsMethodInfo
ResolveViewSwitcherTitleMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveViewSwitcherTitleMethod "setDoubleBuffered" o = Gtk.Widget.WidgetSetDoubleBufferedMethodInfo
ResolveViewSwitcherTitleMethod "setEvents" o = Gtk.Widget.WidgetSetEventsMethodInfo
ResolveViewSwitcherTitleMethod "setFocusChain" o = Gtk.Container.ContainerSetFocusChainMethodInfo
ResolveViewSwitcherTitleMethod "setFocusChild" o = Gtk.Container.ContainerSetFocusChildMethodInfo
ResolveViewSwitcherTitleMethod "setFocusHadjustment" o = Gtk.Container.ContainerSetFocusHadjustmentMethodInfo
ResolveViewSwitcherTitleMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveViewSwitcherTitleMethod "setFocusVadjustment" o = Gtk.Container.ContainerSetFocusVadjustmentMethodInfo
ResolveViewSwitcherTitleMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveViewSwitcherTitleMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveViewSwitcherTitleMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveViewSwitcherTitleMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveViewSwitcherTitleMethod "setHasWindow" o = Gtk.Widget.WidgetSetHasWindowMethodInfo
ResolveViewSwitcherTitleMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveViewSwitcherTitleMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveViewSwitcherTitleMethod "setMapped" o = Gtk.Widget.WidgetSetMappedMethodInfo
ResolveViewSwitcherTitleMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveViewSwitcherTitleMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveViewSwitcherTitleMethod "setMarginLeft" o = Gtk.Widget.WidgetSetMarginLeftMethodInfo
ResolveViewSwitcherTitleMethod "setMarginRight" o = Gtk.Widget.WidgetSetMarginRightMethodInfo
ResolveViewSwitcherTitleMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveViewSwitcherTitleMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveViewSwitcherTitleMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveViewSwitcherTitleMethod "setNoShowAll" o = Gtk.Widget.WidgetSetNoShowAllMethodInfo
ResolveViewSwitcherTitleMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveViewSwitcherTitleMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveViewSwitcherTitleMethod "setParentWindow" o = Gtk.Widget.WidgetSetParentWindowMethodInfo
ResolveViewSwitcherTitleMethod "setPolicy" o = ViewSwitcherTitleSetPolicyMethodInfo
ResolveViewSwitcherTitleMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveViewSwitcherTitleMethod "setRealized" o = Gtk.Widget.WidgetSetRealizedMethodInfo
ResolveViewSwitcherTitleMethod "setReallocateRedraws" o = Gtk.Container.ContainerSetReallocateRedrawsMethodInfo
ResolveViewSwitcherTitleMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveViewSwitcherTitleMethod "setRedrawOnAllocate" o = Gtk.Widget.WidgetSetRedrawOnAllocateMethodInfo
ResolveViewSwitcherTitleMethod "setResizeMode" o = Gtk.Container.ContainerSetResizeModeMethodInfo
ResolveViewSwitcherTitleMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveViewSwitcherTitleMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveViewSwitcherTitleMethod "setStack" o = ViewSwitcherTitleSetStackMethodInfo
ResolveViewSwitcherTitleMethod "setState" o = Gtk.Widget.WidgetSetStateMethodInfo
ResolveViewSwitcherTitleMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveViewSwitcherTitleMethod "setStyle" o = Gtk.Widget.WidgetSetStyleMethodInfo
ResolveViewSwitcherTitleMethod "setSubtitle" o = ViewSwitcherTitleSetSubtitleMethodInfo
ResolveViewSwitcherTitleMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveViewSwitcherTitleMethod "setTitle" o = ViewSwitcherTitleSetTitleMethodInfo
ResolveViewSwitcherTitleMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveViewSwitcherTitleMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveViewSwitcherTitleMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolveViewSwitcherTitleMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveViewSwitcherTitleMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveViewSwitcherTitleMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveViewSwitcherTitleMethod "setViewSwitcherEnabled" o = ViewSwitcherTitleSetViewSwitcherEnabledMethodInfo
ResolveViewSwitcherTitleMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveViewSwitcherTitleMethod "setVisual" o = Gtk.Widget.WidgetSetVisualMethodInfo
ResolveViewSwitcherTitleMethod "setWindow" o = Gtk.Widget.WidgetSetWindowMethodInfo
ResolveViewSwitcherTitleMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveViewSwitcherTitleMethod t ViewSwitcherTitle, O.OverloadedMethod info ViewSwitcherTitle p) => OL.IsLabel t (ViewSwitcherTitle -> 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 ~ ResolveViewSwitcherTitleMethod t ViewSwitcherTitle, O.OverloadedMethod info ViewSwitcherTitle p, R.HasField t ViewSwitcherTitle p) => R.HasField t ViewSwitcherTitle p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveViewSwitcherTitleMethod t ViewSwitcherTitle, O.OverloadedMethodInfo info ViewSwitcherTitle) => OL.IsLabel t (O.MethodProxy info ViewSwitcherTitle) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
getViewSwitcherTitlePolicy :: (MonadIO m, IsViewSwitcherTitle o) => o -> m Handy.Enums.ViewSwitcherPolicy
getViewSwitcherTitlePolicy :: forall (m :: * -> *) o.
(MonadIO m, IsViewSwitcherTitle o) =>
o -> m ViewSwitcherPolicy
getViewSwitcherTitlePolicy o
obj = IO ViewSwitcherPolicy -> m ViewSwitcherPolicy
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO ViewSwitcherPolicy -> m ViewSwitcherPolicy)
-> IO ViewSwitcherPolicy -> m ViewSwitcherPolicy
forall a b. (a -> b) -> a -> b
$ o -> String -> IO ViewSwitcherPolicy
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj String
"policy"
setViewSwitcherTitlePolicy :: (MonadIO m, IsViewSwitcherTitle o) => o -> Handy.Enums.ViewSwitcherPolicy -> m ()
setViewSwitcherTitlePolicy :: forall (m :: * -> *) o.
(MonadIO m, IsViewSwitcherTitle o) =>
o -> ViewSwitcherPolicy -> m ()
setViewSwitcherTitlePolicy o
obj ViewSwitcherPolicy
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 -> ViewSwitcherPolicy -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj String
"policy" ViewSwitcherPolicy
val
constructViewSwitcherTitlePolicy :: (IsViewSwitcherTitle o, MIO.MonadIO m) => Handy.Enums.ViewSwitcherPolicy -> m (GValueConstruct o)
constructViewSwitcherTitlePolicy :: forall o (m :: * -> *).
(IsViewSwitcherTitle o, MonadIO m) =>
ViewSwitcherPolicy -> m (GValueConstruct o)
constructViewSwitcherTitlePolicy ViewSwitcherPolicy
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 -> ViewSwitcherPolicy -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum String
"policy" ViewSwitcherPolicy
val
#if defined(ENABLE_OVERLOADING)
data ViewSwitcherTitlePolicyPropertyInfo
instance AttrInfo ViewSwitcherTitlePolicyPropertyInfo where
type AttrAllowedOps ViewSwitcherTitlePolicyPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint ViewSwitcherTitlePolicyPropertyInfo = IsViewSwitcherTitle
type AttrSetTypeConstraint ViewSwitcherTitlePolicyPropertyInfo = (~) Handy.Enums.ViewSwitcherPolicy
type AttrTransferTypeConstraint ViewSwitcherTitlePolicyPropertyInfo = (~) Handy.Enums.ViewSwitcherPolicy
type AttrTransferType ViewSwitcherTitlePolicyPropertyInfo = Handy.Enums.ViewSwitcherPolicy
type AttrGetType ViewSwitcherTitlePolicyPropertyInfo = Handy.Enums.ViewSwitcherPolicy
type AttrLabel ViewSwitcherTitlePolicyPropertyInfo = "policy"
type AttrOrigin ViewSwitcherTitlePolicyPropertyInfo = ViewSwitcherTitle
attrGet = getViewSwitcherTitlePolicy
attrSet = setViewSwitcherTitlePolicy
attrTransfer _ v = do
return v
attrConstruct = constructViewSwitcherTitlePolicy
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.policy"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#g:attr:policy"
})
#endif
getViewSwitcherTitleStack :: (MonadIO m, IsViewSwitcherTitle o) => o -> m (Maybe Gtk.Stack.Stack)
getViewSwitcherTitleStack :: forall (m :: * -> *) o.
(MonadIO m, IsViewSwitcherTitle o) =>
o -> m (Maybe Stack)
getViewSwitcherTitleStack o
obj = IO (Maybe Stack) -> m (Maybe Stack)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Stack) -> m (Maybe Stack))
-> IO (Maybe Stack) -> m (Maybe Stack)
forall a b. (a -> b) -> a -> b
$ o -> String -> (ManagedPtr Stack -> Stack) -> IO (Maybe Stack)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj String
"stack" ManagedPtr Stack -> Stack
Gtk.Stack.Stack
setViewSwitcherTitleStack :: (MonadIO m, IsViewSwitcherTitle o, Gtk.Stack.IsStack a) => o -> a -> m ()
setViewSwitcherTitleStack :: forall (m :: * -> *) o a.
(MonadIO m, IsViewSwitcherTitle o, IsStack a) =>
o -> a -> m ()
setViewSwitcherTitleStack 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
"stack" (a -> Maybe a
forall a. a -> Maybe a
Just a
val)
constructViewSwitcherTitleStack :: (IsViewSwitcherTitle o, MIO.MonadIO m, Gtk.Stack.IsStack a) => a -> m (GValueConstruct o)
constructViewSwitcherTitleStack :: forall o (m :: * -> *) a.
(IsViewSwitcherTitle o, MonadIO m, IsStack a) =>
a -> m (GValueConstruct o)
constructViewSwitcherTitleStack 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
"stack" (a -> Maybe a
forall a. a -> Maybe a
P.Just a
val)
clearViewSwitcherTitleStack :: (MonadIO m, IsViewSwitcherTitle o) => o -> m ()
clearViewSwitcherTitleStack :: forall (m :: * -> *) o.
(MonadIO m, IsViewSwitcherTitle o) =>
o -> m ()
clearViewSwitcherTitleStack o
obj = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Stack -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"stack" (Maybe Stack
forall a. Maybe a
Nothing :: Maybe Gtk.Stack.Stack)
#if defined(ENABLE_OVERLOADING)
data ViewSwitcherTitleStackPropertyInfo
instance AttrInfo ViewSwitcherTitleStackPropertyInfo where
type AttrAllowedOps ViewSwitcherTitleStackPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint ViewSwitcherTitleStackPropertyInfo = IsViewSwitcherTitle
type AttrSetTypeConstraint ViewSwitcherTitleStackPropertyInfo = Gtk.Stack.IsStack
type AttrTransferTypeConstraint ViewSwitcherTitleStackPropertyInfo = Gtk.Stack.IsStack
type AttrTransferType ViewSwitcherTitleStackPropertyInfo = Gtk.Stack.Stack
type AttrGetType ViewSwitcherTitleStackPropertyInfo = (Maybe Gtk.Stack.Stack)
type AttrLabel ViewSwitcherTitleStackPropertyInfo = "stack"
type AttrOrigin ViewSwitcherTitleStackPropertyInfo = ViewSwitcherTitle
attrGet = getViewSwitcherTitleStack
attrSet = setViewSwitcherTitleStack
attrTransfer _ v = do
unsafeCastTo Gtk.Stack.Stack v
attrConstruct = constructViewSwitcherTitleStack
attrClear = clearViewSwitcherTitleStack
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.stack"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#g:attr:stack"
})
#endif
getViewSwitcherTitleSubtitle :: (MonadIO m, IsViewSwitcherTitle o) => o -> m (Maybe T.Text)
getViewSwitcherTitleSubtitle :: forall (m :: * -> *) o.
(MonadIO m, IsViewSwitcherTitle o) =>
o -> m (Maybe Text)
getViewSwitcherTitleSubtitle o
obj = IO (Maybe Text) -> m (Maybe Text)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe 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
"subtitle"
setViewSwitcherTitleSubtitle :: (MonadIO m, IsViewSwitcherTitle o) => o -> T.Text -> m ()
setViewSwitcherTitleSubtitle :: forall (m :: * -> *) o.
(MonadIO m, IsViewSwitcherTitle o) =>
o -> Text -> m ()
setViewSwitcherTitleSubtitle 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
"subtitle" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructViewSwitcherTitleSubtitle :: (IsViewSwitcherTitle o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructViewSwitcherTitleSubtitle :: forall o (m :: * -> *).
(IsViewSwitcherTitle o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructViewSwitcherTitleSubtitle 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
"subtitle" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearViewSwitcherTitleSubtitle :: (MonadIO m, IsViewSwitcherTitle o) => o -> m ()
clearViewSwitcherTitleSubtitle :: forall (m :: * -> *) o.
(MonadIO m, IsViewSwitcherTitle o) =>
o -> m ()
clearViewSwitcherTitleSubtitle o
obj = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"subtitle" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data ViewSwitcherTitleSubtitlePropertyInfo
instance AttrInfo ViewSwitcherTitleSubtitlePropertyInfo where
type AttrAllowedOps ViewSwitcherTitleSubtitlePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint ViewSwitcherTitleSubtitlePropertyInfo = IsViewSwitcherTitle
type AttrSetTypeConstraint ViewSwitcherTitleSubtitlePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint ViewSwitcherTitleSubtitlePropertyInfo = (~) T.Text
type AttrTransferType ViewSwitcherTitleSubtitlePropertyInfo = T.Text
type AttrGetType ViewSwitcherTitleSubtitlePropertyInfo = (Maybe T.Text)
type AttrLabel ViewSwitcherTitleSubtitlePropertyInfo = "subtitle"
type AttrOrigin ViewSwitcherTitleSubtitlePropertyInfo = ViewSwitcherTitle
attrGet = getViewSwitcherTitleSubtitle
attrSet = setViewSwitcherTitleSubtitle
attrTransfer _ v = do
return v
attrConstruct = constructViewSwitcherTitleSubtitle
attrClear = clearViewSwitcherTitleSubtitle
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.subtitle"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#g:attr:subtitle"
})
#endif
getViewSwitcherTitleTitle :: (MonadIO m, IsViewSwitcherTitle o) => o -> m (Maybe T.Text)
getViewSwitcherTitleTitle :: forall (m :: * -> *) o.
(MonadIO m, IsViewSwitcherTitle o) =>
o -> m (Maybe Text)
getViewSwitcherTitleTitle o
obj = IO (Maybe Text) -> m (Maybe Text)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe 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"
setViewSwitcherTitleTitle :: (MonadIO m, IsViewSwitcherTitle o) => o -> T.Text -> m ()
setViewSwitcherTitleTitle :: forall (m :: * -> *) o.
(MonadIO m, IsViewSwitcherTitle o) =>
o -> Text -> m ()
setViewSwitcherTitleTitle 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)
constructViewSwitcherTitleTitle :: (IsViewSwitcherTitle o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructViewSwitcherTitleTitle :: forall o (m :: * -> *).
(IsViewSwitcherTitle o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructViewSwitcherTitleTitle 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)
clearViewSwitcherTitleTitle :: (MonadIO m, IsViewSwitcherTitle o) => o -> m ()
clearViewSwitcherTitleTitle :: forall (m :: * -> *) o.
(MonadIO m, IsViewSwitcherTitle o) =>
o -> m ()
clearViewSwitcherTitleTitle o
obj = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"title" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data ViewSwitcherTitleTitlePropertyInfo
instance AttrInfo ViewSwitcherTitleTitlePropertyInfo where
type AttrAllowedOps ViewSwitcherTitleTitlePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint ViewSwitcherTitleTitlePropertyInfo = IsViewSwitcherTitle
type AttrSetTypeConstraint ViewSwitcherTitleTitlePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint ViewSwitcherTitleTitlePropertyInfo = (~) T.Text
type AttrTransferType ViewSwitcherTitleTitlePropertyInfo = T.Text
type AttrGetType ViewSwitcherTitleTitlePropertyInfo = (Maybe T.Text)
type AttrLabel ViewSwitcherTitleTitlePropertyInfo = "title"
type AttrOrigin ViewSwitcherTitleTitlePropertyInfo = ViewSwitcherTitle
attrGet = getViewSwitcherTitleTitle
attrSet = setViewSwitcherTitleTitle
attrTransfer _ v = do
return v
attrConstruct = constructViewSwitcherTitleTitle
attrClear = clearViewSwitcherTitleTitle
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.title"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#g:attr:title"
})
#endif
getViewSwitcherTitleTitleVisible :: (MonadIO m, IsViewSwitcherTitle o) => o -> m Bool
getViewSwitcherTitleTitleVisible :: forall (m :: * -> *) o.
(MonadIO m, IsViewSwitcherTitle o) =>
o -> m Bool
getViewSwitcherTitleTitleVisible 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
"title-visible"
#if defined(ENABLE_OVERLOADING)
data ViewSwitcherTitleTitleVisiblePropertyInfo
instance AttrInfo ViewSwitcherTitleTitleVisiblePropertyInfo where
type AttrAllowedOps ViewSwitcherTitleTitleVisiblePropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint ViewSwitcherTitleTitleVisiblePropertyInfo = IsViewSwitcherTitle
type AttrSetTypeConstraint ViewSwitcherTitleTitleVisiblePropertyInfo = (~) ()
type AttrTransferTypeConstraint ViewSwitcherTitleTitleVisiblePropertyInfo = (~) ()
type AttrTransferType ViewSwitcherTitleTitleVisiblePropertyInfo = ()
type AttrGetType ViewSwitcherTitleTitleVisiblePropertyInfo = Bool
type AttrLabel ViewSwitcherTitleTitleVisiblePropertyInfo = "title-visible"
type AttrOrigin ViewSwitcherTitleTitleVisiblePropertyInfo = ViewSwitcherTitle
attrGet = getViewSwitcherTitleTitleVisible
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.titleVisible"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#g:attr:titleVisible"
})
#endif
getViewSwitcherTitleViewSwitcherEnabled :: (MonadIO m, IsViewSwitcherTitle o) => o -> m Bool
getViewSwitcherTitleViewSwitcherEnabled :: forall (m :: * -> *) o.
(MonadIO m, IsViewSwitcherTitle o) =>
o -> m Bool
getViewSwitcherTitleViewSwitcherEnabled 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
"view-switcher-enabled"
setViewSwitcherTitleViewSwitcherEnabled :: (MonadIO m, IsViewSwitcherTitle o) => o -> Bool -> m ()
setViewSwitcherTitleViewSwitcherEnabled :: forall (m :: * -> *) o.
(MonadIO m, IsViewSwitcherTitle o) =>
o -> Bool -> m ()
setViewSwitcherTitleViewSwitcherEnabled 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
"view-switcher-enabled" Bool
val
constructViewSwitcherTitleViewSwitcherEnabled :: (IsViewSwitcherTitle o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructViewSwitcherTitleViewSwitcherEnabled :: forall o (m :: * -> *).
(IsViewSwitcherTitle o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructViewSwitcherTitleViewSwitcherEnabled 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
"view-switcher-enabled" Bool
val
#if defined(ENABLE_OVERLOADING)
data ViewSwitcherTitleViewSwitcherEnabledPropertyInfo
instance AttrInfo ViewSwitcherTitleViewSwitcherEnabledPropertyInfo where
type AttrAllowedOps ViewSwitcherTitleViewSwitcherEnabledPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint ViewSwitcherTitleViewSwitcherEnabledPropertyInfo = IsViewSwitcherTitle
type AttrSetTypeConstraint ViewSwitcherTitleViewSwitcherEnabledPropertyInfo = (~) Bool
type AttrTransferTypeConstraint ViewSwitcherTitleViewSwitcherEnabledPropertyInfo = (~) Bool
type AttrTransferType ViewSwitcherTitleViewSwitcherEnabledPropertyInfo = Bool
type AttrGetType ViewSwitcherTitleViewSwitcherEnabledPropertyInfo = Bool
type AttrLabel ViewSwitcherTitleViewSwitcherEnabledPropertyInfo = "view-switcher-enabled"
type AttrOrigin ViewSwitcherTitleViewSwitcherEnabledPropertyInfo = ViewSwitcherTitle
attrGet = getViewSwitcherTitleViewSwitcherEnabled
attrSet = setViewSwitcherTitleViewSwitcherEnabled
attrTransfer _ v = do
return v
attrConstruct = constructViewSwitcherTitleViewSwitcherEnabled
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.viewSwitcherEnabled"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#g:attr:viewSwitcherEnabled"
})
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList ViewSwitcherTitle
type instance O.AttributeList ViewSwitcherTitle = ViewSwitcherTitleAttributeList
type ViewSwitcherTitleAttributeList = ('[ '("appPaintable", Gtk.Widget.WidgetAppPaintablePropertyInfo), '("borderWidth", Gtk.Container.ContainerBorderWidthPropertyInfo), '("canDefault", Gtk.Widget.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("child", Gtk.Container.ContainerChildPropertyInfo), '("compositeChild", Gtk.Widget.WidgetCompositeChildPropertyInfo), '("doubleBuffered", Gtk.Widget.WidgetDoubleBufferedPropertyInfo), '("events", Gtk.Widget.WidgetEventsPropertyInfo), '("expand", Gtk.Widget.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("isFocus", Gtk.Widget.WidgetIsFocusPropertyInfo), '("margin", Gtk.Widget.WidgetMarginPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.Widget.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.Widget.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("noShowAll", Gtk.Widget.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("policy", ViewSwitcherTitlePolicyPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("resizeMode", Gtk.Container.ContainerResizeModePropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("stack", ViewSwitcherTitleStackPropertyInfo), '("style", Gtk.Widget.WidgetStylePropertyInfo), '("subtitle", ViewSwitcherTitleSubtitlePropertyInfo), '("title", ViewSwitcherTitleTitlePropertyInfo), '("titleVisible", ViewSwitcherTitleTitleVisiblePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("viewSwitcherEnabled", ViewSwitcherTitleViewSwitcherEnabledPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("window", Gtk.Widget.WidgetWindowPropertyInfo)] :: [(Symbol, DK.Type)])
#endif
#if defined(ENABLE_OVERLOADING)
viewSwitcherTitlePolicy :: AttrLabelProxy "policy"
viewSwitcherTitlePolicy = AttrLabelProxy
viewSwitcherTitleStack :: AttrLabelProxy "stack"
viewSwitcherTitleStack = AttrLabelProxy
viewSwitcherTitleSubtitle :: AttrLabelProxy "subtitle"
viewSwitcherTitleSubtitle = AttrLabelProxy
viewSwitcherTitleTitle :: AttrLabelProxy "title"
viewSwitcherTitleTitle = AttrLabelProxy
viewSwitcherTitleTitleVisible :: AttrLabelProxy "titleVisible"
viewSwitcherTitleTitleVisible = AttrLabelProxy
viewSwitcherTitleViewSwitcherEnabled :: AttrLabelProxy "viewSwitcherEnabled"
viewSwitcherTitleViewSwitcherEnabled = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList ViewSwitcherTitle = ViewSwitcherTitleSignalList
type ViewSwitcherTitleSignalList = ('[ '("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), '("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 "hdy_view_switcher_title_new" hdy_view_switcher_title_new ::
IO (Ptr ViewSwitcherTitle)
viewSwitcherTitleNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m ViewSwitcherTitle
viewSwitcherTitleNew :: forall (m :: * -> *).
(HasCallStack, MonadIO m) =>
m ViewSwitcherTitle
viewSwitcherTitleNew = IO ViewSwitcherTitle -> m ViewSwitcherTitle
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO ViewSwitcherTitle -> m ViewSwitcherTitle)
-> IO ViewSwitcherTitle -> m ViewSwitcherTitle
forall a b. (a -> b) -> a -> b
$ do
Ptr ViewSwitcherTitle
result <- IO (Ptr ViewSwitcherTitle)
hdy_view_switcher_title_new
Text -> Ptr ViewSwitcherTitle -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"viewSwitcherTitleNew" Ptr ViewSwitcherTitle
result
ViewSwitcherTitle
result' <- ((ManagedPtr ViewSwitcherTitle -> ViewSwitcherTitle)
-> Ptr ViewSwitcherTitle -> IO ViewSwitcherTitle
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr ViewSwitcherTitle -> ViewSwitcherTitle
ViewSwitcherTitle) Ptr ViewSwitcherTitle
result
ViewSwitcherTitle -> IO ViewSwitcherTitle
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ViewSwitcherTitle
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "hdy_view_switcher_title_get_policy" hdy_view_switcher_title_get_policy ::
Ptr ViewSwitcherTitle ->
IO CUInt
viewSwitcherTitleGetPolicy ::
(B.CallStack.HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a
-> m Handy.Enums.ViewSwitcherPolicy
viewSwitcherTitleGetPolicy :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a -> m ViewSwitcherPolicy
viewSwitcherTitleGetPolicy a
self = IO ViewSwitcherPolicy -> m ViewSwitcherPolicy
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO ViewSwitcherPolicy -> m ViewSwitcherPolicy)
-> IO ViewSwitcherPolicy -> m ViewSwitcherPolicy
forall a b. (a -> b) -> a -> b
$ do
Ptr ViewSwitcherTitle
self' <- a -> IO (Ptr ViewSwitcherTitle)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CUInt
result <- Ptr ViewSwitcherTitle -> IO CUInt
hdy_view_switcher_title_get_policy Ptr ViewSwitcherTitle
self'
let result' :: ViewSwitcherPolicy
result' = (Int -> ViewSwitcherPolicy
forall a. Enum a => Int -> a
toEnum (Int -> ViewSwitcherPolicy)
-> (CUInt -> Int) -> CUInt -> ViewSwitcherPolicy
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
ViewSwitcherPolicy -> IO ViewSwitcherPolicy
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ViewSwitcherPolicy
result'
#if defined(ENABLE_OVERLOADING)
data ViewSwitcherTitleGetPolicyMethodInfo
instance (signature ~ (m Handy.Enums.ViewSwitcherPolicy), MonadIO m, IsViewSwitcherTitle a) => O.OverloadedMethod ViewSwitcherTitleGetPolicyMethodInfo a signature where
overloadedMethod = viewSwitcherTitleGetPolicy
instance O.OverloadedMethodInfo ViewSwitcherTitleGetPolicyMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.viewSwitcherTitleGetPolicy",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#v:viewSwitcherTitleGetPolicy"
})
#endif
foreign import ccall "hdy_view_switcher_title_get_stack" hdy_view_switcher_title_get_stack ::
Ptr ViewSwitcherTitle ->
IO (Ptr Gtk.Stack.Stack)
viewSwitcherTitleGetStack ::
(B.CallStack.HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a
-> m (Maybe Gtk.Stack.Stack)
viewSwitcherTitleGetStack :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a -> m (Maybe Stack)
viewSwitcherTitleGetStack a
self = IO (Maybe Stack) -> m (Maybe Stack)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Stack) -> m (Maybe Stack))
-> IO (Maybe Stack) -> m (Maybe Stack)
forall a b. (a -> b) -> a -> b
$ do
Ptr ViewSwitcherTitle
self' <- a -> IO (Ptr ViewSwitcherTitle)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Stack
result <- Ptr ViewSwitcherTitle -> IO (Ptr Stack)
hdy_view_switcher_title_get_stack Ptr ViewSwitcherTitle
self'
Maybe Stack
maybeResult <- Ptr Stack -> (Ptr Stack -> IO Stack) -> IO (Maybe Stack)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr Stack
result ((Ptr Stack -> IO Stack) -> IO (Maybe Stack))
-> (Ptr Stack -> IO Stack) -> IO (Maybe Stack)
forall a b. (a -> b) -> a -> b
$ \Ptr Stack
result' -> do
Stack
result'' <- ((ManagedPtr Stack -> Stack) -> Ptr Stack -> IO Stack
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Stack -> Stack
Gtk.Stack.Stack) Ptr Stack
result'
Stack -> IO Stack
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Stack
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe Stack -> IO (Maybe Stack)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Stack
maybeResult
#if defined(ENABLE_OVERLOADING)
data ViewSwitcherTitleGetStackMethodInfo
instance (signature ~ (m (Maybe Gtk.Stack.Stack)), MonadIO m, IsViewSwitcherTitle a) => O.OverloadedMethod ViewSwitcherTitleGetStackMethodInfo a signature where
overloadedMethod = viewSwitcherTitleGetStack
instance O.OverloadedMethodInfo ViewSwitcherTitleGetStackMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.viewSwitcherTitleGetStack",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#v:viewSwitcherTitleGetStack"
})
#endif
foreign import ccall "hdy_view_switcher_title_get_subtitle" hdy_view_switcher_title_get_subtitle ::
Ptr ViewSwitcherTitle ->
IO CString
viewSwitcherTitleGetSubtitle ::
(B.CallStack.HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a
-> m (Maybe T.Text)
viewSwitcherTitleGetSubtitle :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a -> m (Maybe Text)
viewSwitcherTitleGetSubtitle a
self = IO (Maybe Text) -> m (Maybe Text)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ do
Ptr ViewSwitcherTitle
self' <- a -> IO (Ptr ViewSwitcherTitle)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr ViewSwitcherTitle -> IO CString
hdy_view_switcher_title_get_subtitle Ptr ViewSwitcherTitle
self'
Maybe Text
maybeResult <- CString -> (CString -> IO Text) -> IO (Maybe Text)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull CString
result ((CString -> IO Text) -> IO (Maybe Text))
-> (CString -> IO Text) -> IO (Maybe Text)
forall a b. (a -> b) -> a -> b
$ \CString
result' -> do
Text
result'' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result'
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe Text -> IO (Maybe Text)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Text
maybeResult
#if defined(ENABLE_OVERLOADING)
data ViewSwitcherTitleGetSubtitleMethodInfo
instance (signature ~ (m (Maybe T.Text)), MonadIO m, IsViewSwitcherTitle a) => O.OverloadedMethod ViewSwitcherTitleGetSubtitleMethodInfo a signature where
overloadedMethod = viewSwitcherTitleGetSubtitle
instance O.OverloadedMethodInfo ViewSwitcherTitleGetSubtitleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.viewSwitcherTitleGetSubtitle",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#v:viewSwitcherTitleGetSubtitle"
})
#endif
foreign import ccall "hdy_view_switcher_title_get_title" hdy_view_switcher_title_get_title ::
Ptr ViewSwitcherTitle ->
IO CString
viewSwitcherTitleGetTitle ::
(B.CallStack.HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a
-> m (Maybe T.Text)
viewSwitcherTitleGetTitle :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a -> m (Maybe Text)
viewSwitcherTitleGetTitle a
self = IO (Maybe Text) -> m (Maybe Text)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ do
Ptr ViewSwitcherTitle
self' <- a -> IO (Ptr ViewSwitcherTitle)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr ViewSwitcherTitle -> IO CString
hdy_view_switcher_title_get_title Ptr ViewSwitcherTitle
self'
Maybe Text
maybeResult <- CString -> (CString -> IO Text) -> IO (Maybe Text)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull CString
result ((CString -> IO Text) -> IO (Maybe Text))
-> (CString -> IO Text) -> IO (Maybe Text)
forall a b. (a -> b) -> a -> b
$ \CString
result' -> do
Text
result'' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result'
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe Text -> IO (Maybe Text)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Text
maybeResult
#if defined(ENABLE_OVERLOADING)
data ViewSwitcherTitleGetTitleMethodInfo
instance (signature ~ (m (Maybe T.Text)), MonadIO m, IsViewSwitcherTitle a) => O.OverloadedMethod ViewSwitcherTitleGetTitleMethodInfo a signature where
overloadedMethod = viewSwitcherTitleGetTitle
instance O.OverloadedMethodInfo ViewSwitcherTitleGetTitleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.viewSwitcherTitleGetTitle",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#v:viewSwitcherTitleGetTitle"
})
#endif
foreign import ccall "hdy_view_switcher_title_get_title_visible" hdy_view_switcher_title_get_title_visible ::
Ptr ViewSwitcherTitle ->
IO CInt
viewSwitcherTitleGetTitleVisible ::
(B.CallStack.HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a
-> m Bool
viewSwitcherTitleGetTitleVisible :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a -> m Bool
viewSwitcherTitleGetTitleVisible 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 ViewSwitcherTitle
self' <- a -> IO (Ptr ViewSwitcherTitle)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr ViewSwitcherTitle -> IO CInt
hdy_view_switcher_title_get_title_visible Ptr ViewSwitcherTitle
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 ViewSwitcherTitleGetTitleVisibleMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsViewSwitcherTitle a) => O.OverloadedMethod ViewSwitcherTitleGetTitleVisibleMethodInfo a signature where
overloadedMethod = viewSwitcherTitleGetTitleVisible
instance O.OverloadedMethodInfo ViewSwitcherTitleGetTitleVisibleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.viewSwitcherTitleGetTitleVisible",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#v:viewSwitcherTitleGetTitleVisible"
})
#endif
foreign import ccall "hdy_view_switcher_title_get_view_switcher_enabled" hdy_view_switcher_title_get_view_switcher_enabled ::
Ptr ViewSwitcherTitle ->
IO CInt
viewSwitcherTitleGetViewSwitcherEnabled ::
(B.CallStack.HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a
-> m Bool
viewSwitcherTitleGetViewSwitcherEnabled :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a -> m Bool
viewSwitcherTitleGetViewSwitcherEnabled 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 ViewSwitcherTitle
self' <- a -> IO (Ptr ViewSwitcherTitle)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr ViewSwitcherTitle -> IO CInt
hdy_view_switcher_title_get_view_switcher_enabled Ptr ViewSwitcherTitle
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 ViewSwitcherTitleGetViewSwitcherEnabledMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsViewSwitcherTitle a) => O.OverloadedMethod ViewSwitcherTitleGetViewSwitcherEnabledMethodInfo a signature where
overloadedMethod = viewSwitcherTitleGetViewSwitcherEnabled
instance O.OverloadedMethodInfo ViewSwitcherTitleGetViewSwitcherEnabledMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.viewSwitcherTitleGetViewSwitcherEnabled",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#v:viewSwitcherTitleGetViewSwitcherEnabled"
})
#endif
foreign import ccall "hdy_view_switcher_title_set_policy" hdy_view_switcher_title_set_policy ::
Ptr ViewSwitcherTitle ->
CUInt ->
IO ()
viewSwitcherTitleSetPolicy ::
(B.CallStack.HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a
-> Handy.Enums.ViewSwitcherPolicy
-> m ()
viewSwitcherTitleSetPolicy :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a -> ViewSwitcherPolicy -> m ()
viewSwitcherTitleSetPolicy a
self ViewSwitcherPolicy
policy = 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 ViewSwitcherTitle
self' <- a -> IO (Ptr ViewSwitcherTitle)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let policy' :: CUInt
policy' = (Int -> CUInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CUInt)
-> (ViewSwitcherPolicy -> Int) -> ViewSwitcherPolicy -> CUInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. ViewSwitcherPolicy -> Int
forall a. Enum a => a -> Int
fromEnum) ViewSwitcherPolicy
policy
Ptr ViewSwitcherTitle -> CUInt -> IO ()
hdy_view_switcher_title_set_policy Ptr ViewSwitcherTitle
self' CUInt
policy'
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 ViewSwitcherTitleSetPolicyMethodInfo
instance (signature ~ (Handy.Enums.ViewSwitcherPolicy -> m ()), MonadIO m, IsViewSwitcherTitle a) => O.OverloadedMethod ViewSwitcherTitleSetPolicyMethodInfo a signature where
overloadedMethod = viewSwitcherTitleSetPolicy
instance O.OverloadedMethodInfo ViewSwitcherTitleSetPolicyMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.viewSwitcherTitleSetPolicy",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#v:viewSwitcherTitleSetPolicy"
})
#endif
foreign import ccall "hdy_view_switcher_title_set_stack" hdy_view_switcher_title_set_stack ::
Ptr ViewSwitcherTitle ->
Ptr Gtk.Stack.Stack ->
IO ()
viewSwitcherTitleSetStack ::
(B.CallStack.HasCallStack, MonadIO m, IsViewSwitcherTitle a, Gtk.Stack.IsStack b) =>
a
-> Maybe (b)
-> m ()
viewSwitcherTitleSetStack :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsViewSwitcherTitle a, IsStack b) =>
a -> Maybe b -> m ()
viewSwitcherTitleSetStack a
self Maybe b
stack = 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 ViewSwitcherTitle
self' <- a -> IO (Ptr ViewSwitcherTitle)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Stack
maybeStack <- case Maybe b
stack of
Maybe b
Nothing -> Ptr Stack -> IO (Ptr Stack)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Stack
forall a. Ptr a
nullPtr
Just b
jStack -> do
Ptr Stack
jStack' <- b -> IO (Ptr Stack)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jStack
Ptr Stack -> IO (Ptr Stack)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Stack
jStack'
Ptr ViewSwitcherTitle -> Ptr Stack -> IO ()
hdy_view_switcher_title_set_stack Ptr ViewSwitcherTitle
self' Ptr Stack
maybeStack
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe b -> (b -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe b
stack b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ViewSwitcherTitleSetStackMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsViewSwitcherTitle a, Gtk.Stack.IsStack b) => O.OverloadedMethod ViewSwitcherTitleSetStackMethodInfo a signature where
overloadedMethod = viewSwitcherTitleSetStack
instance O.OverloadedMethodInfo ViewSwitcherTitleSetStackMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.viewSwitcherTitleSetStack",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#v:viewSwitcherTitleSetStack"
})
#endif
foreign import ccall "hdy_view_switcher_title_set_subtitle" hdy_view_switcher_title_set_subtitle ::
Ptr ViewSwitcherTitle ->
CString ->
IO ()
viewSwitcherTitleSetSubtitle ::
(B.CallStack.HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a
-> Maybe (T.Text)
-> m ()
viewSwitcherTitleSetSubtitle :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a -> Maybe Text -> m ()
viewSwitcherTitleSetSubtitle a
self Maybe Text
subtitle = 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 ViewSwitcherTitle
self' <- a -> IO (Ptr ViewSwitcherTitle)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
maybeSubtitle <- case Maybe Text
subtitle of
Maybe Text
Nothing -> CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
forall a. Ptr a
nullPtr
Just Text
jSubtitle -> do
CString
jSubtitle' <- Text -> IO CString
textToCString Text
jSubtitle
CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jSubtitle'
Ptr ViewSwitcherTitle -> CString -> IO ()
hdy_view_switcher_title_set_subtitle Ptr ViewSwitcherTitle
self' CString
maybeSubtitle
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
maybeSubtitle
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ViewSwitcherTitleSetSubtitleMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsViewSwitcherTitle a) => O.OverloadedMethod ViewSwitcherTitleSetSubtitleMethodInfo a signature where
overloadedMethod = viewSwitcherTitleSetSubtitle
instance O.OverloadedMethodInfo ViewSwitcherTitleSetSubtitleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.viewSwitcherTitleSetSubtitle",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#v:viewSwitcherTitleSetSubtitle"
})
#endif
foreign import ccall "hdy_view_switcher_title_set_title" hdy_view_switcher_title_set_title ::
Ptr ViewSwitcherTitle ->
CString ->
IO ()
viewSwitcherTitleSetTitle ::
(B.CallStack.HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a
-> Maybe (T.Text)
-> m ()
viewSwitcherTitleSetTitle :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a -> Maybe Text -> m ()
viewSwitcherTitleSetTitle a
self Maybe 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 ViewSwitcherTitle
self' <- a -> IO (Ptr ViewSwitcherTitle)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
maybeTitle <- case Maybe Text
title of
Maybe Text
Nothing -> CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
forall a. Ptr a
nullPtr
Just Text
jTitle -> do
CString
jTitle' <- Text -> IO CString
textToCString Text
jTitle
CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jTitle'
Ptr ViewSwitcherTitle -> CString -> IO ()
hdy_view_switcher_title_set_title Ptr ViewSwitcherTitle
self' CString
maybeTitle
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
maybeTitle
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ViewSwitcherTitleSetTitleMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsViewSwitcherTitle a) => O.OverloadedMethod ViewSwitcherTitleSetTitleMethodInfo a signature where
overloadedMethod = viewSwitcherTitleSetTitle
instance O.OverloadedMethodInfo ViewSwitcherTitleSetTitleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.viewSwitcherTitleSetTitle",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#v:viewSwitcherTitleSetTitle"
})
#endif
foreign import ccall "hdy_view_switcher_title_set_view_switcher_enabled" hdy_view_switcher_title_set_view_switcher_enabled ::
Ptr ViewSwitcherTitle ->
CInt ->
IO ()
viewSwitcherTitleSetViewSwitcherEnabled ::
(B.CallStack.HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a
-> Bool
-> m ()
viewSwitcherTitleSetViewSwitcherEnabled :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsViewSwitcherTitle a) =>
a -> Bool -> m ()
viewSwitcherTitleSetViewSwitcherEnabled a
self Bool
enabled = 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 ViewSwitcherTitle
self' <- a -> IO (Ptr ViewSwitcherTitle)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let enabled' :: CInt
enabled' = (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
enabled
Ptr ViewSwitcherTitle -> CInt -> IO ()
hdy_view_switcher_title_set_view_switcher_enabled Ptr ViewSwitcherTitle
self' CInt
enabled'
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 ViewSwitcherTitleSetViewSwitcherEnabledMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsViewSwitcherTitle a) => O.OverloadedMethod ViewSwitcherTitleSetViewSwitcherEnabledMethodInfo a signature where
overloadedMethod = viewSwitcherTitleSetViewSwitcherEnabled
instance O.OverloadedMethodInfo ViewSwitcherTitleSetViewSwitcherEnabledMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Handy.Objects.ViewSwitcherTitle.viewSwitcherTitleSetViewSwitcherEnabled",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-handy-1.0.4/docs/GI-Handy-Objects-ViewSwitcherTitle.html#v:viewSwitcherTitleSetViewSwitcherEnabled"
})
#endif