{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gtk.Objects.ActionBar
(
ActionBar(..) ,
IsActionBar ,
toActionBar ,
#if defined(ENABLE_OVERLOADING)
ResolveActionBarMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
ActionBarGetCenterWidgetMethodInfo ,
#endif
actionBarGetCenterWidget ,
#if defined(ENABLE_OVERLOADING)
ActionBarGetRevealedMethodInfo ,
#endif
actionBarGetRevealed ,
actionBarNew ,
#if defined(ENABLE_OVERLOADING)
ActionBarPackEndMethodInfo ,
#endif
actionBarPackEnd ,
#if defined(ENABLE_OVERLOADING)
ActionBarPackStartMethodInfo ,
#endif
actionBarPackStart ,
#if defined(ENABLE_OVERLOADING)
ActionBarRemoveMethodInfo ,
#endif
actionBarRemove ,
#if defined(ENABLE_OVERLOADING)
ActionBarSetCenterWidgetMethodInfo ,
#endif
actionBarSetCenterWidget ,
#if defined(ENABLE_OVERLOADING)
ActionBarSetRevealedMethodInfo ,
#endif
actionBarSetRevealed ,
#if defined(ENABLE_OVERLOADING)
ActionBarRevealedPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
actionBarRevealed ,
#endif
constructActionBarRevealed ,
getActionBarRevealed ,
setActionBarRevealed ,
) 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.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.ConstraintTarget as Gtk.ConstraintTarget
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype ActionBar = ActionBar (SP.ManagedPtr ActionBar)
deriving (ActionBar -> ActionBar -> Bool
(ActionBar -> ActionBar -> Bool)
-> (ActionBar -> ActionBar -> Bool) -> Eq ActionBar
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: ActionBar -> ActionBar -> Bool
$c/= :: ActionBar -> ActionBar -> Bool
== :: ActionBar -> ActionBar -> Bool
$c== :: ActionBar -> ActionBar -> Bool
Eq)
instance SP.ManagedPtrNewtype ActionBar where
toManagedPtr :: ActionBar -> ManagedPtr ActionBar
toManagedPtr (ActionBar ManagedPtr ActionBar
p) = ManagedPtr ActionBar
p
foreign import ccall "gtk_action_bar_get_type"
c_gtk_action_bar_get_type :: IO B.Types.GType
instance B.Types.TypedObject ActionBar where
glibType :: IO GType
glibType = IO GType
c_gtk_action_bar_get_type
instance B.Types.GObject ActionBar
instance B.GValue.IsGValue ActionBar where
toGValue :: ActionBar -> IO GValue
toGValue ActionBar
o = do
GType
gtype <- IO GType
c_gtk_action_bar_get_type
ActionBar -> (Ptr ActionBar -> IO GValue) -> IO GValue
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr ActionBar
o (GType
-> (GValue -> Ptr ActionBar -> IO ()) -> Ptr ActionBar -> IO GValue
forall a. GType -> (GValue -> a -> IO ()) -> a -> IO GValue
B.GValue.buildGValue GType
gtype GValue -> Ptr ActionBar -> IO ()
forall a. GObject a => GValue -> Ptr a -> IO ()
B.GValue.set_object)
fromGValue :: GValue -> IO ActionBar
fromGValue GValue
gv = do
Ptr ActionBar
ptr <- GValue -> IO (Ptr ActionBar)
forall b. GObject b => GValue -> IO (Ptr b)
B.GValue.get_object GValue
gv :: IO (Ptr ActionBar)
(ManagedPtr ActionBar -> ActionBar)
-> Ptr ActionBar -> IO ActionBar
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr ActionBar -> ActionBar
ActionBar Ptr ActionBar
ptr
class (SP.GObject o, O.IsDescendantOf ActionBar o) => IsActionBar o
instance (SP.GObject o, O.IsDescendantOf ActionBar o) => IsActionBar o
instance O.HasParentTypes ActionBar
type instance O.ParentTypes ActionBar = '[Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable, Gtk.ConstraintTarget.ConstraintTarget]
toActionBar :: (MonadIO m, IsActionBar o) => o -> m ActionBar
toActionBar :: o -> m ActionBar
toActionBar = IO ActionBar -> m ActionBar
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO ActionBar -> m ActionBar)
-> (o -> IO ActionBar) -> o -> m ActionBar
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr ActionBar -> ActionBar) -> o -> IO ActionBar
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
unsafeCastTo ManagedPtr ActionBar -> ActionBar
ActionBar
#if defined(ENABLE_OVERLOADING)
type family ResolveActionBarMethod (t :: Symbol) (o :: *) :: * where
ResolveActionBarMethod "actionSetEnabled" o = Gtk.Widget.WidgetActionSetEnabledMethodInfo
ResolveActionBarMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveActionBarMethod "activateAction" o = Gtk.Widget.WidgetActivateActionMethodInfo
ResolveActionBarMethod "activateDefault" o = Gtk.Widget.WidgetActivateDefaultMethodInfo
ResolveActionBarMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveActionBarMethod "addController" o = Gtk.Widget.WidgetAddControllerMethodInfo
ResolveActionBarMethod "addCssClass" o = Gtk.Widget.WidgetAddCssClassMethodInfo
ResolveActionBarMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveActionBarMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveActionBarMethod "allocate" o = Gtk.Widget.WidgetAllocateMethodInfo
ResolveActionBarMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveActionBarMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveActionBarMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveActionBarMethod "computeBounds" o = Gtk.Widget.WidgetComputeBoundsMethodInfo
ResolveActionBarMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveActionBarMethod "computePoint" o = Gtk.Widget.WidgetComputePointMethodInfo
ResolveActionBarMethod "computeTransform" o = Gtk.Widget.WidgetComputeTransformMethodInfo
ResolveActionBarMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveActionBarMethod "contains" o = Gtk.Widget.WidgetContainsMethodInfo
ResolveActionBarMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveActionBarMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveActionBarMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveActionBarMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveActionBarMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveActionBarMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveActionBarMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveActionBarMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveActionBarMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveActionBarMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveActionBarMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveActionBarMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveActionBarMethod "hasCssClass" o = Gtk.Widget.WidgetHasCssClassMethodInfo
ResolveActionBarMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveActionBarMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveActionBarMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveActionBarMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveActionBarMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveActionBarMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveActionBarMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveActionBarMethod "insertAfter" o = Gtk.Widget.WidgetInsertAfterMethodInfo
ResolveActionBarMethod "insertBefore" o = Gtk.Widget.WidgetInsertBeforeMethodInfo
ResolveActionBarMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveActionBarMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveActionBarMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveActionBarMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveActionBarMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveActionBarMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveActionBarMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveActionBarMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveActionBarMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveActionBarMethod "measure" o = Gtk.Widget.WidgetMeasureMethodInfo
ResolveActionBarMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveActionBarMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveActionBarMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveActionBarMethod "observeChildren" o = Gtk.Widget.WidgetObserveChildrenMethodInfo
ResolveActionBarMethod "observeControllers" o = Gtk.Widget.WidgetObserveControllersMethodInfo
ResolveActionBarMethod "packEnd" o = ActionBarPackEndMethodInfo
ResolveActionBarMethod "packStart" o = ActionBarPackStartMethodInfo
ResolveActionBarMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveActionBarMethod "pick" o = Gtk.Widget.WidgetPickMethodInfo
ResolveActionBarMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveActionBarMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveActionBarMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveActionBarMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveActionBarMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveActionBarMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveActionBarMethod "remove" o = ActionBarRemoveMethodInfo
ResolveActionBarMethod "removeController" o = Gtk.Widget.WidgetRemoveControllerMethodInfo
ResolveActionBarMethod "removeCssClass" o = Gtk.Widget.WidgetRemoveCssClassMethodInfo
ResolveActionBarMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveActionBarMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveActionBarMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveActionBarMethod "shouldLayout" o = Gtk.Widget.WidgetShouldLayoutMethodInfo
ResolveActionBarMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveActionBarMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveActionBarMethod "snapshotChild" o = Gtk.Widget.WidgetSnapshotChildMethodInfo
ResolveActionBarMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveActionBarMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveActionBarMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveActionBarMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveActionBarMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveActionBarMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveActionBarMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveActionBarMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveActionBarMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveActionBarMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveActionBarMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveActionBarMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveActionBarMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveActionBarMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveActionBarMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveActionBarMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveActionBarMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveActionBarMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveActionBarMethod "getCanTarget" o = Gtk.Widget.WidgetGetCanTargetMethodInfo
ResolveActionBarMethod "getCenterWidget" o = ActionBarGetCenterWidgetMethodInfo
ResolveActionBarMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveActionBarMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveActionBarMethod "getCssClasses" o = Gtk.Widget.WidgetGetCssClassesMethodInfo
ResolveActionBarMethod "getCssName" o = Gtk.Widget.WidgetGetCssNameMethodInfo
ResolveActionBarMethod "getCursor" o = Gtk.Widget.WidgetGetCursorMethodInfo
ResolveActionBarMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveActionBarMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveActionBarMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveActionBarMethod "getFirstChild" o = Gtk.Widget.WidgetGetFirstChildMethodInfo
ResolveActionBarMethod "getFocusChild" o = Gtk.Widget.WidgetGetFocusChildMethodInfo
ResolveActionBarMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveActionBarMethod "getFocusable" o = Gtk.Widget.WidgetGetFocusableMethodInfo
ResolveActionBarMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveActionBarMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveActionBarMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveActionBarMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveActionBarMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveActionBarMethod "getHeight" o = Gtk.Widget.WidgetGetHeightMethodInfo
ResolveActionBarMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveActionBarMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveActionBarMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveActionBarMethod "getLastChild" o = Gtk.Widget.WidgetGetLastChildMethodInfo
ResolveActionBarMethod "getLayoutManager" o = Gtk.Widget.WidgetGetLayoutManagerMethodInfo
ResolveActionBarMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveActionBarMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveActionBarMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveActionBarMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveActionBarMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveActionBarMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveActionBarMethod "getNative" o = Gtk.Widget.WidgetGetNativeMethodInfo
ResolveActionBarMethod "getNextSibling" o = Gtk.Widget.WidgetGetNextSiblingMethodInfo
ResolveActionBarMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveActionBarMethod "getOverflow" o = Gtk.Widget.WidgetGetOverflowMethodInfo
ResolveActionBarMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveActionBarMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveActionBarMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveActionBarMethod "getPrevSibling" o = Gtk.Widget.WidgetGetPrevSiblingMethodInfo
ResolveActionBarMethod "getPrimaryClipboard" o = Gtk.Widget.WidgetGetPrimaryClipboardMethodInfo
ResolveActionBarMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveActionBarMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveActionBarMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveActionBarMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveActionBarMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveActionBarMethod "getRevealed" o = ActionBarGetRevealedMethodInfo
ResolveActionBarMethod "getRoot" o = Gtk.Widget.WidgetGetRootMethodInfo
ResolveActionBarMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveActionBarMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveActionBarMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveActionBarMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveActionBarMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveActionBarMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveActionBarMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveActionBarMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveActionBarMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveActionBarMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveActionBarMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveActionBarMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveActionBarMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveActionBarMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveActionBarMethod "getWidth" o = Gtk.Widget.WidgetGetWidthMethodInfo
ResolveActionBarMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveActionBarMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveActionBarMethod "setCanTarget" o = Gtk.Widget.WidgetSetCanTargetMethodInfo
ResolveActionBarMethod "setCenterWidget" o = ActionBarSetCenterWidgetMethodInfo
ResolveActionBarMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveActionBarMethod "setCssClasses" o = Gtk.Widget.WidgetSetCssClassesMethodInfo
ResolveActionBarMethod "setCursor" o = Gtk.Widget.WidgetSetCursorMethodInfo
ResolveActionBarMethod "setCursorFromName" o = Gtk.Widget.WidgetSetCursorFromNameMethodInfo
ResolveActionBarMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveActionBarMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveActionBarMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveActionBarMethod "setFocusChild" o = Gtk.Widget.WidgetSetFocusChildMethodInfo
ResolveActionBarMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveActionBarMethod "setFocusable" o = Gtk.Widget.WidgetSetFocusableMethodInfo
ResolveActionBarMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveActionBarMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveActionBarMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveActionBarMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveActionBarMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveActionBarMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveActionBarMethod "setLayoutManager" o = Gtk.Widget.WidgetSetLayoutManagerMethodInfo
ResolveActionBarMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveActionBarMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveActionBarMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveActionBarMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveActionBarMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveActionBarMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveActionBarMethod "setOverflow" o = Gtk.Widget.WidgetSetOverflowMethodInfo
ResolveActionBarMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveActionBarMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveActionBarMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveActionBarMethod "setRevealed" o = ActionBarSetRevealedMethodInfo
ResolveActionBarMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveActionBarMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveActionBarMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveActionBarMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveActionBarMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveActionBarMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveActionBarMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveActionBarMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveActionBarMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveActionBarMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveActionBarMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveActionBarMethod t ActionBar, O.MethodInfo info ActionBar p) => OL.IsLabel t (ActionBar -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#endif
getActionBarRevealed :: (MonadIO m, IsActionBar o) => o -> m Bool
getActionBarRevealed :: o -> m Bool
getActionBarRevealed o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"revealed"
setActionBarRevealed :: (MonadIO m, IsActionBar o) => o -> Bool -> m ()
setActionBarRevealed :: o -> Bool -> m ()
setActionBarRevealed o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"revealed" Bool
val
constructActionBarRevealed :: (IsActionBar o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructActionBarRevealed :: Bool -> m (GValueConstruct o)
constructActionBarRevealed Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"revealed" Bool
val
#if defined(ENABLE_OVERLOADING)
data ActionBarRevealedPropertyInfo
instance AttrInfo ActionBarRevealedPropertyInfo where
type AttrAllowedOps ActionBarRevealedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint ActionBarRevealedPropertyInfo = IsActionBar
type AttrSetTypeConstraint ActionBarRevealedPropertyInfo = (~) Bool
type AttrTransferTypeConstraint ActionBarRevealedPropertyInfo = (~) Bool
type AttrTransferType ActionBarRevealedPropertyInfo = Bool
type AttrGetType ActionBarRevealedPropertyInfo = Bool
type AttrLabel ActionBarRevealedPropertyInfo = "revealed"
type AttrOrigin ActionBarRevealedPropertyInfo = ActionBar
attrGet = getActionBarRevealed
attrSet = setActionBarRevealed
attrTransfer _ v = do
return v
attrConstruct = constructActionBarRevealed
attrClear = undefined
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList ActionBar
type instance O.AttributeList ActionBar = ActionBarAttributeList
type ActionBarAttributeList = ('[ '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("canTarget", Gtk.Widget.WidgetCanTargetPropertyInfo), '("cssClasses", Gtk.Widget.WidgetCssClassesPropertyInfo), '("cssName", Gtk.Widget.WidgetCssNamePropertyInfo), '("cursor", Gtk.Widget.WidgetCursorPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("focusable", Gtk.Widget.WidgetFocusablePropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("layoutManager", Gtk.Widget.WidgetLayoutManagerPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("overflow", Gtk.Widget.WidgetOverflowPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("revealed", ActionBarRevealedPropertyInfo), '("root", Gtk.Widget.WidgetRootPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
actionBarRevealed :: AttrLabelProxy "revealed"
actionBarRevealed = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList ActionBar = ActionBarSignalList
type ActionBarSignalList = ('[ '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("grabNotify", Gtk.Widget.WidgetGrabNotifySignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "gtk_action_bar_new" gtk_action_bar_new ::
IO (Ptr ActionBar)
actionBarNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m ActionBar
actionBarNew :: m ActionBar
actionBarNew = IO ActionBar -> m ActionBar
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO ActionBar -> m ActionBar) -> IO ActionBar -> m ActionBar
forall a b. (a -> b) -> a -> b
$ do
Ptr ActionBar
result <- IO (Ptr ActionBar)
gtk_action_bar_new
Text -> Ptr ActionBar -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"actionBarNew" Ptr ActionBar
result
ActionBar
result' <- ((ManagedPtr ActionBar -> ActionBar)
-> Ptr ActionBar -> IO ActionBar
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr ActionBar -> ActionBar
ActionBar) Ptr ActionBar
result
ActionBar -> IO ActionBar
forall (m :: * -> *) a. Monad m => a -> m a
return ActionBar
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "gtk_action_bar_get_center_widget" gtk_action_bar_get_center_widget ::
Ptr ActionBar ->
IO (Ptr Gtk.Widget.Widget)
actionBarGetCenterWidget ::
(B.CallStack.HasCallStack, MonadIO m, IsActionBar a) =>
a
-> m (Maybe Gtk.Widget.Widget)
actionBarGetCenterWidget :: a -> m (Maybe Widget)
actionBarGetCenterWidget a
actionBar = IO (Maybe Widget) -> m (Maybe Widget)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Widget) -> m (Maybe Widget))
-> IO (Maybe Widget) -> m (Maybe Widget)
forall a b. (a -> b) -> a -> b
$ do
Ptr ActionBar
actionBar' <- a -> IO (Ptr ActionBar)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
actionBar
Ptr Widget
result <- Ptr ActionBar -> IO (Ptr Widget)
gtk_action_bar_get_center_widget Ptr ActionBar
actionBar'
Maybe Widget
maybeResult <- Ptr Widget -> (Ptr Widget -> IO Widget) -> IO (Maybe Widget)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr Widget
result ((Ptr Widget -> IO Widget) -> IO (Maybe Widget))
-> (Ptr Widget -> IO Widget) -> IO (Maybe Widget)
forall a b. (a -> b) -> a -> b
$ \Ptr Widget
result' -> do
Widget
result'' <- ((ManagedPtr Widget -> Widget) -> Ptr Widget -> IO Widget
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Widget -> Widget
Gtk.Widget.Widget) Ptr Widget
result'
Widget -> IO Widget
forall (m :: * -> *) a. Monad m => a -> m a
return Widget
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
actionBar
Maybe Widget -> IO (Maybe Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Widget
maybeResult
#if defined(ENABLE_OVERLOADING)
data ActionBarGetCenterWidgetMethodInfo
instance (signature ~ (m (Maybe Gtk.Widget.Widget)), MonadIO m, IsActionBar a) => O.MethodInfo ActionBarGetCenterWidgetMethodInfo a signature where
overloadedMethod = actionBarGetCenterWidget
#endif
foreign import ccall "gtk_action_bar_get_revealed" gtk_action_bar_get_revealed ::
Ptr ActionBar ->
IO CInt
actionBarGetRevealed ::
(B.CallStack.HasCallStack, MonadIO m, IsActionBar a) =>
a
-> m Bool
actionBarGetRevealed :: a -> m Bool
actionBarGetRevealed a
actionBar = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr ActionBar
actionBar' <- a -> IO (Ptr ActionBar)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
actionBar
CInt
result <- Ptr ActionBar -> IO CInt
gtk_action_bar_get_revealed Ptr ActionBar
actionBar'
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
actionBar
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data ActionBarGetRevealedMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsActionBar a) => O.MethodInfo ActionBarGetRevealedMethodInfo a signature where
overloadedMethod = actionBarGetRevealed
#endif
foreign import ccall "gtk_action_bar_pack_end" gtk_action_bar_pack_end ::
Ptr ActionBar ->
Ptr Gtk.Widget.Widget ->
IO ()
actionBarPackEnd ::
(B.CallStack.HasCallStack, MonadIO m, IsActionBar a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m ()
actionBarPackEnd :: a -> b -> m ()
actionBarPackEnd a
actionBar b
child = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr ActionBar
actionBar' <- a -> IO (Ptr ActionBar)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
actionBar
Ptr Widget
child' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
child
Ptr ActionBar -> Ptr Widget -> IO ()
gtk_action_bar_pack_end Ptr ActionBar
actionBar' Ptr Widget
child'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
actionBar
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
child
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ActionBarPackEndMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsActionBar a, Gtk.Widget.IsWidget b) => O.MethodInfo ActionBarPackEndMethodInfo a signature where
overloadedMethod = actionBarPackEnd
#endif
foreign import ccall "gtk_action_bar_pack_start" gtk_action_bar_pack_start ::
Ptr ActionBar ->
Ptr Gtk.Widget.Widget ->
IO ()
actionBarPackStart ::
(B.CallStack.HasCallStack, MonadIO m, IsActionBar a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m ()
actionBarPackStart :: a -> b -> m ()
actionBarPackStart a
actionBar b
child = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr ActionBar
actionBar' <- a -> IO (Ptr ActionBar)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
actionBar
Ptr Widget
child' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
child
Ptr ActionBar -> Ptr Widget -> IO ()
gtk_action_bar_pack_start Ptr ActionBar
actionBar' Ptr Widget
child'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
actionBar
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
child
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ActionBarPackStartMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsActionBar a, Gtk.Widget.IsWidget b) => O.MethodInfo ActionBarPackStartMethodInfo a signature where
overloadedMethod = actionBarPackStart
#endif
foreign import ccall "gtk_action_bar_remove" gtk_action_bar_remove ::
Ptr ActionBar ->
Ptr Gtk.Widget.Widget ->
IO ()
actionBarRemove ::
(B.CallStack.HasCallStack, MonadIO m, IsActionBar a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m ()
actionBarRemove :: a -> b -> m ()
actionBarRemove a
actionBar b
child = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr ActionBar
actionBar' <- a -> IO (Ptr ActionBar)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
actionBar
Ptr Widget
child' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
child
Ptr ActionBar -> Ptr Widget -> IO ()
gtk_action_bar_remove Ptr ActionBar
actionBar' Ptr Widget
child'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
actionBar
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
child
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ActionBarRemoveMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsActionBar a, Gtk.Widget.IsWidget b) => O.MethodInfo ActionBarRemoveMethodInfo a signature where
overloadedMethod = actionBarRemove
#endif
foreign import ccall "gtk_action_bar_set_center_widget" gtk_action_bar_set_center_widget ::
Ptr ActionBar ->
Ptr Gtk.Widget.Widget ->
IO ()
actionBarSetCenterWidget ::
(B.CallStack.HasCallStack, MonadIO m, IsActionBar a, Gtk.Widget.IsWidget b) =>
a
-> Maybe (b)
-> m ()
actionBarSetCenterWidget :: a -> Maybe b -> m ()
actionBarSetCenterWidget a
actionBar Maybe b
centerWidget = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr ActionBar
actionBar' <- a -> IO (Ptr ActionBar)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
actionBar
Ptr Widget
maybeCenterWidget <- case Maybe b
centerWidget of
Maybe b
Nothing -> Ptr Widget -> IO (Ptr Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
forall a. Ptr a
nullPtr
Just b
jCenterWidget -> do
Ptr Widget
jCenterWidget' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jCenterWidget
Ptr Widget -> IO (Ptr Widget)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr Widget
jCenterWidget'
Ptr ActionBar -> Ptr Widget -> IO ()
gtk_action_bar_set_center_widget Ptr ActionBar
actionBar' Ptr Widget
maybeCenterWidget
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
actionBar
Maybe b -> (b -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe b
centerWidget b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ActionBarSetCenterWidgetMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsActionBar a, Gtk.Widget.IsWidget b) => O.MethodInfo ActionBarSetCenterWidgetMethodInfo a signature where
overloadedMethod = actionBarSetCenterWidget
#endif
foreign import ccall "gtk_action_bar_set_revealed" gtk_action_bar_set_revealed ::
Ptr ActionBar ->
CInt ->
IO ()
actionBarSetRevealed ::
(B.CallStack.HasCallStack, MonadIO m, IsActionBar a) =>
a
-> Bool
-> m ()
actionBarSetRevealed :: a -> Bool -> m ()
actionBarSetRevealed a
actionBar Bool
revealed = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr ActionBar
actionBar' <- a -> IO (Ptr ActionBar)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
actionBar
let revealed' :: CInt
revealed' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
revealed
Ptr ActionBar -> CInt -> IO ()
gtk_action_bar_set_revealed Ptr ActionBar
actionBar' CInt
revealed'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
actionBar
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ActionBarSetRevealedMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsActionBar a) => O.MethodInfo ActionBarSetRevealedMethodInfo a signature where
overloadedMethod = actionBarSetRevealed
#endif