{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gtk.Objects.EditableLabel
(
EditableLabel(..) ,
IsEditableLabel ,
toEditableLabel ,
#if defined(ENABLE_OVERLOADING)
ResolveEditableLabelMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
EditableLabelGetEditingMethodInfo ,
#endif
editableLabelGetEditing ,
editableLabelNew ,
#if defined(ENABLE_OVERLOADING)
EditableLabelStartEditingMethodInfo ,
#endif
editableLabelStartEditing ,
#if defined(ENABLE_OVERLOADING)
EditableLabelStopEditingMethodInfo ,
#endif
editableLabelStopEditing ,
#if defined(ENABLE_OVERLOADING)
EditableLabelEditingPropertyInfo ,
#endif
constructEditableLabelEditing ,
#if defined(ENABLE_OVERLOADING)
editableLabelEditing ,
#endif
getEditableLabelEditing ,
setEditableLabelEditing ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GHashTable as B.GHT
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Coerce as Coerce
import qualified Data.Text as T
import qualified Data.Kind as DK
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GHC.Records as R
import qualified GI.GObject.Objects.Object as GObject.Object
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Accessible as Gtk.Accessible
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.ConstraintTarget as Gtk.ConstraintTarget
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Editable as Gtk.Editable
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype EditableLabel = EditableLabel (SP.ManagedPtr EditableLabel)
deriving (EditableLabel -> EditableLabel -> Bool
(EditableLabel -> EditableLabel -> Bool)
-> (EditableLabel -> EditableLabel -> Bool) -> Eq EditableLabel
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: EditableLabel -> EditableLabel -> Bool
== :: EditableLabel -> EditableLabel -> Bool
$c/= :: EditableLabel -> EditableLabel -> Bool
/= :: EditableLabel -> EditableLabel -> Bool
Eq)
instance SP.ManagedPtrNewtype EditableLabel where
toManagedPtr :: EditableLabel -> ManagedPtr EditableLabel
toManagedPtr (EditableLabel ManagedPtr EditableLabel
p) = ManagedPtr EditableLabel
p
foreign import ccall "gtk_editable_label_get_type"
c_gtk_editable_label_get_type :: IO B.Types.GType
instance B.Types.TypedObject EditableLabel where
glibType :: IO GType
glibType = IO GType
c_gtk_editable_label_get_type
instance B.Types.GObject EditableLabel
class (SP.GObject o, O.IsDescendantOf EditableLabel o) => IsEditableLabel o
instance (SP.GObject o, O.IsDescendantOf EditableLabel o) => IsEditableLabel o
instance O.HasParentTypes EditableLabel
type instance O.ParentTypes EditableLabel = '[Gtk.Widget.Widget, GObject.Object.Object, Gtk.Accessible.Accessible, Gtk.Buildable.Buildable, Gtk.ConstraintTarget.ConstraintTarget, Gtk.Editable.Editable]
toEditableLabel :: (MIO.MonadIO m, IsEditableLabel o) => o -> m EditableLabel
toEditableLabel :: forall (m :: * -> *) o.
(MonadIO m, IsEditableLabel o) =>
o -> m EditableLabel
toEditableLabel = IO EditableLabel -> m EditableLabel
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO EditableLabel -> m EditableLabel)
-> (o -> IO EditableLabel) -> o -> m EditableLabel
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr EditableLabel -> EditableLabel)
-> o -> IO EditableLabel
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr EditableLabel -> EditableLabel
EditableLabel
instance B.GValue.IsGValue (Maybe EditableLabel) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_gtk_editable_label_get_type
gvalueSet_ :: Ptr GValue -> Maybe EditableLabel -> IO ()
gvalueSet_ Ptr GValue
gv Maybe EditableLabel
P.Nothing = Ptr GValue -> Ptr EditableLabel -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr EditableLabel
forall a. Ptr a
FP.nullPtr :: FP.Ptr EditableLabel)
gvalueSet_ Ptr GValue
gv (P.Just EditableLabel
obj) = EditableLabel -> (Ptr EditableLabel -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr EditableLabel
obj (Ptr GValue -> Ptr EditableLabel -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe EditableLabel)
gvalueGet_ Ptr GValue
gv = do
Ptr EditableLabel
ptr <- Ptr GValue -> IO (Ptr EditableLabel)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr EditableLabel)
if Ptr EditableLabel
ptr Ptr EditableLabel -> Ptr EditableLabel -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr EditableLabel
forall a. Ptr a
FP.nullPtr
then EditableLabel -> Maybe EditableLabel
forall a. a -> Maybe a
P.Just (EditableLabel -> Maybe EditableLabel)
-> IO EditableLabel -> IO (Maybe EditableLabel)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr EditableLabel -> EditableLabel)
-> Ptr EditableLabel -> IO EditableLabel
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr EditableLabel -> EditableLabel
EditableLabel Ptr EditableLabel
ptr
else Maybe EditableLabel -> IO (Maybe EditableLabel)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe EditableLabel
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveEditableLabelMethod (t :: Symbol) (o :: DK.Type) :: DK.Type where
ResolveEditableLabelMethod "actionSetEnabled" o = Gtk.Widget.WidgetActionSetEnabledMethodInfo
ResolveEditableLabelMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveEditableLabelMethod "activateAction" o = Gtk.Widget.WidgetActivateActionMethodInfo
ResolveEditableLabelMethod "activateDefault" o = Gtk.Widget.WidgetActivateDefaultMethodInfo
ResolveEditableLabelMethod "addController" o = Gtk.Widget.WidgetAddControllerMethodInfo
ResolveEditableLabelMethod "addCssClass" o = Gtk.Widget.WidgetAddCssClassMethodInfo
ResolveEditableLabelMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveEditableLabelMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveEditableLabelMethod "allocate" o = Gtk.Widget.WidgetAllocateMethodInfo
ResolveEditableLabelMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveEditableLabelMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveEditableLabelMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveEditableLabelMethod "computeBounds" o = Gtk.Widget.WidgetComputeBoundsMethodInfo
ResolveEditableLabelMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveEditableLabelMethod "computePoint" o = Gtk.Widget.WidgetComputePointMethodInfo
ResolveEditableLabelMethod "computeTransform" o = Gtk.Widget.WidgetComputeTransformMethodInfo
ResolveEditableLabelMethod "contains" o = Gtk.Widget.WidgetContainsMethodInfo
ResolveEditableLabelMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveEditableLabelMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveEditableLabelMethod "delegateGetAccessiblePlatformState" o = Gtk.Editable.EditableDelegateGetAccessiblePlatformStateMethodInfo
ResolveEditableLabelMethod "deleteSelection" o = Gtk.Editable.EditableDeleteSelectionMethodInfo
ResolveEditableLabelMethod "deleteText" o = Gtk.Editable.EditableDeleteTextMethodInfo
ResolveEditableLabelMethod "disposeTemplate" o = Gtk.Widget.WidgetDisposeTemplateMethodInfo
ResolveEditableLabelMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveEditableLabelMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveEditableLabelMethod "finishDelegate" o = Gtk.Editable.EditableFinishDelegateMethodInfo
ResolveEditableLabelMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveEditableLabelMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveEditableLabelMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveEditableLabelMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveEditableLabelMethod "hasCssClass" o = Gtk.Widget.WidgetHasCssClassMethodInfo
ResolveEditableLabelMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveEditableLabelMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveEditableLabelMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveEditableLabelMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveEditableLabelMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveEditableLabelMethod "initDelegate" o = Gtk.Editable.EditableInitDelegateMethodInfo
ResolveEditableLabelMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveEditableLabelMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveEditableLabelMethod "insertAfter" o = Gtk.Widget.WidgetInsertAfterMethodInfo
ResolveEditableLabelMethod "insertBefore" o = Gtk.Widget.WidgetInsertBeforeMethodInfo
ResolveEditableLabelMethod "insertText" o = Gtk.Editable.EditableInsertTextMethodInfo
ResolveEditableLabelMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveEditableLabelMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveEditableLabelMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveEditableLabelMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveEditableLabelMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveEditableLabelMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveEditableLabelMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveEditableLabelMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveEditableLabelMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveEditableLabelMethod "measure" o = Gtk.Widget.WidgetMeasureMethodInfo
ResolveEditableLabelMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveEditableLabelMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveEditableLabelMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveEditableLabelMethod "observeChildren" o = Gtk.Widget.WidgetObserveChildrenMethodInfo
ResolveEditableLabelMethod "observeControllers" o = Gtk.Widget.WidgetObserveControllersMethodInfo
ResolveEditableLabelMethod "pick" o = Gtk.Widget.WidgetPickMethodInfo
ResolveEditableLabelMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveEditableLabelMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveEditableLabelMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveEditableLabelMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveEditableLabelMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveEditableLabelMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveEditableLabelMethod "removeController" o = Gtk.Widget.WidgetRemoveControllerMethodInfo
ResolveEditableLabelMethod "removeCssClass" o = Gtk.Widget.WidgetRemoveCssClassMethodInfo
ResolveEditableLabelMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveEditableLabelMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveEditableLabelMethod "resetProperty" o = Gtk.Accessible.AccessibleResetPropertyMethodInfo
ResolveEditableLabelMethod "resetRelation" o = Gtk.Accessible.AccessibleResetRelationMethodInfo
ResolveEditableLabelMethod "resetState" o = Gtk.Accessible.AccessibleResetStateMethodInfo
ResolveEditableLabelMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveEditableLabelMethod "selectRegion" o = Gtk.Editable.EditableSelectRegionMethodInfo
ResolveEditableLabelMethod "shouldLayout" o = Gtk.Widget.WidgetShouldLayoutMethodInfo
ResolveEditableLabelMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveEditableLabelMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveEditableLabelMethod "snapshotChild" o = Gtk.Widget.WidgetSnapshotChildMethodInfo
ResolveEditableLabelMethod "startEditing" o = EditableLabelStartEditingMethodInfo
ResolveEditableLabelMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveEditableLabelMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveEditableLabelMethod "stopEditing" o = EditableLabelStopEditingMethodInfo
ResolveEditableLabelMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveEditableLabelMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveEditableLabelMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveEditableLabelMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveEditableLabelMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveEditableLabelMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveEditableLabelMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveEditableLabelMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveEditableLabelMethod "updateNextAccessibleSibling" o = Gtk.Accessible.AccessibleUpdateNextAccessibleSiblingMethodInfo
ResolveEditableLabelMethod "updateProperty" o = Gtk.Accessible.AccessibleUpdatePropertyMethodInfo
ResolveEditableLabelMethod "updateRelation" o = Gtk.Accessible.AccessibleUpdateRelationMethodInfo
ResolveEditableLabelMethod "updateState" o = Gtk.Accessible.AccessibleUpdateStateMethodInfo
ResolveEditableLabelMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveEditableLabelMethod "getAccessibleParent" o = Gtk.Accessible.AccessibleGetAccessibleParentMethodInfo
ResolveEditableLabelMethod "getAccessibleRole" o = Gtk.Accessible.AccessibleGetAccessibleRoleMethodInfo
ResolveEditableLabelMethod "getAlignment" o = Gtk.Editable.EditableGetAlignmentMethodInfo
ResolveEditableLabelMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveEditableLabelMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveEditableLabelMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveEditableLabelMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveEditableLabelMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveEditableLabelMethod "getAtContext" o = Gtk.Accessible.AccessibleGetAtContextMethodInfo
ResolveEditableLabelMethod "getBounds" o = Gtk.Accessible.AccessibleGetBoundsMethodInfo
ResolveEditableLabelMethod "getBuildableId" o = Gtk.Buildable.BuildableGetBuildableIdMethodInfo
ResolveEditableLabelMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveEditableLabelMethod "getCanTarget" o = Gtk.Widget.WidgetGetCanTargetMethodInfo
ResolveEditableLabelMethod "getChars" o = Gtk.Editable.EditableGetCharsMethodInfo
ResolveEditableLabelMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveEditableLabelMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveEditableLabelMethod "getColor" o = Gtk.Widget.WidgetGetColorMethodInfo
ResolveEditableLabelMethod "getCssClasses" o = Gtk.Widget.WidgetGetCssClassesMethodInfo
ResolveEditableLabelMethod "getCssName" o = Gtk.Widget.WidgetGetCssNameMethodInfo
ResolveEditableLabelMethod "getCursor" o = Gtk.Widget.WidgetGetCursorMethodInfo
ResolveEditableLabelMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveEditableLabelMethod "getDelegate" o = Gtk.Editable.EditableGetDelegateMethodInfo
ResolveEditableLabelMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveEditableLabelMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveEditableLabelMethod "getEditable" o = Gtk.Editable.EditableGetEditableMethodInfo
ResolveEditableLabelMethod "getEditing" o = EditableLabelGetEditingMethodInfo
ResolveEditableLabelMethod "getEnableUndo" o = Gtk.Editable.EditableGetEnableUndoMethodInfo
ResolveEditableLabelMethod "getFirstAccessibleChild" o = Gtk.Accessible.AccessibleGetFirstAccessibleChildMethodInfo
ResolveEditableLabelMethod "getFirstChild" o = Gtk.Widget.WidgetGetFirstChildMethodInfo
ResolveEditableLabelMethod "getFocusChild" o = Gtk.Widget.WidgetGetFocusChildMethodInfo
ResolveEditableLabelMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveEditableLabelMethod "getFocusable" o = Gtk.Widget.WidgetGetFocusableMethodInfo
ResolveEditableLabelMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveEditableLabelMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveEditableLabelMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveEditableLabelMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveEditableLabelMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveEditableLabelMethod "getHeight" o = Gtk.Widget.WidgetGetHeightMethodInfo
ResolveEditableLabelMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveEditableLabelMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveEditableLabelMethod "getLastChild" o = Gtk.Widget.WidgetGetLastChildMethodInfo
ResolveEditableLabelMethod "getLayoutManager" o = Gtk.Widget.WidgetGetLayoutManagerMethodInfo
ResolveEditableLabelMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveEditableLabelMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveEditableLabelMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveEditableLabelMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveEditableLabelMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveEditableLabelMethod "getMaxWidthChars" o = Gtk.Editable.EditableGetMaxWidthCharsMethodInfo
ResolveEditableLabelMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveEditableLabelMethod "getNative" o = Gtk.Widget.WidgetGetNativeMethodInfo
ResolveEditableLabelMethod "getNextAccessibleSibling" o = Gtk.Accessible.AccessibleGetNextAccessibleSiblingMethodInfo
ResolveEditableLabelMethod "getNextSibling" o = Gtk.Widget.WidgetGetNextSiblingMethodInfo
ResolveEditableLabelMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveEditableLabelMethod "getOverflow" o = Gtk.Widget.WidgetGetOverflowMethodInfo
ResolveEditableLabelMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveEditableLabelMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveEditableLabelMethod "getPlatformState" o = Gtk.Accessible.AccessibleGetPlatformStateMethodInfo
ResolveEditableLabelMethod "getPosition" o = Gtk.Editable.EditableGetPositionMethodInfo
ResolveEditableLabelMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveEditableLabelMethod "getPrevSibling" o = Gtk.Widget.WidgetGetPrevSiblingMethodInfo
ResolveEditableLabelMethod "getPrimaryClipboard" o = Gtk.Widget.WidgetGetPrimaryClipboardMethodInfo
ResolveEditableLabelMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveEditableLabelMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveEditableLabelMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveEditableLabelMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveEditableLabelMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveEditableLabelMethod "getRoot" o = Gtk.Widget.WidgetGetRootMethodInfo
ResolveEditableLabelMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveEditableLabelMethod "getSelectionBounds" o = Gtk.Editable.EditableGetSelectionBoundsMethodInfo
ResolveEditableLabelMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveEditableLabelMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveEditableLabelMethod "getSize" o = Gtk.Widget.WidgetGetSizeMethodInfo
ResolveEditableLabelMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveEditableLabelMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveEditableLabelMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveEditableLabelMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveEditableLabelMethod "getText" o = Gtk.Editable.EditableGetTextMethodInfo
ResolveEditableLabelMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveEditableLabelMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveEditableLabelMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveEditableLabelMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveEditableLabelMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveEditableLabelMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveEditableLabelMethod "getWidth" o = Gtk.Widget.WidgetGetWidthMethodInfo
ResolveEditableLabelMethod "getWidthChars" o = Gtk.Editable.EditableGetWidthCharsMethodInfo
ResolveEditableLabelMethod "setAccessibleParent" o = Gtk.Accessible.AccessibleSetAccessibleParentMethodInfo
ResolveEditableLabelMethod "setAlignment" o = Gtk.Editable.EditableSetAlignmentMethodInfo
ResolveEditableLabelMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveEditableLabelMethod "setCanTarget" o = Gtk.Widget.WidgetSetCanTargetMethodInfo
ResolveEditableLabelMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveEditableLabelMethod "setCssClasses" o = Gtk.Widget.WidgetSetCssClassesMethodInfo
ResolveEditableLabelMethod "setCursor" o = Gtk.Widget.WidgetSetCursorMethodInfo
ResolveEditableLabelMethod "setCursorFromName" o = Gtk.Widget.WidgetSetCursorFromNameMethodInfo
ResolveEditableLabelMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveEditableLabelMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveEditableLabelMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveEditableLabelMethod "setEditable" o = Gtk.Editable.EditableSetEditableMethodInfo
ResolveEditableLabelMethod "setEnableUndo" o = Gtk.Editable.EditableSetEnableUndoMethodInfo
ResolveEditableLabelMethod "setFocusChild" o = Gtk.Widget.WidgetSetFocusChildMethodInfo
ResolveEditableLabelMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveEditableLabelMethod "setFocusable" o = Gtk.Widget.WidgetSetFocusableMethodInfo
ResolveEditableLabelMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveEditableLabelMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveEditableLabelMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveEditableLabelMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveEditableLabelMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveEditableLabelMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveEditableLabelMethod "setLayoutManager" o = Gtk.Widget.WidgetSetLayoutManagerMethodInfo
ResolveEditableLabelMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveEditableLabelMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveEditableLabelMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveEditableLabelMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveEditableLabelMethod "setMaxWidthChars" o = Gtk.Editable.EditableSetMaxWidthCharsMethodInfo
ResolveEditableLabelMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveEditableLabelMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveEditableLabelMethod "setOverflow" o = Gtk.Widget.WidgetSetOverflowMethodInfo
ResolveEditableLabelMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveEditableLabelMethod "setPosition" o = Gtk.Editable.EditableSetPositionMethodInfo
ResolveEditableLabelMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveEditableLabelMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveEditableLabelMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveEditableLabelMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveEditableLabelMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveEditableLabelMethod "setText" o = Gtk.Editable.EditableSetTextMethodInfo
ResolveEditableLabelMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveEditableLabelMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveEditableLabelMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveEditableLabelMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveEditableLabelMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveEditableLabelMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveEditableLabelMethod "setWidthChars" o = Gtk.Editable.EditableSetWidthCharsMethodInfo
ResolveEditableLabelMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveEditableLabelMethod t EditableLabel, O.OverloadedMethod info EditableLabel p) => OL.IsLabel t (EditableLabel -> 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 ~ ResolveEditableLabelMethod t EditableLabel, O.OverloadedMethod info EditableLabel p, R.HasField t EditableLabel p) => R.HasField t EditableLabel p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveEditableLabelMethod t EditableLabel, O.OverloadedMethodInfo info EditableLabel) => OL.IsLabel t (O.MethodProxy info EditableLabel) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
getEditableLabelEditing :: (MonadIO m, IsEditableLabel o) => o -> m Bool
getEditableLabelEditing :: forall (m :: * -> *) o.
(MonadIO m, IsEditableLabel o) =>
o -> m Bool
getEditableLabelEditing 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
"editing"
setEditableLabelEditing :: (MonadIO m, IsEditableLabel o) => o -> Bool -> m ()
setEditableLabelEditing :: forall (m :: * -> *) o.
(MonadIO m, IsEditableLabel o) =>
o -> Bool -> m ()
setEditableLabelEditing 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
"editing" Bool
val
constructEditableLabelEditing :: (IsEditableLabel o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructEditableLabelEditing :: forall o (m :: * -> *).
(IsEditableLabel o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructEditableLabelEditing 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
"editing" Bool
val
#if defined(ENABLE_OVERLOADING)
data EditableLabelEditingPropertyInfo
instance AttrInfo EditableLabelEditingPropertyInfo where
type AttrAllowedOps EditableLabelEditingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint EditableLabelEditingPropertyInfo = IsEditableLabel
type AttrSetTypeConstraint EditableLabelEditingPropertyInfo = (~) Bool
type AttrTransferTypeConstraint EditableLabelEditingPropertyInfo = (~) Bool
type AttrTransferType EditableLabelEditingPropertyInfo = Bool
type AttrGetType EditableLabelEditingPropertyInfo = Bool
type AttrLabel EditableLabelEditingPropertyInfo = "editing"
type AttrOrigin EditableLabelEditingPropertyInfo = EditableLabel
attrGet = getEditableLabelEditing
attrSet = setEditableLabelEditing
attrTransfer _ v = do
return v
attrConstruct = constructEditableLabelEditing
attrClear = undefined
dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.EditableLabel.editing"
, O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.8/docs/GI-Gtk-Objects-EditableLabel.html#g:attr:editing"
})
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList EditableLabel
type instance O.AttributeList EditableLabel = EditableLabelAttributeList
type EditableLabelAttributeList = ('[ '("accessibleRole", Gtk.Accessible.AccessibleAccessibleRolePropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("canTarget", Gtk.Widget.WidgetCanTargetPropertyInfo), '("cssClasses", Gtk.Widget.WidgetCssClassesPropertyInfo), '("cssName", Gtk.Widget.WidgetCssNamePropertyInfo), '("cursor", Gtk.Widget.WidgetCursorPropertyInfo), '("cursorPosition", Gtk.Editable.EditableCursorPositionPropertyInfo), '("editable", Gtk.Editable.EditableEditablePropertyInfo), '("editing", EditableLabelEditingPropertyInfo), '("enableUndo", Gtk.Editable.EditableEnableUndoPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("focusable", Gtk.Widget.WidgetFocusablePropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("layoutManager", Gtk.Widget.WidgetLayoutManagerPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("maxWidthChars", Gtk.Editable.EditableMaxWidthCharsPropertyInfo), '("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), '("selectionBound", Gtk.Editable.EditableSelectionBoundPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("text", Gtk.Editable.EditableTextPropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthChars", Gtk.Editable.EditableWidthCharsPropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("xalign", Gtk.Editable.EditableXalignPropertyInfo)] :: [(Symbol, DK.Type)])
#endif
#if defined(ENABLE_OVERLOADING)
editableLabelEditing :: AttrLabelProxy "editing"
editableLabelEditing = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList EditableLabel = EditableLabelSignalList
type EditableLabelSignalList = ('[ '("changed", Gtk.Editable.EditableChangedSignalInfo), '("deleteText", Gtk.Editable.EditableDeleteTextSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("insertText", Gtk.Editable.EditableInsertTextSignalInfo), '("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 "gtk_editable_label_new" gtk_editable_label_new ::
CString ->
IO (Ptr EditableLabel)
editableLabelNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
T.Text
-> m EditableLabel
editableLabelNew :: forall (m :: * -> *).
(HasCallStack, MonadIO m) =>
Text -> m EditableLabel
editableLabelNew Text
str = IO EditableLabel -> m EditableLabel
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO EditableLabel -> m EditableLabel)
-> IO EditableLabel -> m EditableLabel
forall a b. (a -> b) -> a -> b
$ do
CString
str' <- Text -> IO CString
textToCString Text
str
Ptr EditableLabel
result <- CString -> IO (Ptr EditableLabel)
gtk_editable_label_new CString
str'
Text -> Ptr EditableLabel -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"editableLabelNew" Ptr EditableLabel
result
EditableLabel
result' <- ((ManagedPtr EditableLabel -> EditableLabel)
-> Ptr EditableLabel -> IO EditableLabel
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr EditableLabel -> EditableLabel
EditableLabel) Ptr EditableLabel
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
str'
EditableLabel -> IO EditableLabel
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return EditableLabel
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "gtk_editable_label_get_editing" gtk_editable_label_get_editing ::
Ptr EditableLabel ->
IO CInt
editableLabelGetEditing ::
(B.CallStack.HasCallStack, MonadIO m, IsEditableLabel a) =>
a
-> m Bool
editableLabelGetEditing :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsEditableLabel a) =>
a -> m Bool
editableLabelGetEditing 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 EditableLabel
self' <- a -> IO (Ptr EditableLabel)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr EditableLabel -> IO CInt
gtk_editable_label_get_editing Ptr EditableLabel
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 EditableLabelGetEditingMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsEditableLabel a) => O.OverloadedMethod EditableLabelGetEditingMethodInfo a signature where
overloadedMethod = editableLabelGetEditing
instance O.OverloadedMethodInfo EditableLabelGetEditingMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.EditableLabel.editableLabelGetEditing",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.8/docs/GI-Gtk-Objects-EditableLabel.html#v:editableLabelGetEditing"
})
#endif
foreign import ccall "gtk_editable_label_start_editing" gtk_editable_label_start_editing ::
Ptr EditableLabel ->
IO ()
editableLabelStartEditing ::
(B.CallStack.HasCallStack, MonadIO m, IsEditableLabel a) =>
a
-> m ()
editableLabelStartEditing :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsEditableLabel a) =>
a -> m ()
editableLabelStartEditing a
self = 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 EditableLabel
self' <- a -> IO (Ptr EditableLabel)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr EditableLabel -> IO ()
gtk_editable_label_start_editing Ptr EditableLabel
self'
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 EditableLabelStartEditingMethodInfo
instance (signature ~ (m ()), MonadIO m, IsEditableLabel a) => O.OverloadedMethod EditableLabelStartEditingMethodInfo a signature where
overloadedMethod = editableLabelStartEditing
instance O.OverloadedMethodInfo EditableLabelStartEditingMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.EditableLabel.editableLabelStartEditing",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.8/docs/GI-Gtk-Objects-EditableLabel.html#v:editableLabelStartEditing"
})
#endif
foreign import ccall "gtk_editable_label_stop_editing" gtk_editable_label_stop_editing ::
Ptr EditableLabel ->
CInt ->
IO ()
editableLabelStopEditing ::
(B.CallStack.HasCallStack, MonadIO m, IsEditableLabel a) =>
a
-> Bool
-> m ()
editableLabelStopEditing :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsEditableLabel a) =>
a -> Bool -> m ()
editableLabelStopEditing a
self Bool
commit = 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 EditableLabel
self' <- a -> IO (Ptr EditableLabel)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let commit' :: CInt
commit' = (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
commit
Ptr EditableLabel -> CInt -> IO ()
gtk_editable_label_stop_editing Ptr EditableLabel
self' CInt
commit'
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 EditableLabelStopEditingMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsEditableLabel a) => O.OverloadedMethod EditableLabelStopEditingMethodInfo a signature where
overloadedMethod = editableLabelStopEditing
instance O.OverloadedMethodInfo EditableLabelStopEditingMethodInfo a where
overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
O.resolvedSymbolName = "GI.Gtk.Objects.EditableLabel.editableLabelStopEditing",
O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.8/docs/GI-Gtk-Objects-EditableLabel.html#v:editableLabelStopEditing"
})
#endif