{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Adw.Objects.ExpanderRow
(
ExpanderRow(..) ,
IsExpanderRow ,
toExpanderRow ,
#if defined(ENABLE_OVERLOADING)
ResolveExpanderRowMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
ExpanderRowAddActionMethodInfo ,
#endif
expanderRowAddAction ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowAddPrefixMethodInfo ,
#endif
expanderRowAddPrefix ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowAddRowMethodInfo ,
#endif
expanderRowAddRow ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowGetEnableExpansionMethodInfo ,
#endif
expanderRowGetEnableExpansion ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowGetExpandedMethodInfo ,
#endif
expanderRowGetExpanded ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowGetIconNameMethodInfo ,
#endif
expanderRowGetIconName ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowGetShowEnableSwitchMethodInfo,
#endif
expanderRowGetShowEnableSwitch ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowGetSubtitleMethodInfo ,
#endif
expanderRowGetSubtitle ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowGetSubtitleLinesMethodInfo ,
#endif
expanderRowGetSubtitleLines ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowGetTitleLinesMethodInfo ,
#endif
expanderRowGetTitleLines ,
expanderRowNew ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowRemoveMethodInfo ,
#endif
expanderRowRemove ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowSetEnableExpansionMethodInfo ,
#endif
expanderRowSetEnableExpansion ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowSetExpandedMethodInfo ,
#endif
expanderRowSetExpanded ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowSetIconNameMethodInfo ,
#endif
expanderRowSetIconName ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowSetShowEnableSwitchMethodInfo,
#endif
expanderRowSetShowEnableSwitch ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowSetSubtitleMethodInfo ,
#endif
expanderRowSetSubtitle ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowSetSubtitleLinesMethodInfo ,
#endif
expanderRowSetSubtitleLines ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowSetTitleLinesMethodInfo ,
#endif
expanderRowSetTitleLines ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowEnableExpansionPropertyInfo ,
#endif
constructExpanderRowEnableExpansion ,
#if defined(ENABLE_OVERLOADING)
expanderRowEnableExpansion ,
#endif
getExpanderRowEnableExpansion ,
setExpanderRowEnableExpansion ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowExpandedPropertyInfo ,
#endif
constructExpanderRowExpanded ,
#if defined(ENABLE_OVERLOADING)
expanderRowExpanded ,
#endif
getExpanderRowExpanded ,
setExpanderRowExpanded ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowIconNamePropertyInfo ,
#endif
clearExpanderRowIconName ,
constructExpanderRowIconName ,
#if defined(ENABLE_OVERLOADING)
expanderRowIconName ,
#endif
getExpanderRowIconName ,
setExpanderRowIconName ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowShowEnableSwitchPropertyInfo ,
#endif
constructExpanderRowShowEnableSwitch ,
#if defined(ENABLE_OVERLOADING)
expanderRowShowEnableSwitch ,
#endif
getExpanderRowShowEnableSwitch ,
setExpanderRowShowEnableSwitch ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowSubtitlePropertyInfo ,
#endif
constructExpanderRowSubtitle ,
#if defined(ENABLE_OVERLOADING)
expanderRowSubtitle ,
#endif
getExpanderRowSubtitle ,
setExpanderRowSubtitle ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowSubtitleLinesPropertyInfo ,
#endif
constructExpanderRowSubtitleLines ,
#if defined(ENABLE_OVERLOADING)
expanderRowSubtitleLines ,
#endif
getExpanderRowSubtitleLines ,
setExpanderRowSubtitleLines ,
#if defined(ENABLE_OVERLOADING)
ExpanderRowTitleLinesPropertyInfo ,
#endif
constructExpanderRowTitleLines ,
#if defined(ENABLE_OVERLOADING)
expanderRowTitleLines ,
#endif
getExpanderRowTitleLines ,
setExpanderRowTitleLines ,
) 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 {-# SOURCE #-} qualified GI.Adw.Objects.PreferencesRow as Adw.PreferencesRow
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gtk.Interfaces.Accessible as Gtk.Accessible
import qualified GI.Gtk.Interfaces.Actionable as Gtk.Actionable
import qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import qualified GI.Gtk.Interfaces.ConstraintTarget as Gtk.ConstraintTarget
import qualified GI.Gtk.Objects.ListBoxRow as Gtk.ListBoxRow
import qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype ExpanderRow = ExpanderRow (SP.ManagedPtr ExpanderRow)
deriving (ExpanderRow -> ExpanderRow -> Bool
(ExpanderRow -> ExpanderRow -> Bool)
-> (ExpanderRow -> ExpanderRow -> Bool) -> Eq ExpanderRow
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ExpanderRow -> ExpanderRow -> Bool
== :: ExpanderRow -> ExpanderRow -> Bool
$c/= :: ExpanderRow -> ExpanderRow -> Bool
/= :: ExpanderRow -> ExpanderRow -> Bool
Eq)
instance SP.ManagedPtrNewtype ExpanderRow where
toManagedPtr :: ExpanderRow -> ManagedPtr ExpanderRow
toManagedPtr (ExpanderRow ManagedPtr ExpanderRow
p) = ManagedPtr ExpanderRow
p
foreign import ccall "adw_expander_row_get_type"
c_adw_expander_row_get_type :: IO B.Types.GType
instance B.Types.TypedObject ExpanderRow where
glibType :: IO GType
glibType = IO GType
c_adw_expander_row_get_type
instance B.Types.GObject ExpanderRow
class (SP.GObject o, O.IsDescendantOf ExpanderRow o) => IsExpanderRow o
instance (SP.GObject o, O.IsDescendantOf ExpanderRow o) => IsExpanderRow o
instance O.HasParentTypes ExpanderRow
type instance O.ParentTypes ExpanderRow = '[Adw.PreferencesRow.PreferencesRow, Gtk.ListBoxRow.ListBoxRow, Gtk.Widget.Widget, GObject.Object.Object, Gtk.Accessible.Accessible, Gtk.Actionable.Actionable, Gtk.Buildable.Buildable, Gtk.ConstraintTarget.ConstraintTarget]
toExpanderRow :: (MIO.MonadIO m, IsExpanderRow o) => o -> m ExpanderRow
toExpanderRow :: forall (m :: * -> *) o.
(MonadIO m, IsExpanderRow o) =>
o -> m ExpanderRow
toExpanderRow = IO ExpanderRow -> m ExpanderRow
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO ExpanderRow -> m ExpanderRow)
-> (o -> IO ExpanderRow) -> o -> m ExpanderRow
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr ExpanderRow -> ExpanderRow) -> o -> IO ExpanderRow
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr ExpanderRow -> ExpanderRow
ExpanderRow
instance B.GValue.IsGValue (Maybe ExpanderRow) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_adw_expander_row_get_type
gvalueSet_ :: Ptr GValue -> Maybe ExpanderRow -> IO ()
gvalueSet_ Ptr GValue
gv Maybe ExpanderRow
P.Nothing = Ptr GValue -> Ptr ExpanderRow -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr ExpanderRow
forall a. Ptr a
FP.nullPtr :: FP.Ptr ExpanderRow)
gvalueSet_ Ptr GValue
gv (P.Just ExpanderRow
obj) = ExpanderRow -> (Ptr ExpanderRow -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr ExpanderRow
obj (Ptr GValue -> Ptr ExpanderRow -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe ExpanderRow)
gvalueGet_ Ptr GValue
gv = do
Ptr ExpanderRow
ptr <- Ptr GValue -> IO (Ptr ExpanderRow)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr ExpanderRow)
if Ptr ExpanderRow
ptr Ptr ExpanderRow -> Ptr ExpanderRow -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr ExpanderRow
forall a. Ptr a
FP.nullPtr
then ExpanderRow -> Maybe ExpanderRow
forall a. a -> Maybe a
P.Just (ExpanderRow -> Maybe ExpanderRow)
-> IO ExpanderRow -> IO (Maybe ExpanderRow)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr ExpanderRow -> ExpanderRow)
-> Ptr ExpanderRow -> IO ExpanderRow
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr ExpanderRow -> ExpanderRow
ExpanderRow Ptr ExpanderRow
ptr
else Maybe ExpanderRow -> IO (Maybe ExpanderRow)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe ExpanderRow
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveExpanderRowMethod (t :: Symbol) (o :: DK.Type) :: DK.Type where
ResolveExpanderRowMethod "actionSetEnabled" o = Gtk.Widget.WidgetActionSetEnabledMethodInfo
ResolveExpanderRowMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveExpanderRowMethod "activateAction" o = Gtk.Widget.WidgetActivateActionMethodInfo
ResolveExpanderRowMethod "activateDefault" o = Gtk.Widget.WidgetActivateDefaultMethodInfo
ResolveExpanderRowMethod "addAction" o = ExpanderRowAddActionMethodInfo
ResolveExpanderRowMethod "addController" o = Gtk.Widget.WidgetAddControllerMethodInfo
ResolveExpanderRowMethod "addCssClass" o = Gtk.Widget.WidgetAddCssClassMethodInfo
ResolveExpanderRowMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveExpanderRowMethod "addPrefix" o = ExpanderRowAddPrefixMethodInfo
ResolveExpanderRowMethod "addRow" o = ExpanderRowAddRowMethodInfo
ResolveExpanderRowMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveExpanderRowMethod "allocate" o = Gtk.Widget.WidgetAllocateMethodInfo
ResolveExpanderRowMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveExpanderRowMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveExpanderRowMethod "changed" o = Gtk.ListBoxRow.ListBoxRowChangedMethodInfo
ResolveExpanderRowMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveExpanderRowMethod "computeBounds" o = Gtk.Widget.WidgetComputeBoundsMethodInfo
ResolveExpanderRowMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveExpanderRowMethod "computePoint" o = Gtk.Widget.WidgetComputePointMethodInfo
ResolveExpanderRowMethod "computeTransform" o = Gtk.Widget.WidgetComputeTransformMethodInfo
ResolveExpanderRowMethod "contains" o = Gtk.Widget.WidgetContainsMethodInfo
ResolveExpanderRowMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveExpanderRowMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveExpanderRowMethod "disposeTemplate" o = Gtk.Widget.WidgetDisposeTemplateMethodInfo
ResolveExpanderRowMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveExpanderRowMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveExpanderRowMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveExpanderRowMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveExpanderRowMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveExpanderRowMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveExpanderRowMethod "hasCssClass" o = Gtk.Widget.WidgetHasCssClassMethodInfo
ResolveExpanderRowMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveExpanderRowMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveExpanderRowMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveExpanderRowMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveExpanderRowMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveExpanderRowMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveExpanderRowMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveExpanderRowMethod "insertAfter" o = Gtk.Widget.WidgetInsertAfterMethodInfo
ResolveExpanderRowMethod "insertBefore" o = Gtk.Widget.WidgetInsertBeforeMethodInfo
ResolveExpanderRowMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveExpanderRowMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveExpanderRowMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveExpanderRowMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveExpanderRowMethod "isSelected" o = Gtk.ListBoxRow.ListBoxRowIsSelectedMethodInfo
ResolveExpanderRowMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveExpanderRowMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveExpanderRowMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveExpanderRowMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveExpanderRowMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveExpanderRowMethod "measure" o = Gtk.Widget.WidgetMeasureMethodInfo
ResolveExpanderRowMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveExpanderRowMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveExpanderRowMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveExpanderRowMethod "observeChildren" o = Gtk.Widget.WidgetObserveChildrenMethodInfo
ResolveExpanderRowMethod "observeControllers" o = Gtk.Widget.WidgetObserveControllersMethodInfo
ResolveExpanderRowMethod "pick" o = Gtk.Widget.WidgetPickMethodInfo
ResolveExpanderRowMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveExpanderRowMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveExpanderRowMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveExpanderRowMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveExpanderRowMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveExpanderRowMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveExpanderRowMethod "remove" o = ExpanderRowRemoveMethodInfo
ResolveExpanderRowMethod "removeController" o = Gtk.Widget.WidgetRemoveControllerMethodInfo
ResolveExpanderRowMethod "removeCssClass" o = Gtk.Widget.WidgetRemoveCssClassMethodInfo
ResolveExpanderRowMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveExpanderRowMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveExpanderRowMethod "resetProperty" o = Gtk.Accessible.AccessibleResetPropertyMethodInfo
ResolveExpanderRowMethod "resetRelation" o = Gtk.Accessible.AccessibleResetRelationMethodInfo
ResolveExpanderRowMethod "resetState" o = Gtk.Accessible.AccessibleResetStateMethodInfo
ResolveExpanderRowMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveExpanderRowMethod "shouldLayout" o = Gtk.Widget.WidgetShouldLayoutMethodInfo
ResolveExpanderRowMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveExpanderRowMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveExpanderRowMethod "snapshotChild" o = Gtk.Widget.WidgetSnapshotChildMethodInfo
ResolveExpanderRowMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveExpanderRowMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveExpanderRowMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveExpanderRowMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveExpanderRowMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveExpanderRowMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveExpanderRowMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveExpanderRowMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveExpanderRowMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveExpanderRowMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveExpanderRowMethod "updateNextAccessibleSibling" o = Gtk.Accessible.AccessibleUpdateNextAccessibleSiblingMethodInfo
ResolveExpanderRowMethod "updateProperty" o = Gtk.Accessible.AccessibleUpdatePropertyMethodInfo
ResolveExpanderRowMethod "updateRelation" o = Gtk.Accessible.AccessibleUpdateRelationMethodInfo
ResolveExpanderRowMethod "updateState" o = Gtk.Accessible.AccessibleUpdateStateMethodInfo
ResolveExpanderRowMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveExpanderRowMethod "getAccessibleParent" o = Gtk.Accessible.AccessibleGetAccessibleParentMethodInfo
ResolveExpanderRowMethod "getAccessibleRole" o = Gtk.Accessible.AccessibleGetAccessibleRoleMethodInfo
ResolveExpanderRowMethod "getActionName" o = Gtk.Actionable.ActionableGetActionNameMethodInfo
ResolveExpanderRowMethod "getActionTargetValue" o = Gtk.Actionable.ActionableGetActionTargetValueMethodInfo
ResolveExpanderRowMethod "getActivatable" o = Gtk.ListBoxRow.ListBoxRowGetActivatableMethodInfo
ResolveExpanderRowMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveExpanderRowMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveExpanderRowMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveExpanderRowMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveExpanderRowMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveExpanderRowMethod "getAtContext" o = Gtk.Accessible.AccessibleGetAtContextMethodInfo
ResolveExpanderRowMethod "getBounds" o = Gtk.Accessible.AccessibleGetBoundsMethodInfo
ResolveExpanderRowMethod "getBuildableId" o = Gtk.Buildable.BuildableGetBuildableIdMethodInfo
ResolveExpanderRowMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveExpanderRowMethod "getCanTarget" o = Gtk.Widget.WidgetGetCanTargetMethodInfo
ResolveExpanderRowMethod "getChild" o = Gtk.ListBoxRow.ListBoxRowGetChildMethodInfo
ResolveExpanderRowMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveExpanderRowMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveExpanderRowMethod "getColor" o = Gtk.Widget.WidgetGetColorMethodInfo
ResolveExpanderRowMethod "getCssClasses" o = Gtk.Widget.WidgetGetCssClassesMethodInfo
ResolveExpanderRowMethod "getCssName" o = Gtk.Widget.WidgetGetCssNameMethodInfo
ResolveExpanderRowMethod "getCursor" o = Gtk.Widget.WidgetGetCursorMethodInfo
ResolveExpanderRowMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveExpanderRowMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveExpanderRowMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveExpanderRowMethod "getEnableExpansion" o = ExpanderRowGetEnableExpansionMethodInfo
ResolveExpanderRowMethod "getExpanded" o = ExpanderRowGetExpandedMethodInfo
ResolveExpanderRowMethod "getFirstAccessibleChild" o = Gtk.Accessible.AccessibleGetFirstAccessibleChildMethodInfo
ResolveExpanderRowMethod "getFirstChild" o = Gtk.Widget.WidgetGetFirstChildMethodInfo
ResolveExpanderRowMethod "getFocusChild" o = Gtk.Widget.WidgetGetFocusChildMethodInfo
ResolveExpanderRowMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveExpanderRowMethod "getFocusable" o = Gtk.Widget.WidgetGetFocusableMethodInfo
ResolveExpanderRowMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveExpanderRowMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveExpanderRowMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveExpanderRowMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveExpanderRowMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveExpanderRowMethod "getHeader" o = Gtk.ListBoxRow.ListBoxRowGetHeaderMethodInfo
ResolveExpanderRowMethod "getHeight" o = Gtk.Widget.WidgetGetHeightMethodInfo
ResolveExpanderRowMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveExpanderRowMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveExpanderRowMethod "getIconName" o = ExpanderRowGetIconNameMethodInfo
ResolveExpanderRowMethod "getIndex" o = Gtk.ListBoxRow.ListBoxRowGetIndexMethodInfo
ResolveExpanderRowMethod "getLastChild" o = Gtk.Widget.WidgetGetLastChildMethodInfo
ResolveExpanderRowMethod "getLayoutManager" o = Gtk.Widget.WidgetGetLayoutManagerMethodInfo
ResolveExpanderRowMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveExpanderRowMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveExpanderRowMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveExpanderRowMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveExpanderRowMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveExpanderRowMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveExpanderRowMethod "getNative" o = Gtk.Widget.WidgetGetNativeMethodInfo
ResolveExpanderRowMethod "getNextAccessibleSibling" o = Gtk.Accessible.AccessibleGetNextAccessibleSiblingMethodInfo
ResolveExpanderRowMethod "getNextSibling" o = Gtk.Widget.WidgetGetNextSiblingMethodInfo
ResolveExpanderRowMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveExpanderRowMethod "getOverflow" o = Gtk.Widget.WidgetGetOverflowMethodInfo
ResolveExpanderRowMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveExpanderRowMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveExpanderRowMethod "getPlatformState" o = Gtk.Accessible.AccessibleGetPlatformStateMethodInfo
ResolveExpanderRowMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveExpanderRowMethod "getPrevSibling" o = Gtk.Widget.WidgetGetPrevSiblingMethodInfo
ResolveExpanderRowMethod "getPrimaryClipboard" o = Gtk.Widget.WidgetGetPrimaryClipboardMethodInfo
ResolveExpanderRowMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveExpanderRowMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveExpanderRowMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveExpanderRowMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveExpanderRowMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveExpanderRowMethod "getRoot" o = Gtk.Widget.WidgetGetRootMethodInfo
ResolveExpanderRowMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveExpanderRowMethod "getSelectable" o = Gtk.ListBoxRow.ListBoxRowGetSelectableMethodInfo
ResolveExpanderRowMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveExpanderRowMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveExpanderRowMethod "getShowEnableSwitch" o = ExpanderRowGetShowEnableSwitchMethodInfo
ResolveExpanderRowMethod "getSize" o = Gtk.Widget.WidgetGetSizeMethodInfo
ResolveExpanderRowMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveExpanderRowMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveExpanderRowMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveExpanderRowMethod "getSubtitle" o = ExpanderRowGetSubtitleMethodInfo
ResolveExpanderRowMethod "getSubtitleLines" o = ExpanderRowGetSubtitleLinesMethodInfo
ResolveExpanderRowMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveExpanderRowMethod "getTitle" o = Adw.PreferencesRow.PreferencesRowGetTitleMethodInfo
ResolveExpanderRowMethod "getTitleLines" o = ExpanderRowGetTitleLinesMethodInfo
ResolveExpanderRowMethod "getTitleSelectable" o = Adw.PreferencesRow.PreferencesRowGetTitleSelectableMethodInfo
ResolveExpanderRowMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveExpanderRowMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveExpanderRowMethod "getUseMarkup" o = Adw.PreferencesRow.PreferencesRowGetUseMarkupMethodInfo
ResolveExpanderRowMethod "getUseUnderline" o = Adw.PreferencesRow.PreferencesRowGetUseUnderlineMethodInfo
ResolveExpanderRowMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveExpanderRowMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveExpanderRowMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveExpanderRowMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveExpanderRowMethod "getWidth" o = Gtk.Widget.WidgetGetWidthMethodInfo
ResolveExpanderRowMethod "setAccessibleParent" o = Gtk.Accessible.AccessibleSetAccessibleParentMethodInfo
ResolveExpanderRowMethod "setActionName" o = Gtk.Actionable.ActionableSetActionNameMethodInfo
ResolveExpanderRowMethod "setActionTargetValue" o = Gtk.Actionable.ActionableSetActionTargetValueMethodInfo
ResolveExpanderRowMethod "setActivatable" o = Gtk.ListBoxRow.ListBoxRowSetActivatableMethodInfo
ResolveExpanderRowMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveExpanderRowMethod "setCanTarget" o = Gtk.Widget.WidgetSetCanTargetMethodInfo
ResolveExpanderRowMethod "setChild" o = Gtk.ListBoxRow.ListBoxRowSetChildMethodInfo
ResolveExpanderRowMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveExpanderRowMethod "setCssClasses" o = Gtk.Widget.WidgetSetCssClassesMethodInfo
ResolveExpanderRowMethod "setCursor" o = Gtk.Widget.WidgetSetCursorMethodInfo
ResolveExpanderRowMethod "setCursorFromName" o = Gtk.Widget.WidgetSetCursorFromNameMethodInfo
ResolveExpanderRowMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveExpanderRowMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveExpanderRowMethod "setDetailedActionName" o = Gtk.Actionable.ActionableSetDetailedActionNameMethodInfo
ResolveExpanderRowMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveExpanderRowMethod "setEnableExpansion" o = ExpanderRowSetEnableExpansionMethodInfo
ResolveExpanderRowMethod "setExpanded" o = ExpanderRowSetExpandedMethodInfo
ResolveExpanderRowMethod "setFocusChild" o = Gtk.Widget.WidgetSetFocusChildMethodInfo
ResolveExpanderRowMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveExpanderRowMethod "setFocusable" o = Gtk.Widget.WidgetSetFocusableMethodInfo
ResolveExpanderRowMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveExpanderRowMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveExpanderRowMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveExpanderRowMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveExpanderRowMethod "setHeader" o = Gtk.ListBoxRow.ListBoxRowSetHeaderMethodInfo
ResolveExpanderRowMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveExpanderRowMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveExpanderRowMethod "setIconName" o = ExpanderRowSetIconNameMethodInfo
ResolveExpanderRowMethod "setLayoutManager" o = Gtk.Widget.WidgetSetLayoutManagerMethodInfo
ResolveExpanderRowMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveExpanderRowMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveExpanderRowMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveExpanderRowMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveExpanderRowMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveExpanderRowMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveExpanderRowMethod "setOverflow" o = Gtk.Widget.WidgetSetOverflowMethodInfo
ResolveExpanderRowMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveExpanderRowMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveExpanderRowMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveExpanderRowMethod "setSelectable" o = Gtk.ListBoxRow.ListBoxRowSetSelectableMethodInfo
ResolveExpanderRowMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveExpanderRowMethod "setShowEnableSwitch" o = ExpanderRowSetShowEnableSwitchMethodInfo
ResolveExpanderRowMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveExpanderRowMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveExpanderRowMethod "setSubtitle" o = ExpanderRowSetSubtitleMethodInfo
ResolveExpanderRowMethod "setSubtitleLines" o = ExpanderRowSetSubtitleLinesMethodInfo
ResolveExpanderRowMethod "setTitle" o = Adw.PreferencesRow.PreferencesRowSetTitleMethodInfo
ResolveExpanderRowMethod "setTitleLines" o = ExpanderRowSetTitleLinesMethodInfo
ResolveExpanderRowMethod "setTitleSelectable" o = Adw.PreferencesRow.PreferencesRowSetTitleSelectableMethodInfo
ResolveExpanderRowMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveExpanderRowMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveExpanderRowMethod "setUseMarkup" o = Adw.PreferencesRow.PreferencesRowSetUseMarkupMethodInfo
ResolveExpanderRowMethod "setUseUnderline" o = Adw.PreferencesRow.PreferencesRowSetUseUnderlineMethodInfo
ResolveExpanderRowMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveExpanderRowMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveExpanderRowMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveExpanderRowMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveExpanderRowMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveExpanderRowMethod t ExpanderRow, O.OverloadedMethod info ExpanderRow p) => OL.IsLabel t (ExpanderRow -> 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 ~ ResolveExpanderRowMethod t ExpanderRow, O.OverloadedMethod info ExpanderRow p, R.HasField t ExpanderRow p) => R.HasField t ExpanderRow p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveExpanderRowMethod t ExpanderRow, O.OverloadedMethodInfo info ExpanderRow) => OL.IsLabel t (O.MethodProxy info ExpanderRow) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
getExpanderRowEnableExpansion :: (MonadIO m, IsExpanderRow o) => o -> m Bool
getExpanderRowEnableExpansion :: forall (m :: * -> *) o. (MonadIO m, IsExpanderRow o) => o -> m Bool
getExpanderRowEnableExpansion 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
"enable-expansion"
setExpanderRowEnableExpansion :: (MonadIO m, IsExpanderRow o) => o -> Bool -> m ()
setExpanderRowEnableExpansion :: forall (m :: * -> *) o.
(MonadIO m, IsExpanderRow o) =>
o -> Bool -> m ()
setExpanderRowEnableExpansion 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
"enable-expansion" Bool
val
constructExpanderRowEnableExpansion :: (IsExpanderRow o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructExpanderRowEnableExpansion :: forall o (m :: * -> *).
(IsExpanderRow o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructExpanderRowEnableExpansion 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
"enable-expansion" Bool
val
#if defined(ENABLE_OVERLOADING)
data ExpanderRowEnableExpansionPropertyInfo
instance AttrInfo ExpanderRowEnableExpansionPropertyInfo where
type AttrAllowedOps ExpanderRowEnableExpansionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint ExpanderRowEnableExpansionPropertyInfo = IsExpanderRow
type AttrSetTypeConstraint ExpanderRowEnableExpansionPropertyInfo = (~) Bool
type AttrTransferTypeConstraint ExpanderRowEnableExpansionPropertyInfo = (~) Bool
type AttrTransferType ExpanderRowEnableExpansionPropertyInfo = Bool
type AttrGetType ExpanderRowEnableExpansionPropertyInfo = Bool
type AttrLabel ExpanderRowEnableExpansionPropertyInfo = "enable-expansion"
type AttrOrigin ExpanderRowEnableExpansionPropertyInfo = ExpanderRow
attrGet = getExpanderRowEnableExpansion
attrSet = setExpanderRowEnableExpansion
attrTransfer _ v = do
return v
attrConstruct = constructExpanderRowEnableExpansion
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.enableExpansion"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#g:attr:enableExpansion"
})
#endif
getExpanderRowExpanded :: (MonadIO m, IsExpanderRow o) => o -> m Bool
getExpanderRowExpanded :: forall (m :: * -> *) o. (MonadIO m, IsExpanderRow o) => o -> m Bool
getExpanderRowExpanded 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
"expanded"
setExpanderRowExpanded :: (MonadIO m, IsExpanderRow o) => o -> Bool -> m ()
setExpanderRowExpanded :: forall (m :: * -> *) o.
(MonadIO m, IsExpanderRow o) =>
o -> Bool -> m ()
setExpanderRowExpanded 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
"expanded" Bool
val
constructExpanderRowExpanded :: (IsExpanderRow o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructExpanderRowExpanded :: forall o (m :: * -> *).
(IsExpanderRow o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructExpanderRowExpanded 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
"expanded" Bool
val
#if defined(ENABLE_OVERLOADING)
data ExpanderRowExpandedPropertyInfo
instance AttrInfo ExpanderRowExpandedPropertyInfo where
type AttrAllowedOps ExpanderRowExpandedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint ExpanderRowExpandedPropertyInfo = IsExpanderRow
type AttrSetTypeConstraint ExpanderRowExpandedPropertyInfo = (~) Bool
type AttrTransferTypeConstraint ExpanderRowExpandedPropertyInfo = (~) Bool
type AttrTransferType ExpanderRowExpandedPropertyInfo = Bool
type AttrGetType ExpanderRowExpandedPropertyInfo = Bool
type AttrLabel ExpanderRowExpandedPropertyInfo = "expanded"
type AttrOrigin ExpanderRowExpandedPropertyInfo = ExpanderRow
attrGet = getExpanderRowExpanded
attrSet = setExpanderRowExpanded
attrTransfer _ v = do
return v
attrConstruct = constructExpanderRowExpanded
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanded"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#g:attr:expanded"
})
#endif
getExpanderRowIconName :: (MonadIO m, IsExpanderRow o) => o -> m (Maybe T.Text)
getExpanderRowIconName :: forall (m :: * -> *) o.
(MonadIO m, IsExpanderRow o) =>
o -> m (Maybe Text)
getExpanderRowIconName 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
"icon-name"
setExpanderRowIconName :: (MonadIO m, IsExpanderRow o) => o -> T.Text -> m ()
setExpanderRowIconName :: forall (m :: * -> *) o.
(MonadIO m, IsExpanderRow o) =>
o -> Text -> m ()
setExpanderRowIconName 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
"icon-name" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructExpanderRowIconName :: (IsExpanderRow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructExpanderRowIconName :: forall o (m :: * -> *).
(IsExpanderRow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructExpanderRowIconName 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
"icon-name" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearExpanderRowIconName :: (MonadIO m, IsExpanderRow o) => o -> m ()
clearExpanderRowIconName :: forall (m :: * -> *) o. (MonadIO m, IsExpanderRow o) => o -> m ()
clearExpanderRowIconName 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
"icon-name" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data ExpanderRowIconNamePropertyInfo
instance AttrInfo ExpanderRowIconNamePropertyInfo where
type AttrAllowedOps ExpanderRowIconNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint ExpanderRowIconNamePropertyInfo = IsExpanderRow
type AttrSetTypeConstraint ExpanderRowIconNamePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint ExpanderRowIconNamePropertyInfo = (~) T.Text
type AttrTransferType ExpanderRowIconNamePropertyInfo = T.Text
type AttrGetType ExpanderRowIconNamePropertyInfo = (Maybe T.Text)
type AttrLabel ExpanderRowIconNamePropertyInfo = "icon-name"
type AttrOrigin ExpanderRowIconNamePropertyInfo = ExpanderRow
attrGet = getExpanderRowIconName
attrSet = setExpanderRowIconName
attrTransfer _ v = do
return v
attrConstruct = constructExpanderRowIconName
attrClear = clearExpanderRowIconName
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.iconName"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#g:attr:iconName"
})
#endif
getExpanderRowShowEnableSwitch :: (MonadIO m, IsExpanderRow o) => o -> m Bool
getExpanderRowShowEnableSwitch :: forall (m :: * -> *) o. (MonadIO m, IsExpanderRow o) => o -> m Bool
getExpanderRowShowEnableSwitch 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
"show-enable-switch"
setExpanderRowShowEnableSwitch :: (MonadIO m, IsExpanderRow o) => o -> Bool -> m ()
setExpanderRowShowEnableSwitch :: forall (m :: * -> *) o.
(MonadIO m, IsExpanderRow o) =>
o -> Bool -> m ()
setExpanderRowShowEnableSwitch 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
"show-enable-switch" Bool
val
constructExpanderRowShowEnableSwitch :: (IsExpanderRow o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructExpanderRowShowEnableSwitch :: forall o (m :: * -> *).
(IsExpanderRow o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructExpanderRowShowEnableSwitch 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
"show-enable-switch" Bool
val
#if defined(ENABLE_OVERLOADING)
data ExpanderRowShowEnableSwitchPropertyInfo
instance AttrInfo ExpanderRowShowEnableSwitchPropertyInfo where
type AttrAllowedOps ExpanderRowShowEnableSwitchPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint ExpanderRowShowEnableSwitchPropertyInfo = IsExpanderRow
type AttrSetTypeConstraint ExpanderRowShowEnableSwitchPropertyInfo = (~) Bool
type AttrTransferTypeConstraint ExpanderRowShowEnableSwitchPropertyInfo = (~) Bool
type AttrTransferType ExpanderRowShowEnableSwitchPropertyInfo = Bool
type AttrGetType ExpanderRowShowEnableSwitchPropertyInfo = Bool
type AttrLabel ExpanderRowShowEnableSwitchPropertyInfo = "show-enable-switch"
type AttrOrigin ExpanderRowShowEnableSwitchPropertyInfo = ExpanderRow
attrGet = getExpanderRowShowEnableSwitch
attrSet = setExpanderRowShowEnableSwitch
attrTransfer _ v = do
return v
attrConstruct = constructExpanderRowShowEnableSwitch
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.showEnableSwitch"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#g:attr:showEnableSwitch"
})
#endif
getExpanderRowSubtitle :: (MonadIO m, IsExpanderRow o) => o -> m T.Text
getExpanderRowSubtitle :: forall (m :: * -> *) o. (MonadIO m, IsExpanderRow o) => o -> m Text
getExpanderRowSubtitle o
obj = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getExpanderRowSubtitle" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"subtitle"
setExpanderRowSubtitle :: (MonadIO m, IsExpanderRow o) => o -> T.Text -> m ()
setExpanderRowSubtitle :: forall (m :: * -> *) o.
(MonadIO m, IsExpanderRow o) =>
o -> Text -> m ()
setExpanderRowSubtitle 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)
constructExpanderRowSubtitle :: (IsExpanderRow o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructExpanderRowSubtitle :: forall o (m :: * -> *).
(IsExpanderRow o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructExpanderRowSubtitle 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)
#if defined(ENABLE_OVERLOADING)
data ExpanderRowSubtitlePropertyInfo
instance AttrInfo ExpanderRowSubtitlePropertyInfo where
type AttrAllowedOps ExpanderRowSubtitlePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint ExpanderRowSubtitlePropertyInfo = IsExpanderRow
type AttrSetTypeConstraint ExpanderRowSubtitlePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint ExpanderRowSubtitlePropertyInfo = (~) T.Text
type AttrTransferType ExpanderRowSubtitlePropertyInfo = T.Text
type AttrGetType ExpanderRowSubtitlePropertyInfo = T.Text
type AttrLabel ExpanderRowSubtitlePropertyInfo = "subtitle"
type AttrOrigin ExpanderRowSubtitlePropertyInfo = ExpanderRow
attrGet = getExpanderRowSubtitle
attrSet = setExpanderRowSubtitle
attrTransfer _ v = do
return v
attrConstruct = constructExpanderRowSubtitle
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.subtitle"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#g:attr:subtitle"
})
#endif
getExpanderRowSubtitleLines :: (MonadIO m, IsExpanderRow o) => o -> m Int32
getExpanderRowSubtitleLines :: forall (m :: * -> *) o.
(MonadIO m, IsExpanderRow o) =>
o -> m Int32
getExpanderRowSubtitleLines o
obj = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj String
"subtitle-lines"
setExpanderRowSubtitleLines :: (MonadIO m, IsExpanderRow o) => o -> Int32 -> m ()
setExpanderRowSubtitleLines :: forall (m :: * -> *) o.
(MonadIO m, IsExpanderRow o) =>
o -> Int32 -> m ()
setExpanderRowSubtitleLines o
obj Int32
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 -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj String
"subtitle-lines" Int32
val
constructExpanderRowSubtitleLines :: (IsExpanderRow o, MIO.MonadIO m) => Int32 -> m (GValueConstruct o)
constructExpanderRowSubtitleLines :: forall o (m :: * -> *).
(IsExpanderRow o, MonadIO m) =>
Int32 -> m (GValueConstruct o)
constructExpanderRowSubtitleLines Int32
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 -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 String
"subtitle-lines" Int32
val
#if defined(ENABLE_OVERLOADING)
data ExpanderRowSubtitleLinesPropertyInfo
instance AttrInfo ExpanderRowSubtitleLinesPropertyInfo where
type AttrAllowedOps ExpanderRowSubtitleLinesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint ExpanderRowSubtitleLinesPropertyInfo = IsExpanderRow
type AttrSetTypeConstraint ExpanderRowSubtitleLinesPropertyInfo = (~) Int32
type AttrTransferTypeConstraint ExpanderRowSubtitleLinesPropertyInfo = (~) Int32
type AttrTransferType ExpanderRowSubtitleLinesPropertyInfo = Int32
type AttrGetType ExpanderRowSubtitleLinesPropertyInfo = Int32
type AttrLabel ExpanderRowSubtitleLinesPropertyInfo = "subtitle-lines"
type AttrOrigin ExpanderRowSubtitleLinesPropertyInfo = ExpanderRow
attrGet = getExpanderRowSubtitleLines
attrSet = setExpanderRowSubtitleLines
attrTransfer _ v = do
return v
attrConstruct = constructExpanderRowSubtitleLines
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.subtitleLines"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#g:attr:subtitleLines"
})
#endif
getExpanderRowTitleLines :: (MonadIO m, IsExpanderRow o) => o -> m Int32
getExpanderRowTitleLines :: forall (m :: * -> *) o.
(MonadIO m, IsExpanderRow o) =>
o -> m Int32
getExpanderRowTitleLines o
obj = IO Int32 -> m Int32
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj String
"title-lines"
setExpanderRowTitleLines :: (MonadIO m, IsExpanderRow o) => o -> Int32 -> m ()
setExpanderRowTitleLines :: forall (m :: * -> *) o.
(MonadIO m, IsExpanderRow o) =>
o -> Int32 -> m ()
setExpanderRowTitleLines o
obj Int32
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 -> Int32 -> IO ()
forall a. GObject a => a -> String -> Int32 -> IO ()
B.Properties.setObjectPropertyInt32 o
obj String
"title-lines" Int32
val
constructExpanderRowTitleLines :: (IsExpanderRow o, MIO.MonadIO m) => Int32 -> m (GValueConstruct o)
constructExpanderRowTitleLines :: forall o (m :: * -> *).
(IsExpanderRow o, MonadIO m) =>
Int32 -> m (GValueConstruct o)
constructExpanderRowTitleLines Int32
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 -> Int32 -> IO (GValueConstruct o)
forall o. String -> Int32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyInt32 String
"title-lines" Int32
val
#if defined(ENABLE_OVERLOADING)
data ExpanderRowTitleLinesPropertyInfo
instance AttrInfo ExpanderRowTitleLinesPropertyInfo where
type AttrAllowedOps ExpanderRowTitleLinesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint ExpanderRowTitleLinesPropertyInfo = IsExpanderRow
type AttrSetTypeConstraint ExpanderRowTitleLinesPropertyInfo = (~) Int32
type AttrTransferTypeConstraint ExpanderRowTitleLinesPropertyInfo = (~) Int32
type AttrTransferType ExpanderRowTitleLinesPropertyInfo = Int32
type AttrGetType ExpanderRowTitleLinesPropertyInfo = Int32
type AttrLabel ExpanderRowTitleLinesPropertyInfo = "title-lines"
type AttrOrigin ExpanderRowTitleLinesPropertyInfo = ExpanderRow
attrGet = getExpanderRowTitleLines
attrSet = setExpanderRowTitleLines
attrTransfer _ v = do
return v
attrConstruct = constructExpanderRowTitleLines
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.titleLines"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#g:attr:titleLines"
})
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList ExpanderRow
type instance O.AttributeList ExpanderRow = ExpanderRowAttributeList
type ExpanderRowAttributeList = ('[ '("accessibleRole", Gtk.Accessible.AccessibleAccessibleRolePropertyInfo), '("actionName", Gtk.Actionable.ActionableActionNamePropertyInfo), '("actionTarget", Gtk.Actionable.ActionableActionTargetPropertyInfo), '("activatable", Gtk.ListBoxRow.ListBoxRowActivatablePropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("canTarget", Gtk.Widget.WidgetCanTargetPropertyInfo), '("child", Gtk.ListBoxRow.ListBoxRowChildPropertyInfo), '("cssClasses", Gtk.Widget.WidgetCssClassesPropertyInfo), '("cssName", Gtk.Widget.WidgetCssNamePropertyInfo), '("cursor", Gtk.Widget.WidgetCursorPropertyInfo), '("enableExpansion", ExpanderRowEnableExpansionPropertyInfo), '("expanded", ExpanderRowExpandedPropertyInfo), '("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), '("iconName", ExpanderRowIconNamePropertyInfo), '("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), '("root", Gtk.Widget.WidgetRootPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("selectable", Gtk.ListBoxRow.ListBoxRowSelectablePropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("showEnableSwitch", ExpanderRowShowEnableSwitchPropertyInfo), '("subtitle", ExpanderRowSubtitlePropertyInfo), '("subtitleLines", ExpanderRowSubtitleLinesPropertyInfo), '("title", Adw.PreferencesRow.PreferencesRowTitlePropertyInfo), '("titleLines", ExpanderRowTitleLinesPropertyInfo), '("titleSelectable", Adw.PreferencesRow.PreferencesRowTitleSelectablePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("useMarkup", Adw.PreferencesRow.PreferencesRowUseMarkupPropertyInfo), '("useUnderline", Adw.PreferencesRow.PreferencesRowUseUnderlinePropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo)] :: [(Symbol, DK.Type)])
#endif
#if defined(ENABLE_OVERLOADING)
expanderRowEnableExpansion :: AttrLabelProxy "enableExpansion"
expanderRowEnableExpansion = AttrLabelProxy
expanderRowExpanded :: AttrLabelProxy "expanded"
expanderRowExpanded = AttrLabelProxy
expanderRowIconName :: AttrLabelProxy "iconName"
expanderRowIconName = AttrLabelProxy
expanderRowShowEnableSwitch :: AttrLabelProxy "showEnableSwitch"
expanderRowShowEnableSwitch = AttrLabelProxy
expanderRowSubtitle :: AttrLabelProxy "subtitle"
expanderRowSubtitle = AttrLabelProxy
expanderRowSubtitleLines :: AttrLabelProxy "subtitleLines"
expanderRowSubtitleLines = AttrLabelProxy
expanderRowTitleLines :: AttrLabelProxy "titleLines"
expanderRowTitleLines = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList ExpanderRow = ExpanderRowSignalList
type ExpanderRowSignalList = ('[ '("activate", Gtk.ListBoxRow.ListBoxRowActivateSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("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, DK.Type)])
#endif
foreign import ccall "adw_expander_row_new" adw_expander_row_new ::
IO (Ptr ExpanderRow)
expanderRowNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m ExpanderRow
expanderRowNew :: forall (m :: * -> *). (HasCallStack, MonadIO m) => m ExpanderRow
expanderRowNew = IO ExpanderRow -> m ExpanderRow
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO ExpanderRow -> m ExpanderRow)
-> IO ExpanderRow -> m ExpanderRow
forall a b. (a -> b) -> a -> b
$ do
Ptr ExpanderRow
result <- IO (Ptr ExpanderRow)
adw_expander_row_new
Text -> Ptr ExpanderRow -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"expanderRowNew" Ptr ExpanderRow
result
ExpanderRow
result' <- ((ManagedPtr ExpanderRow -> ExpanderRow)
-> Ptr ExpanderRow -> IO ExpanderRow
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr ExpanderRow -> ExpanderRow
ExpanderRow) Ptr ExpanderRow
result
ExpanderRow -> IO ExpanderRow
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ExpanderRow
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "adw_expander_row_add_action" adw_expander_row_add_action ::
Ptr ExpanderRow ->
Ptr Gtk.Widget.Widget ->
IO ()
expanderRowAddAction ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m ()
expanderRowAddAction :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsExpanderRow a, IsWidget b) =>
a -> b -> m ()
expanderRowAddAction a
self b
widget = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Widget
widget' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
widget
Ptr ExpanderRow -> Ptr Widget -> IO ()
adw_expander_row_add_action Ptr ExpanderRow
self' Ptr Widget
widget'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
widget
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ExpanderRowAddActionMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsExpanderRow a, Gtk.Widget.IsWidget b) => O.OverloadedMethod ExpanderRowAddActionMethodInfo a signature where
overloadedMethod = expanderRowAddAction
instance O.OverloadedMethodInfo ExpanderRowAddActionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowAddAction",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowAddAction"
})
#endif
foreign import ccall "adw_expander_row_add_prefix" adw_expander_row_add_prefix ::
Ptr ExpanderRow ->
Ptr Gtk.Widget.Widget ->
IO ()
expanderRowAddPrefix ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m ()
expanderRowAddPrefix :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsExpanderRow a, IsWidget b) =>
a -> b -> m ()
expanderRowAddPrefix a
self b
widget = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Widget
widget' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
widget
Ptr ExpanderRow -> Ptr Widget -> IO ()
adw_expander_row_add_prefix Ptr ExpanderRow
self' Ptr Widget
widget'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
widget
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ExpanderRowAddPrefixMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsExpanderRow a, Gtk.Widget.IsWidget b) => O.OverloadedMethod ExpanderRowAddPrefixMethodInfo a signature where
overloadedMethod = expanderRowAddPrefix
instance O.OverloadedMethodInfo ExpanderRowAddPrefixMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowAddPrefix",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowAddPrefix"
})
#endif
foreign import ccall "adw_expander_row_add_row" adw_expander_row_add_row ::
Ptr ExpanderRow ->
Ptr Gtk.Widget.Widget ->
IO ()
expanderRowAddRow ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m ()
expanderRowAddRow :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsExpanderRow a, IsWidget b) =>
a -> b -> m ()
expanderRowAddRow a
self b
child = 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 ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Widget
child' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
child
Ptr ExpanderRow -> Ptr Widget -> IO ()
adw_expander_row_add_row Ptr ExpanderRow
self' Ptr Widget
child'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
child
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ExpanderRowAddRowMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsExpanderRow a, Gtk.Widget.IsWidget b) => O.OverloadedMethod ExpanderRowAddRowMethodInfo a signature where
overloadedMethod = expanderRowAddRow
instance O.OverloadedMethodInfo ExpanderRowAddRowMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowAddRow",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowAddRow"
})
#endif
foreign import ccall "adw_expander_row_get_enable_expansion" adw_expander_row_get_enable_expansion ::
Ptr ExpanderRow ->
IO CInt
expanderRowGetEnableExpansion ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a) =>
a
-> m Bool
expanderRowGetEnableExpansion :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsExpanderRow a) =>
a -> m Bool
expanderRowGetEnableExpansion 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 ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr ExpanderRow -> IO CInt
adw_expander_row_get_enable_expansion Ptr ExpanderRow
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 ExpanderRowGetEnableExpansionMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsExpanderRow a) => O.OverloadedMethod ExpanderRowGetEnableExpansionMethodInfo a signature where
overloadedMethod = expanderRowGetEnableExpansion
instance O.OverloadedMethodInfo ExpanderRowGetEnableExpansionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowGetEnableExpansion",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowGetEnableExpansion"
})
#endif
foreign import ccall "adw_expander_row_get_expanded" adw_expander_row_get_expanded ::
Ptr ExpanderRow ->
IO CInt
expanderRowGetExpanded ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a) =>
a
-> m Bool
expanderRowGetExpanded :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsExpanderRow a) =>
a -> m Bool
expanderRowGetExpanded 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 ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr ExpanderRow -> IO CInt
adw_expander_row_get_expanded Ptr ExpanderRow
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 ExpanderRowGetExpandedMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsExpanderRow a) => O.OverloadedMethod ExpanderRowGetExpandedMethodInfo a signature where
overloadedMethod = expanderRowGetExpanded
instance O.OverloadedMethodInfo ExpanderRowGetExpandedMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowGetExpanded",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowGetExpanded"
})
#endif
foreign import ccall "adw_expander_row_get_icon_name" adw_expander_row_get_icon_name ::
Ptr ExpanderRow ->
IO CString
{-# DEPRECATED expanderRowGetIconName ["(Since version 1.3)","Use [method/@expanderRow@/.add_prefix] to add an icon."] #-}
expanderRowGetIconName ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a) =>
a
-> m (Maybe T.Text)
expanderRowGetIconName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsExpanderRow a) =>
a -> m (Maybe Text)
expanderRowGetIconName 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 ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr ExpanderRow -> IO CString
adw_expander_row_get_icon_name Ptr ExpanderRow
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 ExpanderRowGetIconNameMethodInfo
instance (signature ~ (m (Maybe T.Text)), MonadIO m, IsExpanderRow a) => O.OverloadedMethod ExpanderRowGetIconNameMethodInfo a signature where
overloadedMethod = expanderRowGetIconName
instance O.OverloadedMethodInfo ExpanderRowGetIconNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowGetIconName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowGetIconName"
})
#endif
foreign import ccall "adw_expander_row_get_show_enable_switch" adw_expander_row_get_show_enable_switch ::
Ptr ExpanderRow ->
IO CInt
expanderRowGetShowEnableSwitch ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a) =>
a
-> m Bool
expanderRowGetShowEnableSwitch :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsExpanderRow a) =>
a -> m Bool
expanderRowGetShowEnableSwitch 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 ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr ExpanderRow -> IO CInt
adw_expander_row_get_show_enable_switch Ptr ExpanderRow
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 ExpanderRowGetShowEnableSwitchMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsExpanderRow a) => O.OverloadedMethod ExpanderRowGetShowEnableSwitchMethodInfo a signature where
overloadedMethod = expanderRowGetShowEnableSwitch
instance O.OverloadedMethodInfo ExpanderRowGetShowEnableSwitchMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowGetShowEnableSwitch",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowGetShowEnableSwitch"
})
#endif
foreign import ccall "adw_expander_row_get_subtitle" adw_expander_row_get_subtitle ::
Ptr ExpanderRow ->
IO CString
expanderRowGetSubtitle ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a) =>
a
-> m T.Text
expanderRowGetSubtitle :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsExpanderRow a) =>
a -> m Text
expanderRowGetSubtitle a
self = IO Text -> m Text
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr ExpanderRow -> IO CString
adw_expander_row_get_subtitle Ptr ExpanderRow
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"expanderRowGetSubtitle" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data ExpanderRowGetSubtitleMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsExpanderRow a) => O.OverloadedMethod ExpanderRowGetSubtitleMethodInfo a signature where
overloadedMethod = expanderRowGetSubtitle
instance O.OverloadedMethodInfo ExpanderRowGetSubtitleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowGetSubtitle",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowGetSubtitle"
})
#endif
foreign import ccall "adw_expander_row_get_subtitle_lines" adw_expander_row_get_subtitle_lines ::
Ptr ExpanderRow ->
IO CInt
expanderRowGetSubtitleLines ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a) =>
a
-> m Bool
expanderRowGetSubtitleLines :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsExpanderRow a) =>
a -> m Bool
expanderRowGetSubtitleLines 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 ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr ExpanderRow -> IO CInt
adw_expander_row_get_subtitle_lines Ptr ExpanderRow
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 ExpanderRowGetSubtitleLinesMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsExpanderRow a) => O.OverloadedMethod ExpanderRowGetSubtitleLinesMethodInfo a signature where
overloadedMethod = expanderRowGetSubtitleLines
instance O.OverloadedMethodInfo ExpanderRowGetSubtitleLinesMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowGetSubtitleLines",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowGetSubtitleLines"
})
#endif
foreign import ccall "adw_expander_row_get_title_lines" adw_expander_row_get_title_lines ::
Ptr ExpanderRow ->
IO CInt
expanderRowGetTitleLines ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a) =>
a
-> m Bool
expanderRowGetTitleLines :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsExpanderRow a) =>
a -> m Bool
expanderRowGetTitleLines 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 ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr ExpanderRow -> IO CInt
adw_expander_row_get_title_lines Ptr ExpanderRow
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 ExpanderRowGetTitleLinesMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsExpanderRow a) => O.OverloadedMethod ExpanderRowGetTitleLinesMethodInfo a signature where
overloadedMethod = expanderRowGetTitleLines
instance O.OverloadedMethodInfo ExpanderRowGetTitleLinesMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowGetTitleLines",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowGetTitleLines"
})
#endif
foreign import ccall "adw_expander_row_remove" adw_expander_row_remove ::
Ptr ExpanderRow ->
Ptr Gtk.Widget.Widget ->
IO ()
expanderRowRemove ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m ()
expanderRowRemove :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsExpanderRow a, IsWidget b) =>
a -> b -> m ()
expanderRowRemove a
self b
child = 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 ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Widget
child' <- b -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
child
Ptr ExpanderRow -> Ptr Widget -> IO ()
adw_expander_row_remove Ptr ExpanderRow
self' Ptr Widget
child'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
child
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ExpanderRowRemoveMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsExpanderRow a, Gtk.Widget.IsWidget b) => O.OverloadedMethod ExpanderRowRemoveMethodInfo a signature where
overloadedMethod = expanderRowRemove
instance O.OverloadedMethodInfo ExpanderRowRemoveMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowRemove",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowRemove"
})
#endif
foreign import ccall "adw_expander_row_set_enable_expansion" adw_expander_row_set_enable_expansion ::
Ptr ExpanderRow ->
CInt ->
IO ()
expanderRowSetEnableExpansion ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a) =>
a
-> Bool
-> m ()
expanderRowSetEnableExpansion :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsExpanderRow a) =>
a -> Bool -> m ()
expanderRowSetEnableExpansion a
self Bool
enableExpansion = 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 ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let enableExpansion' :: CInt
enableExpansion' = (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
enableExpansion
Ptr ExpanderRow -> CInt -> IO ()
adw_expander_row_set_enable_expansion Ptr ExpanderRow
self' CInt
enableExpansion'
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 ExpanderRowSetEnableExpansionMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsExpanderRow a) => O.OverloadedMethod ExpanderRowSetEnableExpansionMethodInfo a signature where
overloadedMethod = expanderRowSetEnableExpansion
instance O.OverloadedMethodInfo ExpanderRowSetEnableExpansionMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowSetEnableExpansion",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowSetEnableExpansion"
})
#endif
foreign import ccall "adw_expander_row_set_expanded" adw_expander_row_set_expanded ::
Ptr ExpanderRow ->
CInt ->
IO ()
expanderRowSetExpanded ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a) =>
a
-> Bool
-> m ()
expanderRowSetExpanded :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsExpanderRow a) =>
a -> Bool -> m ()
expanderRowSetExpanded a
self Bool
expanded = 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 ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let expanded' :: CInt
expanded' = (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
expanded
Ptr ExpanderRow -> CInt -> IO ()
adw_expander_row_set_expanded Ptr ExpanderRow
self' CInt
expanded'
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 ExpanderRowSetExpandedMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsExpanderRow a) => O.OverloadedMethod ExpanderRowSetExpandedMethodInfo a signature where
overloadedMethod = expanderRowSetExpanded
instance O.OverloadedMethodInfo ExpanderRowSetExpandedMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowSetExpanded",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowSetExpanded"
})
#endif
foreign import ccall "adw_expander_row_set_icon_name" adw_expander_row_set_icon_name ::
Ptr ExpanderRow ->
CString ->
IO ()
{-# DEPRECATED expanderRowSetIconName ["(Since version 1.3)","Use [method/@expanderRow@/.add_prefix] to add an icon."] #-}
expanderRowSetIconName ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a) =>
a
-> Maybe (T.Text)
-> m ()
expanderRowSetIconName :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsExpanderRow a) =>
a -> Maybe Text -> m ()
expanderRowSetIconName a
self Maybe Text
iconName = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
maybeIconName <- case Maybe Text
iconName 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
jIconName -> do
CString
jIconName' <- Text -> IO CString
textToCString Text
jIconName
CString -> IO CString
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return CString
jIconName'
Ptr ExpanderRow -> CString -> IO ()
adw_expander_row_set_icon_name Ptr ExpanderRow
self' CString
maybeIconName
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
maybeIconName
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ExpanderRowSetIconNameMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsExpanderRow a) => O.OverloadedMethod ExpanderRowSetIconNameMethodInfo a signature where
overloadedMethod = expanderRowSetIconName
instance O.OverloadedMethodInfo ExpanderRowSetIconNameMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowSetIconName",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowSetIconName"
})
#endif
foreign import ccall "adw_expander_row_set_show_enable_switch" adw_expander_row_set_show_enable_switch ::
Ptr ExpanderRow ->
CInt ->
IO ()
expanderRowSetShowEnableSwitch ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a) =>
a
-> Bool
-> m ()
expanderRowSetShowEnableSwitch :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsExpanderRow a) =>
a -> Bool -> m ()
expanderRowSetShowEnableSwitch a
self Bool
showEnableSwitch = 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 ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let showEnableSwitch' :: CInt
showEnableSwitch' = (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
showEnableSwitch
Ptr ExpanderRow -> CInt -> IO ()
adw_expander_row_set_show_enable_switch Ptr ExpanderRow
self' CInt
showEnableSwitch'
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 ExpanderRowSetShowEnableSwitchMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsExpanderRow a) => O.OverloadedMethod ExpanderRowSetShowEnableSwitchMethodInfo a signature where
overloadedMethod = expanderRowSetShowEnableSwitch
instance O.OverloadedMethodInfo ExpanderRowSetShowEnableSwitchMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowSetShowEnableSwitch",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowSetShowEnableSwitch"
})
#endif
foreign import ccall "adw_expander_row_set_subtitle" adw_expander_row_set_subtitle ::
Ptr ExpanderRow ->
CString ->
IO ()
expanderRowSetSubtitle ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a) =>
a
-> T.Text
-> m ()
expanderRowSetSubtitle :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsExpanderRow a) =>
a -> Text -> m ()
expanderRowSetSubtitle a
self 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 ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
subtitle' <- Text -> IO CString
textToCString Text
subtitle
Ptr ExpanderRow -> CString -> IO ()
adw_expander_row_set_subtitle Ptr ExpanderRow
self' CString
subtitle'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
subtitle'
() -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ExpanderRowSetSubtitleMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsExpanderRow a) => O.OverloadedMethod ExpanderRowSetSubtitleMethodInfo a signature where
overloadedMethod = expanderRowSetSubtitle
instance O.OverloadedMethodInfo ExpanderRowSetSubtitleMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowSetSubtitle",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowSetSubtitle"
})
#endif
foreign import ccall "adw_expander_row_set_subtitle_lines" adw_expander_row_set_subtitle_lines ::
Ptr ExpanderRow ->
Int32 ->
IO ()
expanderRowSetSubtitleLines ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a) =>
a
-> Int32
-> m ()
expanderRowSetSubtitleLines :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsExpanderRow a) =>
a -> Int32 -> m ()
expanderRowSetSubtitleLines a
self Int32
subtitleLines = 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 ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr ExpanderRow -> Int32 -> IO ()
adw_expander_row_set_subtitle_lines Ptr ExpanderRow
self' Int32
subtitleLines
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 ExpanderRowSetSubtitleLinesMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsExpanderRow a) => O.OverloadedMethod ExpanderRowSetSubtitleLinesMethodInfo a signature where
overloadedMethod = expanderRowSetSubtitleLines
instance O.OverloadedMethodInfo ExpanderRowSetSubtitleLinesMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowSetSubtitleLines",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowSetSubtitleLines"
})
#endif
foreign import ccall "adw_expander_row_set_title_lines" adw_expander_row_set_title_lines ::
Ptr ExpanderRow ->
Int32 ->
IO ()
expanderRowSetTitleLines ::
(B.CallStack.HasCallStack, MonadIO m, IsExpanderRow a) =>
a
-> Int32
-> m ()
expanderRowSetTitleLines :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsExpanderRow a) =>
a -> Int32 -> m ()
expanderRowSetTitleLines a
self Int32
titleLines = 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 ExpanderRow
self' <- a -> IO (Ptr ExpanderRow)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr ExpanderRow -> Int32 -> IO ()
adw_expander_row_set_title_lines Ptr ExpanderRow
self' Int32
titleLines
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 ExpanderRowSetTitleLinesMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsExpanderRow a) => O.OverloadedMethod ExpanderRowSetTitleLinesMethodInfo a signature where
overloadedMethod = expanderRowSetTitleLines
instance O.OverloadedMethodInfo ExpanderRowSetTitleLinesMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Adw.Objects.ExpanderRow.expanderRowSetTitleLines",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-adwaita-1.0.5/docs/GI-Adw-Objects-ExpanderRow.html#v:expanderRowSetTitleLines"
})
#endif