#define ENABLE_OVERLOADING (MIN_VERSION_haskell_gi_overloading(1,0,0) \
&& !defined(__HADDOCK_VERSION__))
module GI.Gtk.Objects.Entry
(
Entry(..) ,
IsEntry ,
toEntry ,
noEntry ,
#if ENABLE_OVERLOADING
EntryGetActivatesDefaultMethodInfo ,
#endif
entryGetActivatesDefault ,
#if ENABLE_OVERLOADING
EntryGetAlignmentMethodInfo ,
#endif
entryGetAlignment ,
#if ENABLE_OVERLOADING
EntryGetAttributesMethodInfo ,
#endif
entryGetAttributes ,
#if ENABLE_OVERLOADING
EntryGetBufferMethodInfo ,
#endif
entryGetBuffer ,
#if ENABLE_OVERLOADING
EntryGetCompletionMethodInfo ,
#endif
entryGetCompletion ,
#if ENABLE_OVERLOADING
EntryGetCurrentIconDragSourceMethodInfo ,
#endif
entryGetCurrentIconDragSource ,
#if ENABLE_OVERLOADING
EntryGetCursorHadjustmentMethodInfo ,
#endif
entryGetCursorHadjustment ,
#if ENABLE_OVERLOADING
EntryGetHasFrameMethodInfo ,
#endif
entryGetHasFrame ,
#if ENABLE_OVERLOADING
EntryGetIconActivatableMethodInfo ,
#endif
entryGetIconActivatable ,
#if ENABLE_OVERLOADING
EntryGetIconAreaMethodInfo ,
#endif
entryGetIconArea ,
#if ENABLE_OVERLOADING
EntryGetIconAtPosMethodInfo ,
#endif
entryGetIconAtPos ,
#if ENABLE_OVERLOADING
EntryGetIconGiconMethodInfo ,
#endif
entryGetIconGicon ,
#if ENABLE_OVERLOADING
EntryGetIconNameMethodInfo ,
#endif
entryGetIconName ,
#if ENABLE_OVERLOADING
EntryGetIconPixbufMethodInfo ,
#endif
entryGetIconPixbuf ,
#if ENABLE_OVERLOADING
EntryGetIconSensitiveMethodInfo ,
#endif
entryGetIconSensitive ,
#if ENABLE_OVERLOADING
EntryGetIconStockMethodInfo ,
#endif
entryGetIconStock ,
#if ENABLE_OVERLOADING
EntryGetIconStorageTypeMethodInfo ,
#endif
entryGetIconStorageType ,
#if ENABLE_OVERLOADING
EntryGetIconTooltipMarkupMethodInfo ,
#endif
entryGetIconTooltipMarkup ,
#if ENABLE_OVERLOADING
EntryGetIconTooltipTextMethodInfo ,
#endif
entryGetIconTooltipText ,
#if ENABLE_OVERLOADING
EntryGetInnerBorderMethodInfo ,
#endif
entryGetInnerBorder ,
#if ENABLE_OVERLOADING
EntryGetInputHintsMethodInfo ,
#endif
entryGetInputHints ,
#if ENABLE_OVERLOADING
EntryGetInputPurposeMethodInfo ,
#endif
entryGetInputPurpose ,
#if ENABLE_OVERLOADING
EntryGetInvisibleCharMethodInfo ,
#endif
entryGetInvisibleChar ,
#if ENABLE_OVERLOADING
EntryGetLayoutMethodInfo ,
#endif
entryGetLayout ,
#if ENABLE_OVERLOADING
EntryGetLayoutOffsetsMethodInfo ,
#endif
entryGetLayoutOffsets ,
#if ENABLE_OVERLOADING
EntryGetMaxLengthMethodInfo ,
#endif
entryGetMaxLength ,
#if ENABLE_OVERLOADING
EntryGetMaxWidthCharsMethodInfo ,
#endif
entryGetMaxWidthChars ,
#if ENABLE_OVERLOADING
EntryGetOverwriteModeMethodInfo ,
#endif
entryGetOverwriteMode ,
#if ENABLE_OVERLOADING
EntryGetPlaceholderTextMethodInfo ,
#endif
entryGetPlaceholderText ,
#if ENABLE_OVERLOADING
EntryGetProgressFractionMethodInfo ,
#endif
entryGetProgressFraction ,
#if ENABLE_OVERLOADING
EntryGetProgressPulseStepMethodInfo ,
#endif
entryGetProgressPulseStep ,
#if ENABLE_OVERLOADING
EntryGetTabsMethodInfo ,
#endif
entryGetTabs ,
#if ENABLE_OVERLOADING
EntryGetTextMethodInfo ,
#endif
entryGetText ,
#if ENABLE_OVERLOADING
EntryGetTextAreaMethodInfo ,
#endif
entryGetTextArea ,
#if ENABLE_OVERLOADING
EntryGetTextLengthMethodInfo ,
#endif
entryGetTextLength ,
#if ENABLE_OVERLOADING
EntryGetVisibilityMethodInfo ,
#endif
entryGetVisibility ,
#if ENABLE_OVERLOADING
EntryGetWidthCharsMethodInfo ,
#endif
entryGetWidthChars ,
#if ENABLE_OVERLOADING
EntryGrabFocusWithoutSelectingMethodInfo,
#endif
entryGrabFocusWithoutSelecting ,
#if ENABLE_OVERLOADING
EntryImContextFilterKeypressMethodInfo ,
#endif
entryImContextFilterKeypress ,
#if ENABLE_OVERLOADING
EntryLayoutIndexToTextIndexMethodInfo ,
#endif
entryLayoutIndexToTextIndex ,
entryNew ,
entryNewWithBuffer ,
#if ENABLE_OVERLOADING
EntryProgressPulseMethodInfo ,
#endif
entryProgressPulse ,
#if ENABLE_OVERLOADING
EntryResetImContextMethodInfo ,
#endif
entryResetImContext ,
#if ENABLE_OVERLOADING
EntrySetActivatesDefaultMethodInfo ,
#endif
entrySetActivatesDefault ,
#if ENABLE_OVERLOADING
EntrySetAlignmentMethodInfo ,
#endif
entrySetAlignment ,
#if ENABLE_OVERLOADING
EntrySetAttributesMethodInfo ,
#endif
entrySetAttributes ,
#if ENABLE_OVERLOADING
EntrySetBufferMethodInfo ,
#endif
entrySetBuffer ,
#if ENABLE_OVERLOADING
EntrySetCompletionMethodInfo ,
#endif
entrySetCompletion ,
#if ENABLE_OVERLOADING
EntrySetCursorHadjustmentMethodInfo ,
#endif
entrySetCursorHadjustment ,
#if ENABLE_OVERLOADING
EntrySetHasFrameMethodInfo ,
#endif
entrySetHasFrame ,
#if ENABLE_OVERLOADING
EntrySetIconActivatableMethodInfo ,
#endif
entrySetIconActivatable ,
#if ENABLE_OVERLOADING
EntrySetIconDragSourceMethodInfo ,
#endif
entrySetIconDragSource ,
#if ENABLE_OVERLOADING
EntrySetIconFromGiconMethodInfo ,
#endif
entrySetIconFromGicon ,
#if ENABLE_OVERLOADING
EntrySetIconFromIconNameMethodInfo ,
#endif
entrySetIconFromIconName ,
#if ENABLE_OVERLOADING
EntrySetIconFromPixbufMethodInfo ,
#endif
entrySetIconFromPixbuf ,
#if ENABLE_OVERLOADING
EntrySetIconFromStockMethodInfo ,
#endif
entrySetIconFromStock ,
#if ENABLE_OVERLOADING
EntrySetIconSensitiveMethodInfo ,
#endif
entrySetIconSensitive ,
#if ENABLE_OVERLOADING
EntrySetIconTooltipMarkupMethodInfo ,
#endif
entrySetIconTooltipMarkup ,
#if ENABLE_OVERLOADING
EntrySetIconTooltipTextMethodInfo ,
#endif
entrySetIconTooltipText ,
#if ENABLE_OVERLOADING
EntrySetInnerBorderMethodInfo ,
#endif
entrySetInnerBorder ,
#if ENABLE_OVERLOADING
EntrySetInputHintsMethodInfo ,
#endif
entrySetInputHints ,
#if ENABLE_OVERLOADING
EntrySetInputPurposeMethodInfo ,
#endif
entrySetInputPurpose ,
#if ENABLE_OVERLOADING
EntrySetInvisibleCharMethodInfo ,
#endif
entrySetInvisibleChar ,
#if ENABLE_OVERLOADING
EntrySetMaxLengthMethodInfo ,
#endif
entrySetMaxLength ,
#if ENABLE_OVERLOADING
EntrySetMaxWidthCharsMethodInfo ,
#endif
entrySetMaxWidthChars ,
#if ENABLE_OVERLOADING
EntrySetOverwriteModeMethodInfo ,
#endif
entrySetOverwriteMode ,
#if ENABLE_OVERLOADING
EntrySetPlaceholderTextMethodInfo ,
#endif
entrySetPlaceholderText ,
#if ENABLE_OVERLOADING
EntrySetProgressFractionMethodInfo ,
#endif
entrySetProgressFraction ,
#if ENABLE_OVERLOADING
EntrySetProgressPulseStepMethodInfo ,
#endif
entrySetProgressPulseStep ,
#if ENABLE_OVERLOADING
EntrySetTabsMethodInfo ,
#endif
entrySetTabs ,
#if ENABLE_OVERLOADING
EntrySetTextMethodInfo ,
#endif
entrySetText ,
#if ENABLE_OVERLOADING
EntrySetVisibilityMethodInfo ,
#endif
entrySetVisibility ,
#if ENABLE_OVERLOADING
EntrySetWidthCharsMethodInfo ,
#endif
entrySetWidthChars ,
#if ENABLE_OVERLOADING
EntryTextIndexToLayoutIndexMethodInfo ,
#endif
entryTextIndexToLayoutIndex ,
#if ENABLE_OVERLOADING
EntryUnsetInvisibleCharMethodInfo ,
#endif
entryUnsetInvisibleChar ,
#if ENABLE_OVERLOADING
EntryActivatesDefaultPropertyInfo ,
#endif
constructEntryActivatesDefault ,
#if ENABLE_OVERLOADING
entryActivatesDefault ,
#endif
getEntryActivatesDefault ,
setEntryActivatesDefault ,
#if ENABLE_OVERLOADING
EntryAttributesPropertyInfo ,
#endif
constructEntryAttributes ,
#if ENABLE_OVERLOADING
entryAttributes ,
#endif
getEntryAttributes ,
setEntryAttributes ,
#if ENABLE_OVERLOADING
EntryBufferPropertyInfo ,
#endif
constructEntryBuffer ,
#if ENABLE_OVERLOADING
entryBuffer ,
#endif
getEntryBuffer ,
setEntryBuffer ,
#if ENABLE_OVERLOADING
EntryCapsLockWarningPropertyInfo ,
#endif
constructEntryCapsLockWarning ,
#if ENABLE_OVERLOADING
entryCapsLockWarning ,
#endif
getEntryCapsLockWarning ,
setEntryCapsLockWarning ,
#if ENABLE_OVERLOADING
EntryCompletionPropertyInfo ,
#endif
clearEntryCompletion ,
constructEntryCompletion ,
#if ENABLE_OVERLOADING
entryCompletion ,
#endif
getEntryCompletion ,
setEntryCompletion ,
#if ENABLE_OVERLOADING
EntryCursorPositionPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
entryCursorPosition ,
#endif
getEntryCursorPosition ,
#if ENABLE_OVERLOADING
EntryEditablePropertyInfo ,
#endif
constructEntryEditable ,
#if ENABLE_OVERLOADING
entryEditable ,
#endif
getEntryEditable ,
setEntryEditable ,
#if ENABLE_OVERLOADING
EntryEnableEmojiCompletionPropertyInfo ,
#endif
constructEntryEnableEmojiCompletion ,
#if ENABLE_OVERLOADING
entryEnableEmojiCompletion ,
#endif
getEntryEnableEmojiCompletion ,
setEntryEnableEmojiCompletion ,
#if ENABLE_OVERLOADING
EntryHasFramePropertyInfo ,
#endif
constructEntryHasFrame ,
#if ENABLE_OVERLOADING
entryHasFrame ,
#endif
getEntryHasFrame ,
setEntryHasFrame ,
#if ENABLE_OVERLOADING
EntryImModulePropertyInfo ,
#endif
clearEntryImModule ,
constructEntryImModule ,
#if ENABLE_OVERLOADING
entryImModule ,
#endif
getEntryImModule ,
setEntryImModule ,
#if ENABLE_OVERLOADING
EntryInnerBorderPropertyInfo ,
#endif
clearEntryInnerBorder ,
constructEntryInnerBorder ,
#if ENABLE_OVERLOADING
entryInnerBorder ,
#endif
getEntryInnerBorder ,
setEntryInnerBorder ,
#if ENABLE_OVERLOADING
EntryInputHintsPropertyInfo ,
#endif
constructEntryInputHints ,
#if ENABLE_OVERLOADING
entryInputHints ,
#endif
getEntryInputHints ,
setEntryInputHints ,
#if ENABLE_OVERLOADING
EntryInputPurposePropertyInfo ,
#endif
constructEntryInputPurpose ,
#if ENABLE_OVERLOADING
entryInputPurpose ,
#endif
getEntryInputPurpose ,
setEntryInputPurpose ,
#if ENABLE_OVERLOADING
EntryInvisibleCharPropertyInfo ,
#endif
constructEntryInvisibleChar ,
#if ENABLE_OVERLOADING
entryInvisibleChar ,
#endif
getEntryInvisibleChar ,
setEntryInvisibleChar ,
#if ENABLE_OVERLOADING
EntryInvisibleCharSetPropertyInfo ,
#endif
constructEntryInvisibleCharSet ,
#if ENABLE_OVERLOADING
entryInvisibleCharSet ,
#endif
getEntryInvisibleCharSet ,
setEntryInvisibleCharSet ,
#if ENABLE_OVERLOADING
EntryMaxLengthPropertyInfo ,
#endif
constructEntryMaxLength ,
#if ENABLE_OVERLOADING
entryMaxLength ,
#endif
getEntryMaxLength ,
setEntryMaxLength ,
#if ENABLE_OVERLOADING
EntryMaxWidthCharsPropertyInfo ,
#endif
constructEntryMaxWidthChars ,
#if ENABLE_OVERLOADING
entryMaxWidthChars ,
#endif
getEntryMaxWidthChars ,
setEntryMaxWidthChars ,
#if ENABLE_OVERLOADING
EntryOverwriteModePropertyInfo ,
#endif
constructEntryOverwriteMode ,
#if ENABLE_OVERLOADING
entryOverwriteMode ,
#endif
getEntryOverwriteMode ,
setEntryOverwriteMode ,
#if ENABLE_OVERLOADING
EntryPlaceholderTextPropertyInfo ,
#endif
clearEntryPlaceholderText ,
constructEntryPlaceholderText ,
#if ENABLE_OVERLOADING
entryPlaceholderText ,
#endif
getEntryPlaceholderText ,
setEntryPlaceholderText ,
#if ENABLE_OVERLOADING
EntryPopulateAllPropertyInfo ,
#endif
constructEntryPopulateAll ,
#if ENABLE_OVERLOADING
entryPopulateAll ,
#endif
getEntryPopulateAll ,
setEntryPopulateAll ,
#if ENABLE_OVERLOADING
EntryPrimaryIconActivatablePropertyInfo ,
#endif
constructEntryPrimaryIconActivatable ,
#if ENABLE_OVERLOADING
entryPrimaryIconActivatable ,
#endif
getEntryPrimaryIconActivatable ,
setEntryPrimaryIconActivatable ,
#if ENABLE_OVERLOADING
EntryPrimaryIconGiconPropertyInfo ,
#endif
clearEntryPrimaryIconGicon ,
constructEntryPrimaryIconGicon ,
#if ENABLE_OVERLOADING
entryPrimaryIconGicon ,
#endif
getEntryPrimaryIconGicon ,
setEntryPrimaryIconGicon ,
#if ENABLE_OVERLOADING
EntryPrimaryIconNamePropertyInfo ,
#endif
clearEntryPrimaryIconName ,
constructEntryPrimaryIconName ,
#if ENABLE_OVERLOADING
entryPrimaryIconName ,
#endif
getEntryPrimaryIconName ,
setEntryPrimaryIconName ,
#if ENABLE_OVERLOADING
EntryPrimaryIconPixbufPropertyInfo ,
#endif
clearEntryPrimaryIconPixbuf ,
constructEntryPrimaryIconPixbuf ,
#if ENABLE_OVERLOADING
entryPrimaryIconPixbuf ,
#endif
getEntryPrimaryIconPixbuf ,
setEntryPrimaryIconPixbuf ,
#if ENABLE_OVERLOADING
EntryPrimaryIconSensitivePropertyInfo ,
#endif
constructEntryPrimaryIconSensitive ,
#if ENABLE_OVERLOADING
entryPrimaryIconSensitive ,
#endif
getEntryPrimaryIconSensitive ,
setEntryPrimaryIconSensitive ,
#if ENABLE_OVERLOADING
EntryPrimaryIconStockPropertyInfo ,
#endif
clearEntryPrimaryIconStock ,
constructEntryPrimaryIconStock ,
#if ENABLE_OVERLOADING
entryPrimaryIconStock ,
#endif
getEntryPrimaryIconStock ,
setEntryPrimaryIconStock ,
#if ENABLE_OVERLOADING
EntryPrimaryIconStorageTypePropertyInfo ,
#endif
#if ENABLE_OVERLOADING
entryPrimaryIconStorageType ,
#endif
getEntryPrimaryIconStorageType ,
#if ENABLE_OVERLOADING
EntryPrimaryIconTooltipMarkupPropertyInfo,
#endif
clearEntryPrimaryIconTooltipMarkup ,
constructEntryPrimaryIconTooltipMarkup ,
#if ENABLE_OVERLOADING
entryPrimaryIconTooltipMarkup ,
#endif
getEntryPrimaryIconTooltipMarkup ,
setEntryPrimaryIconTooltipMarkup ,
#if ENABLE_OVERLOADING
EntryPrimaryIconTooltipTextPropertyInfo ,
#endif
clearEntryPrimaryIconTooltipText ,
constructEntryPrimaryIconTooltipText ,
#if ENABLE_OVERLOADING
entryPrimaryIconTooltipText ,
#endif
getEntryPrimaryIconTooltipText ,
setEntryPrimaryIconTooltipText ,
#if ENABLE_OVERLOADING
EntryProgressFractionPropertyInfo ,
#endif
constructEntryProgressFraction ,
#if ENABLE_OVERLOADING
entryProgressFraction ,
#endif
getEntryProgressFraction ,
setEntryProgressFraction ,
#if ENABLE_OVERLOADING
EntryProgressPulseStepPropertyInfo ,
#endif
constructEntryProgressPulseStep ,
#if ENABLE_OVERLOADING
entryProgressPulseStep ,
#endif
getEntryProgressPulseStep ,
setEntryProgressPulseStep ,
#if ENABLE_OVERLOADING
EntryScrollOffsetPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
entryScrollOffset ,
#endif
getEntryScrollOffset ,
#if ENABLE_OVERLOADING
EntrySecondaryIconActivatablePropertyInfo,
#endif
constructEntrySecondaryIconActivatable ,
#if ENABLE_OVERLOADING
entrySecondaryIconActivatable ,
#endif
getEntrySecondaryIconActivatable ,
setEntrySecondaryIconActivatable ,
#if ENABLE_OVERLOADING
EntrySecondaryIconGiconPropertyInfo ,
#endif
clearEntrySecondaryIconGicon ,
constructEntrySecondaryIconGicon ,
#if ENABLE_OVERLOADING
entrySecondaryIconGicon ,
#endif
getEntrySecondaryIconGicon ,
setEntrySecondaryIconGicon ,
#if ENABLE_OVERLOADING
EntrySecondaryIconNamePropertyInfo ,
#endif
clearEntrySecondaryIconName ,
constructEntrySecondaryIconName ,
#if ENABLE_OVERLOADING
entrySecondaryIconName ,
#endif
getEntrySecondaryIconName ,
setEntrySecondaryIconName ,
#if ENABLE_OVERLOADING
EntrySecondaryIconPixbufPropertyInfo ,
#endif
clearEntrySecondaryIconPixbuf ,
constructEntrySecondaryIconPixbuf ,
#if ENABLE_OVERLOADING
entrySecondaryIconPixbuf ,
#endif
getEntrySecondaryIconPixbuf ,
setEntrySecondaryIconPixbuf ,
#if ENABLE_OVERLOADING
EntrySecondaryIconSensitivePropertyInfo ,
#endif
constructEntrySecondaryIconSensitive ,
#if ENABLE_OVERLOADING
entrySecondaryIconSensitive ,
#endif
getEntrySecondaryIconSensitive ,
setEntrySecondaryIconSensitive ,
#if ENABLE_OVERLOADING
EntrySecondaryIconStockPropertyInfo ,
#endif
clearEntrySecondaryIconStock ,
constructEntrySecondaryIconStock ,
#if ENABLE_OVERLOADING
entrySecondaryIconStock ,
#endif
getEntrySecondaryIconStock ,
setEntrySecondaryIconStock ,
#if ENABLE_OVERLOADING
EntrySecondaryIconStorageTypePropertyInfo,
#endif
#if ENABLE_OVERLOADING
entrySecondaryIconStorageType ,
#endif
getEntrySecondaryIconStorageType ,
#if ENABLE_OVERLOADING
EntrySecondaryIconTooltipMarkupPropertyInfo,
#endif
clearEntrySecondaryIconTooltipMarkup ,
constructEntrySecondaryIconTooltipMarkup,
#if ENABLE_OVERLOADING
entrySecondaryIconTooltipMarkup ,
#endif
getEntrySecondaryIconTooltipMarkup ,
setEntrySecondaryIconTooltipMarkup ,
#if ENABLE_OVERLOADING
EntrySecondaryIconTooltipTextPropertyInfo,
#endif
clearEntrySecondaryIconTooltipText ,
constructEntrySecondaryIconTooltipText ,
#if ENABLE_OVERLOADING
entrySecondaryIconTooltipText ,
#endif
getEntrySecondaryIconTooltipText ,
setEntrySecondaryIconTooltipText ,
#if ENABLE_OVERLOADING
EntrySelectionBoundPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
entrySelectionBound ,
#endif
getEntrySelectionBound ,
#if ENABLE_OVERLOADING
EntryShadowTypePropertyInfo ,
#endif
constructEntryShadowType ,
#if ENABLE_OVERLOADING
entryShadowType ,
#endif
getEntryShadowType ,
setEntryShadowType ,
#if ENABLE_OVERLOADING
EntryShowEmojiIconPropertyInfo ,
#endif
constructEntryShowEmojiIcon ,
#if ENABLE_OVERLOADING
entryShowEmojiIcon ,
#endif
getEntryShowEmojiIcon ,
setEntryShowEmojiIcon ,
#if ENABLE_OVERLOADING
EntryTabsPropertyInfo ,
#endif
constructEntryTabs ,
#if ENABLE_OVERLOADING
entryTabs ,
#endif
getEntryTabs ,
setEntryTabs ,
#if ENABLE_OVERLOADING
EntryTextPropertyInfo ,
#endif
constructEntryText ,
#if ENABLE_OVERLOADING
entryText ,
#endif
getEntryText ,
setEntryText ,
#if ENABLE_OVERLOADING
EntryTextLengthPropertyInfo ,
#endif
#if ENABLE_OVERLOADING
entryTextLength ,
#endif
getEntryTextLength ,
#if ENABLE_OVERLOADING
EntryTruncateMultilinePropertyInfo ,
#endif
constructEntryTruncateMultiline ,
#if ENABLE_OVERLOADING
entryTruncateMultiline ,
#endif
getEntryTruncateMultiline ,
setEntryTruncateMultiline ,
#if ENABLE_OVERLOADING
EntryVisibilityPropertyInfo ,
#endif
constructEntryVisibility ,
#if ENABLE_OVERLOADING
entryVisibility ,
#endif
getEntryVisibility ,
setEntryVisibility ,
#if ENABLE_OVERLOADING
EntryWidthCharsPropertyInfo ,
#endif
constructEntryWidthChars ,
#if ENABLE_OVERLOADING
entryWidthChars ,
#endif
getEntryWidthChars ,
setEntryWidthChars ,
#if ENABLE_OVERLOADING
EntryXalignPropertyInfo ,
#endif
constructEntryXalign ,
#if ENABLE_OVERLOADING
entryXalign ,
#endif
getEntryXalign ,
setEntryXalign ,
C_EntryActivateCallback ,
EntryActivateCallback ,
#if ENABLE_OVERLOADING
EntryActivateSignalInfo ,
#endif
afterEntryActivate ,
genClosure_EntryActivate ,
mk_EntryActivateCallback ,
noEntryActivateCallback ,
onEntryActivate ,
wrap_EntryActivateCallback ,
C_EntryBackspaceCallback ,
EntryBackspaceCallback ,
#if ENABLE_OVERLOADING
EntryBackspaceSignalInfo ,
#endif
afterEntryBackspace ,
genClosure_EntryBackspace ,
mk_EntryBackspaceCallback ,
noEntryBackspaceCallback ,
onEntryBackspace ,
wrap_EntryBackspaceCallback ,
C_EntryCopyClipboardCallback ,
EntryCopyClipboardCallback ,
#if ENABLE_OVERLOADING
EntryCopyClipboardSignalInfo ,
#endif
afterEntryCopyClipboard ,
genClosure_EntryCopyClipboard ,
mk_EntryCopyClipboardCallback ,
noEntryCopyClipboardCallback ,
onEntryCopyClipboard ,
wrap_EntryCopyClipboardCallback ,
C_EntryCutClipboardCallback ,
EntryCutClipboardCallback ,
#if ENABLE_OVERLOADING
EntryCutClipboardSignalInfo ,
#endif
afterEntryCutClipboard ,
genClosure_EntryCutClipboard ,
mk_EntryCutClipboardCallback ,
noEntryCutClipboardCallback ,
onEntryCutClipboard ,
wrap_EntryCutClipboardCallback ,
C_EntryDeleteFromCursorCallback ,
EntryDeleteFromCursorCallback ,
#if ENABLE_OVERLOADING
EntryDeleteFromCursorSignalInfo ,
#endif
afterEntryDeleteFromCursor ,
genClosure_EntryDeleteFromCursor ,
mk_EntryDeleteFromCursorCallback ,
noEntryDeleteFromCursorCallback ,
onEntryDeleteFromCursor ,
wrap_EntryDeleteFromCursorCallback ,
C_EntryIconPressCallback ,
EntryIconPressCallback ,
#if ENABLE_OVERLOADING
EntryIconPressSignalInfo ,
#endif
afterEntryIconPress ,
genClosure_EntryIconPress ,
mk_EntryIconPressCallback ,
noEntryIconPressCallback ,
onEntryIconPress ,
wrap_EntryIconPressCallback ,
C_EntryIconReleaseCallback ,
EntryIconReleaseCallback ,
#if ENABLE_OVERLOADING
EntryIconReleaseSignalInfo ,
#endif
afterEntryIconRelease ,
genClosure_EntryIconRelease ,
mk_EntryIconReleaseCallback ,
noEntryIconReleaseCallback ,
onEntryIconRelease ,
wrap_EntryIconReleaseCallback ,
C_EntryInsertAtCursorCallback ,
EntryInsertAtCursorCallback ,
#if ENABLE_OVERLOADING
EntryInsertAtCursorSignalInfo ,
#endif
afterEntryInsertAtCursor ,
genClosure_EntryInsertAtCursor ,
mk_EntryInsertAtCursorCallback ,
noEntryInsertAtCursorCallback ,
onEntryInsertAtCursor ,
wrap_EntryInsertAtCursorCallback ,
C_EntryInsertEmojiCallback ,
EntryInsertEmojiCallback ,
#if ENABLE_OVERLOADING
EntryInsertEmojiSignalInfo ,
#endif
afterEntryInsertEmoji ,
genClosure_EntryInsertEmoji ,
mk_EntryInsertEmojiCallback ,
noEntryInsertEmojiCallback ,
onEntryInsertEmoji ,
wrap_EntryInsertEmojiCallback ,
C_EntryMoveCursorCallback ,
EntryMoveCursorCallback ,
#if ENABLE_OVERLOADING
EntryMoveCursorSignalInfo ,
#endif
afterEntryMoveCursor ,
genClosure_EntryMoveCursor ,
mk_EntryMoveCursorCallback ,
noEntryMoveCursorCallback ,
onEntryMoveCursor ,
wrap_EntryMoveCursorCallback ,
C_EntryPasteClipboardCallback ,
EntryPasteClipboardCallback ,
#if ENABLE_OVERLOADING
EntryPasteClipboardSignalInfo ,
#endif
afterEntryPasteClipboard ,
genClosure_EntryPasteClipboard ,
mk_EntryPasteClipboardCallback ,
noEntryPasteClipboardCallback ,
onEntryPasteClipboard ,
wrap_EntryPasteClipboardCallback ,
C_EntryPopulatePopupCallback ,
EntryPopulatePopupCallback ,
#if ENABLE_OVERLOADING
EntryPopulatePopupSignalInfo ,
#endif
afterEntryPopulatePopup ,
genClosure_EntryPopulatePopup ,
mk_EntryPopulatePopupCallback ,
noEntryPopulatePopupCallback ,
onEntryPopulatePopup ,
wrap_EntryPopulatePopupCallback ,
C_EntryPreeditChangedCallback ,
EntryPreeditChangedCallback ,
#if ENABLE_OVERLOADING
EntryPreeditChangedSignalInfo ,
#endif
afterEntryPreeditChanged ,
genClosure_EntryPreeditChanged ,
mk_EntryPreeditChangedCallback ,
noEntryPreeditChangedCallback ,
onEntryPreeditChanged ,
wrap_EntryPreeditChangedCallback ,
C_EntryToggleOverwriteCallback ,
EntryToggleOverwriteCallback ,
#if ENABLE_OVERLOADING
EntryToggleOverwriteSignalInfo ,
#endif
afterEntryToggleOverwrite ,
genClosure_EntryToggleOverwrite ,
mk_EntryToggleOverwriteCallback ,
noEntryToggleOverwriteCallback ,
onEntryToggleOverwrite ,
wrap_EntryToggleOverwriteCallback ,
) 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.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gdk.Flags as Gdk.Flags
import qualified GI.Gdk.Structs.EventButton as Gdk.EventButton
import qualified GI.Gdk.Structs.EventKey as Gdk.EventKey
import qualified GI.Gdk.Structs.Rectangle as Gdk.Rectangle
import qualified GI.GdkPixbuf.Objects.Pixbuf as GdkPixbuf.Pixbuf
import qualified GI.Gio.Interfaces.Icon as Gio.Icon
import {-# SOURCE #-} qualified GI.Gtk.Enums as Gtk.Enums
import {-# SOURCE #-} qualified GI.Gtk.Flags as Gtk.Flags
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.CellEditable as Gtk.CellEditable
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Editable as Gtk.Editable
import {-# SOURCE #-} qualified GI.Gtk.Objects.Adjustment as Gtk.Adjustment
import {-# SOURCE #-} qualified GI.Gtk.Objects.EntryBuffer as Gtk.EntryBuffer
import {-# SOURCE #-} qualified GI.Gtk.Objects.EntryCompletion as Gtk.EntryCompletion
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
import {-# SOURCE #-} qualified GI.Gtk.Structs.Border as Gtk.Border
import {-# SOURCE #-} qualified GI.Gtk.Structs.TargetList as Gtk.TargetList
import qualified GI.Pango.Objects.Layout as Pango.Layout
import qualified GI.Pango.Structs.AttrList as Pango.AttrList
import qualified GI.Pango.Structs.TabArray as Pango.TabArray
newtype Entry = Entry (ManagedPtr Entry)
foreign import ccall "gtk_entry_get_type"
c_gtk_entry_get_type :: IO GType
instance GObject Entry where
gobjectType _ = c_gtk_entry_get_type
class GObject o => IsEntry o
#if MIN_VERSION_base(4,9,0)
instance {-# OVERLAPPABLE #-} (GObject a, O.UnknownAncestorError Entry a) =>
IsEntry a
#endif
instance IsEntry Entry
instance Gtk.Widget.IsWidget Entry
instance GObject.Object.IsObject Entry
instance Atk.ImplementorIface.IsImplementorIface Entry
instance Gtk.Buildable.IsBuildable Entry
instance Gtk.CellEditable.IsCellEditable Entry
instance Gtk.Editable.IsEditable Entry
toEntry :: (MonadIO m, IsEntry o) => o -> m Entry
toEntry = liftIO . unsafeCastTo Entry
noEntry :: Maybe Entry
noEntry = Nothing
#if ENABLE_OVERLOADING
type family ResolveEntryMethod (t :: Symbol) (o :: *) :: * where
ResolveEntryMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveEntryMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolveEntryMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveEntryMethod "addDeviceEvents" o = Gtk.Widget.WidgetAddDeviceEventsMethodInfo
ResolveEntryMethod "addEvents" o = Gtk.Widget.WidgetAddEventsMethodInfo
ResolveEntryMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveEntryMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveEntryMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveEntryMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveEntryMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolveEntryMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveEntryMethod "childNotify" o = Gtk.Widget.WidgetChildNotifyMethodInfo
ResolveEntryMethod "classPath" o = Gtk.Widget.WidgetClassPathMethodInfo
ResolveEntryMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveEntryMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveEntryMethod "copyClipboard" o = Gtk.Editable.EditableCopyClipboardMethodInfo
ResolveEntryMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveEntryMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveEntryMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveEntryMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveEntryMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveEntryMethod "cutClipboard" o = Gtk.Editable.EditableCutClipboardMethodInfo
ResolveEntryMethod "deleteSelection" o = Gtk.Editable.EditableDeleteSelectionMethodInfo
ResolveEntryMethod "deleteText" o = Gtk.Editable.EditableDeleteTextMethodInfo
ResolveEntryMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolveEntryMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolveEntryMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveEntryMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolveEntryMethod "dragBeginWithCoordinates" o = Gtk.Widget.WidgetDragBeginWithCoordinatesMethodInfo
ResolveEntryMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveEntryMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolveEntryMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolveEntryMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolveEntryMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolveEntryMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolveEntryMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolveEntryMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolveEntryMethod "dragDestSetProxy" o = Gtk.Widget.WidgetDragDestSetProxyMethodInfo
ResolveEntryMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolveEntryMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolveEntryMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolveEntryMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolveEntryMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolveEntryMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolveEntryMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolveEntryMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolveEntryMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolveEntryMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolveEntryMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolveEntryMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolveEntryMethod "dragSourceSetIconPixbuf" o = Gtk.Widget.WidgetDragSourceSetIconPixbufMethodInfo
ResolveEntryMethod "dragSourceSetIconStock" o = Gtk.Widget.WidgetDragSourceSetIconStockMethodInfo
ResolveEntryMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolveEntryMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolveEntryMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolveEntryMethod "draw" o = Gtk.Widget.WidgetDrawMethodInfo
ResolveEntryMethod "editingDone" o = Gtk.CellEditable.CellEditableEditingDoneMethodInfo
ResolveEntryMethod "ensureStyle" o = Gtk.Widget.WidgetEnsureStyleMethodInfo
ResolveEntryMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveEntryMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolveEntryMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveEntryMethod "freezeChildNotify" o = Gtk.Widget.WidgetFreezeChildNotifyMethodInfo
ResolveEntryMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveEntryMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveEntryMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolveEntryMethod "grabDefault" o = Gtk.Widget.WidgetGrabDefaultMethodInfo
ResolveEntryMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveEntryMethod "grabFocusWithoutSelecting" o = EntryGrabFocusWithoutSelectingMethodInfo
ResolveEntryMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolveEntryMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveEntryMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveEntryMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolveEntryMethod "hasRcStyle" o = Gtk.Widget.WidgetHasRcStyleMethodInfo
ResolveEntryMethod "hasScreen" o = Gtk.Widget.WidgetHasScreenMethodInfo
ResolveEntryMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveEntryMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveEntryMethod "hideOnDelete" o = Gtk.Widget.WidgetHideOnDeleteMethodInfo
ResolveEntryMethod "imContextFilterKeypress" o = EntryImContextFilterKeypressMethodInfo
ResolveEntryMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveEntryMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveEntryMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolveEntryMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveEntryMethod "insertText" o = Gtk.Editable.EditableInsertTextMethodInfo
ResolveEntryMethod "intersect" o = Gtk.Widget.WidgetIntersectMethodInfo
ResolveEntryMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveEntryMethod "isComposited" o = Gtk.Widget.WidgetIsCompositedMethodInfo
ResolveEntryMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveEntryMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveEntryMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveEntryMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveEntryMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolveEntryMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveEntryMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveEntryMethod "layoutIndexToTextIndex" o = EntryLayoutIndexToTextIndexMethodInfo
ResolveEntryMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolveEntryMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolveEntryMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveEntryMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveEntryMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveEntryMethod "modifyBase" o = Gtk.Widget.WidgetModifyBaseMethodInfo
ResolveEntryMethod "modifyBg" o = Gtk.Widget.WidgetModifyBgMethodInfo
ResolveEntryMethod "modifyCursor" o = Gtk.Widget.WidgetModifyCursorMethodInfo
ResolveEntryMethod "modifyFg" o = Gtk.Widget.WidgetModifyFgMethodInfo
ResolveEntryMethod "modifyFont" o = Gtk.Widget.WidgetModifyFontMethodInfo
ResolveEntryMethod "modifyStyle" o = Gtk.Widget.WidgetModifyStyleMethodInfo
ResolveEntryMethod "modifyText" o = Gtk.Widget.WidgetModifyTextMethodInfo
ResolveEntryMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveEntryMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveEntryMethod "overrideBackgroundColor" o = Gtk.Widget.WidgetOverrideBackgroundColorMethodInfo
ResolveEntryMethod "overrideColor" o = Gtk.Widget.WidgetOverrideColorMethodInfo
ResolveEntryMethod "overrideCursor" o = Gtk.Widget.WidgetOverrideCursorMethodInfo
ResolveEntryMethod "overrideFont" o = Gtk.Widget.WidgetOverrideFontMethodInfo
ResolveEntryMethod "overrideSymbolicColor" o = Gtk.Widget.WidgetOverrideSymbolicColorMethodInfo
ResolveEntryMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveEntryMethod "pasteClipboard" o = Gtk.Editable.EditablePasteClipboardMethodInfo
ResolveEntryMethod "path" o = Gtk.Widget.WidgetPathMethodInfo
ResolveEntryMethod "progressPulse" o = EntryProgressPulseMethodInfo
ResolveEntryMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveEntryMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolveEntryMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveEntryMethod "queueDrawArea" o = Gtk.Widget.WidgetQueueDrawAreaMethodInfo
ResolveEntryMethod "queueDrawRegion" o = Gtk.Widget.WidgetQueueDrawRegionMethodInfo
ResolveEntryMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveEntryMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolveEntryMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveEntryMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveEntryMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveEntryMethod "regionIntersect" o = Gtk.Widget.WidgetRegionIntersectMethodInfo
ResolveEntryMethod "registerWindow" o = Gtk.Widget.WidgetRegisterWindowMethodInfo
ResolveEntryMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolveEntryMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveEntryMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveEntryMethod "removeWidget" o = Gtk.CellEditable.CellEditableRemoveWidgetMethodInfo
ResolveEntryMethod "renderIcon" o = Gtk.Widget.WidgetRenderIconMethodInfo
ResolveEntryMethod "renderIconPixbuf" o = Gtk.Widget.WidgetRenderIconPixbufMethodInfo
ResolveEntryMethod "reparent" o = Gtk.Widget.WidgetReparentMethodInfo
ResolveEntryMethod "resetImContext" o = EntryResetImContextMethodInfo
ResolveEntryMethod "resetRcStyles" o = Gtk.Widget.WidgetResetRcStylesMethodInfo
ResolveEntryMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolveEntryMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveEntryMethod "selectRegion" o = Gtk.Editable.EditableSelectRegionMethodInfo
ResolveEntryMethod "sendExpose" o = Gtk.Widget.WidgetSendExposeMethodInfo
ResolveEntryMethod "sendFocusChange" o = Gtk.Widget.WidgetSendFocusChangeMethodInfo
ResolveEntryMethod "shapeCombineRegion" o = Gtk.Widget.WidgetShapeCombineRegionMethodInfo
ResolveEntryMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveEntryMethod "showAll" o = Gtk.Widget.WidgetShowAllMethodInfo
ResolveEntryMethod "showNow" o = Gtk.Widget.WidgetShowNowMethodInfo
ResolveEntryMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveEntryMethod "sizeAllocateWithBaseline" o = Gtk.Widget.WidgetSizeAllocateWithBaselineMethodInfo
ResolveEntryMethod "sizeRequest" o = Gtk.Widget.WidgetSizeRequestMethodInfo
ResolveEntryMethod "startEditing" o = Gtk.CellEditable.CellEditableStartEditingMethodInfo
ResolveEntryMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveEntryMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveEntryMethod "styleAttach" o = Gtk.Widget.WidgetStyleAttachMethodInfo
ResolveEntryMethod "styleGetProperty" o = Gtk.Widget.WidgetStyleGetPropertyMethodInfo
ResolveEntryMethod "textIndexToLayoutIndex" o = EntryTextIndexToLayoutIndexMethodInfo
ResolveEntryMethod "thawChildNotify" o = Gtk.Widget.WidgetThawChildNotifyMethodInfo
ResolveEntryMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveEntryMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveEntryMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveEntryMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveEntryMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveEntryMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveEntryMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveEntryMethod "unregisterWindow" o = Gtk.Widget.WidgetUnregisterWindowMethodInfo
ResolveEntryMethod "unsetInvisibleChar" o = EntryUnsetInvisibleCharMethodInfo
ResolveEntryMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveEntryMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveEntryMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveEntryMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolveEntryMethod "getActivatesDefault" o = EntryGetActivatesDefaultMethodInfo
ResolveEntryMethod "getAlignment" o = EntryGetAlignmentMethodInfo
ResolveEntryMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveEntryMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveEntryMethod "getAllocatedSize" o = Gtk.Widget.WidgetGetAllocatedSizeMethodInfo
ResolveEntryMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveEntryMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveEntryMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveEntryMethod "getAppPaintable" o = Gtk.Widget.WidgetGetAppPaintableMethodInfo
ResolveEntryMethod "getAttributes" o = EntryGetAttributesMethodInfo
ResolveEntryMethod "getBuffer" o = EntryGetBufferMethodInfo
ResolveEntryMethod "getCanDefault" o = Gtk.Widget.WidgetGetCanDefaultMethodInfo
ResolveEntryMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveEntryMethod "getChars" o = Gtk.Editable.EditableGetCharsMethodInfo
ResolveEntryMethod "getChildRequisition" o = Gtk.Widget.WidgetGetChildRequisitionMethodInfo
ResolveEntryMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveEntryMethod "getClip" o = Gtk.Widget.WidgetGetClipMethodInfo
ResolveEntryMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveEntryMethod "getCompletion" o = EntryGetCompletionMethodInfo
ResolveEntryMethod "getCompositeName" o = Gtk.Widget.WidgetGetCompositeNameMethodInfo
ResolveEntryMethod "getCurrentIconDragSource" o = EntryGetCurrentIconDragSourceMethodInfo
ResolveEntryMethod "getCursorHadjustment" o = EntryGetCursorHadjustmentMethodInfo
ResolveEntryMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveEntryMethod "getDeviceEnabled" o = Gtk.Widget.WidgetGetDeviceEnabledMethodInfo
ResolveEntryMethod "getDeviceEvents" o = Gtk.Widget.WidgetGetDeviceEventsMethodInfo
ResolveEntryMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveEntryMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveEntryMethod "getDoubleBuffered" o = Gtk.Widget.WidgetGetDoubleBufferedMethodInfo
ResolveEntryMethod "getEditable" o = Gtk.Editable.EditableGetEditableMethodInfo
ResolveEntryMethod "getEvents" o = Gtk.Widget.WidgetGetEventsMethodInfo
ResolveEntryMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveEntryMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveEntryMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveEntryMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveEntryMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveEntryMethod "getHasFrame" o = EntryGetHasFrameMethodInfo
ResolveEntryMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveEntryMethod "getHasWindow" o = Gtk.Widget.WidgetGetHasWindowMethodInfo
ResolveEntryMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveEntryMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveEntryMethod "getIconActivatable" o = EntryGetIconActivatableMethodInfo
ResolveEntryMethod "getIconArea" o = EntryGetIconAreaMethodInfo
ResolveEntryMethod "getIconAtPos" o = EntryGetIconAtPosMethodInfo
ResolveEntryMethod "getIconGicon" o = EntryGetIconGiconMethodInfo
ResolveEntryMethod "getIconName" o = EntryGetIconNameMethodInfo
ResolveEntryMethod "getIconPixbuf" o = EntryGetIconPixbufMethodInfo
ResolveEntryMethod "getIconSensitive" o = EntryGetIconSensitiveMethodInfo
ResolveEntryMethod "getIconStock" o = EntryGetIconStockMethodInfo
ResolveEntryMethod "getIconStorageType" o = EntryGetIconStorageTypeMethodInfo
ResolveEntryMethod "getIconTooltipMarkup" o = EntryGetIconTooltipMarkupMethodInfo
ResolveEntryMethod "getIconTooltipText" o = EntryGetIconTooltipTextMethodInfo
ResolveEntryMethod "getInnerBorder" o = EntryGetInnerBorderMethodInfo
ResolveEntryMethod "getInputHints" o = EntryGetInputHintsMethodInfo
ResolveEntryMethod "getInputPurpose" o = EntryGetInputPurposeMethodInfo
ResolveEntryMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveEntryMethod "getInvisibleChar" o = EntryGetInvisibleCharMethodInfo
ResolveEntryMethod "getLayout" o = EntryGetLayoutMethodInfo
ResolveEntryMethod "getLayoutOffsets" o = EntryGetLayoutOffsetsMethodInfo
ResolveEntryMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveEntryMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveEntryMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveEntryMethod "getMarginLeft" o = Gtk.Widget.WidgetGetMarginLeftMethodInfo
ResolveEntryMethod "getMarginRight" o = Gtk.Widget.WidgetGetMarginRightMethodInfo
ResolveEntryMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveEntryMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveEntryMethod "getMaxLength" o = EntryGetMaxLengthMethodInfo
ResolveEntryMethod "getMaxWidthChars" o = EntryGetMaxWidthCharsMethodInfo
ResolveEntryMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolveEntryMethod "getModifierStyle" o = Gtk.Widget.WidgetGetModifierStyleMethodInfo
ResolveEntryMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveEntryMethod "getNoShowAll" o = Gtk.Widget.WidgetGetNoShowAllMethodInfo
ResolveEntryMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveEntryMethod "getOverwriteMode" o = EntryGetOverwriteModeMethodInfo
ResolveEntryMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveEntryMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveEntryMethod "getParentWindow" o = Gtk.Widget.WidgetGetParentWindowMethodInfo
ResolveEntryMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolveEntryMethod "getPlaceholderText" o = EntryGetPlaceholderTextMethodInfo
ResolveEntryMethod "getPointer" o = Gtk.Widget.WidgetGetPointerMethodInfo
ResolveEntryMethod "getPosition" o = Gtk.Editable.EditableGetPositionMethodInfo
ResolveEntryMethod "getPreferredHeight" o = Gtk.Widget.WidgetGetPreferredHeightMethodInfo
ResolveEntryMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.Widget.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo
ResolveEntryMethod "getPreferredHeightForWidth" o = Gtk.Widget.WidgetGetPreferredHeightForWidthMethodInfo
ResolveEntryMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveEntryMethod "getPreferredWidth" o = Gtk.Widget.WidgetGetPreferredWidthMethodInfo
ResolveEntryMethod "getPreferredWidthForHeight" o = Gtk.Widget.WidgetGetPreferredWidthForHeightMethodInfo
ResolveEntryMethod "getProgressFraction" o = EntryGetProgressFractionMethodInfo
ResolveEntryMethod "getProgressPulseStep" o = EntryGetProgressPulseStepMethodInfo
ResolveEntryMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveEntryMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveEntryMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveEntryMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveEntryMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveEntryMethod "getRequisition" o = Gtk.Widget.WidgetGetRequisitionMethodInfo
ResolveEntryMethod "getRootWindow" o = Gtk.Widget.WidgetGetRootWindowMethodInfo
ResolveEntryMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveEntryMethod "getScreen" o = Gtk.Widget.WidgetGetScreenMethodInfo
ResolveEntryMethod "getSelectionBounds" o = Gtk.Editable.EditableGetSelectionBoundsMethodInfo
ResolveEntryMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveEntryMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveEntryMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveEntryMethod "getState" o = Gtk.Widget.WidgetGetStateMethodInfo
ResolveEntryMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveEntryMethod "getStyle" o = Gtk.Widget.WidgetGetStyleMethodInfo
ResolveEntryMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveEntryMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveEntryMethod "getTabs" o = EntryGetTabsMethodInfo
ResolveEntryMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveEntryMethod "getText" o = EntryGetTextMethodInfo
ResolveEntryMethod "getTextArea" o = EntryGetTextAreaMethodInfo
ResolveEntryMethod "getTextLength" o = EntryGetTextLengthMethodInfo
ResolveEntryMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveEntryMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveEntryMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolveEntryMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolveEntryMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveEntryMethod "getValignWithBaseline" o = Gtk.Widget.WidgetGetValignWithBaselineMethodInfo
ResolveEntryMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveEntryMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveEntryMethod "getVisibility" o = EntryGetVisibilityMethodInfo
ResolveEntryMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveEntryMethod "getVisual" o = Gtk.Widget.WidgetGetVisualMethodInfo
ResolveEntryMethod "getWidthChars" o = EntryGetWidthCharsMethodInfo
ResolveEntryMethod "getWindow" o = Gtk.Widget.WidgetGetWindowMethodInfo
ResolveEntryMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolveEntryMethod "setActivatesDefault" o = EntrySetActivatesDefaultMethodInfo
ResolveEntryMethod "setAlignment" o = EntrySetAlignmentMethodInfo
ResolveEntryMethod "setAllocation" o = Gtk.Widget.WidgetSetAllocationMethodInfo
ResolveEntryMethod "setAppPaintable" o = Gtk.Widget.WidgetSetAppPaintableMethodInfo
ResolveEntryMethod "setAttributes" o = EntrySetAttributesMethodInfo
ResolveEntryMethod "setBuffer" o = EntrySetBufferMethodInfo
ResolveEntryMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveEntryMethod "setCanDefault" o = Gtk.Widget.WidgetSetCanDefaultMethodInfo
ResolveEntryMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveEntryMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveEntryMethod "setClip" o = Gtk.Widget.WidgetSetClipMethodInfo
ResolveEntryMethod "setCompletion" o = EntrySetCompletionMethodInfo
ResolveEntryMethod "setCompositeName" o = Gtk.Widget.WidgetSetCompositeNameMethodInfo
ResolveEntryMethod "setCursorHadjustment" o = EntrySetCursorHadjustmentMethodInfo
ResolveEntryMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveEntryMethod "setDeviceEnabled" o = Gtk.Widget.WidgetSetDeviceEnabledMethodInfo
ResolveEntryMethod "setDeviceEvents" o = Gtk.Widget.WidgetSetDeviceEventsMethodInfo
ResolveEntryMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveEntryMethod "setDoubleBuffered" o = Gtk.Widget.WidgetSetDoubleBufferedMethodInfo
ResolveEntryMethod "setEditable" o = Gtk.Editable.EditableSetEditableMethodInfo
ResolveEntryMethod "setEvents" o = Gtk.Widget.WidgetSetEventsMethodInfo
ResolveEntryMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveEntryMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveEntryMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveEntryMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveEntryMethod "setHasFrame" o = EntrySetHasFrameMethodInfo
ResolveEntryMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveEntryMethod "setHasWindow" o = Gtk.Widget.WidgetSetHasWindowMethodInfo
ResolveEntryMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveEntryMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveEntryMethod "setIconActivatable" o = EntrySetIconActivatableMethodInfo
ResolveEntryMethod "setIconDragSource" o = EntrySetIconDragSourceMethodInfo
ResolveEntryMethod "setIconFromGicon" o = EntrySetIconFromGiconMethodInfo
ResolveEntryMethod "setIconFromIconName" o = EntrySetIconFromIconNameMethodInfo
ResolveEntryMethod "setIconFromPixbuf" o = EntrySetIconFromPixbufMethodInfo
ResolveEntryMethod "setIconFromStock" o = EntrySetIconFromStockMethodInfo
ResolveEntryMethod "setIconSensitive" o = EntrySetIconSensitiveMethodInfo
ResolveEntryMethod "setIconTooltipMarkup" o = EntrySetIconTooltipMarkupMethodInfo
ResolveEntryMethod "setIconTooltipText" o = EntrySetIconTooltipTextMethodInfo
ResolveEntryMethod "setInnerBorder" o = EntrySetInnerBorderMethodInfo
ResolveEntryMethod "setInputHints" o = EntrySetInputHintsMethodInfo
ResolveEntryMethod "setInputPurpose" o = EntrySetInputPurposeMethodInfo
ResolveEntryMethod "setInvisibleChar" o = EntrySetInvisibleCharMethodInfo
ResolveEntryMethod "setMapped" o = Gtk.Widget.WidgetSetMappedMethodInfo
ResolveEntryMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveEntryMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveEntryMethod "setMarginLeft" o = Gtk.Widget.WidgetSetMarginLeftMethodInfo
ResolveEntryMethod "setMarginRight" o = Gtk.Widget.WidgetSetMarginRightMethodInfo
ResolveEntryMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveEntryMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveEntryMethod "setMaxLength" o = EntrySetMaxLengthMethodInfo
ResolveEntryMethod "setMaxWidthChars" o = EntrySetMaxWidthCharsMethodInfo
ResolveEntryMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveEntryMethod "setNoShowAll" o = Gtk.Widget.WidgetSetNoShowAllMethodInfo
ResolveEntryMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveEntryMethod "setOverwriteMode" o = EntrySetOverwriteModeMethodInfo
ResolveEntryMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveEntryMethod "setParentWindow" o = Gtk.Widget.WidgetSetParentWindowMethodInfo
ResolveEntryMethod "setPlaceholderText" o = EntrySetPlaceholderTextMethodInfo
ResolveEntryMethod "setPosition" o = Gtk.Editable.EditableSetPositionMethodInfo
ResolveEntryMethod "setProgressFraction" o = EntrySetProgressFractionMethodInfo
ResolveEntryMethod "setProgressPulseStep" o = EntrySetProgressPulseStepMethodInfo
ResolveEntryMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveEntryMethod "setRealized" o = Gtk.Widget.WidgetSetRealizedMethodInfo
ResolveEntryMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveEntryMethod "setRedrawOnAllocate" o = Gtk.Widget.WidgetSetRedrawOnAllocateMethodInfo
ResolveEntryMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveEntryMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveEntryMethod "setState" o = Gtk.Widget.WidgetSetStateMethodInfo
ResolveEntryMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveEntryMethod "setStyle" o = Gtk.Widget.WidgetSetStyleMethodInfo
ResolveEntryMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveEntryMethod "setTabs" o = EntrySetTabsMethodInfo
ResolveEntryMethod "setText" o = EntrySetTextMethodInfo
ResolveEntryMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveEntryMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveEntryMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolveEntryMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveEntryMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveEntryMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveEntryMethod "setVisibility" o = EntrySetVisibilityMethodInfo
ResolveEntryMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveEntryMethod "setVisual" o = Gtk.Widget.WidgetSetVisualMethodInfo
ResolveEntryMethod "setWidthChars" o = EntrySetWidthCharsMethodInfo
ResolveEntryMethod "setWindow" o = Gtk.Widget.WidgetSetWindowMethodInfo
ResolveEntryMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveEntryMethod t Entry, O.MethodInfo info Entry p) => O.IsLabelProxy t (Entry -> p) where
fromLabelProxy _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveEntryMethod t Entry, O.MethodInfo info Entry p) => O.IsLabel t (Entry -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#else
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
#endif
#endif
type EntryActivateCallback =
IO ()
noEntryActivateCallback :: Maybe EntryActivateCallback
noEntryActivateCallback = Nothing
type C_EntryActivateCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryActivateCallback :: C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
genClosure_EntryActivate :: EntryActivateCallback -> IO Closure
genClosure_EntryActivate cb = do
let cb' = wrap_EntryActivateCallback cb
mk_EntryActivateCallback cb' >>= newCClosure
wrap_EntryActivateCallback ::
EntryActivateCallback ->
C_EntryActivateCallback
wrap_EntryActivateCallback _cb _ _ = do
_cb
onEntryActivate :: (IsEntry a, MonadIO m) => a -> EntryActivateCallback -> m SignalHandlerId
onEntryActivate obj cb = liftIO $ do
let cb' = wrap_EntryActivateCallback cb
cb'' <- mk_EntryActivateCallback cb'
connectSignalFunPtr obj "activate" cb'' SignalConnectBefore
afterEntryActivate :: (IsEntry a, MonadIO m) => a -> EntryActivateCallback -> m SignalHandlerId
afterEntryActivate obj cb = liftIO $ do
let cb' = wrap_EntryActivateCallback cb
cb'' <- mk_EntryActivateCallback cb'
connectSignalFunPtr obj "activate" cb'' SignalConnectAfter
type EntryBackspaceCallback =
IO ()
noEntryBackspaceCallback :: Maybe EntryBackspaceCallback
noEntryBackspaceCallback = Nothing
type C_EntryBackspaceCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryBackspaceCallback :: C_EntryBackspaceCallback -> IO (FunPtr C_EntryBackspaceCallback)
genClosure_EntryBackspace :: EntryBackspaceCallback -> IO Closure
genClosure_EntryBackspace cb = do
let cb' = wrap_EntryBackspaceCallback cb
mk_EntryBackspaceCallback cb' >>= newCClosure
wrap_EntryBackspaceCallback ::
EntryBackspaceCallback ->
C_EntryBackspaceCallback
wrap_EntryBackspaceCallback _cb _ _ = do
_cb
onEntryBackspace :: (IsEntry a, MonadIO m) => a -> EntryBackspaceCallback -> m SignalHandlerId
onEntryBackspace obj cb = liftIO $ do
let cb' = wrap_EntryBackspaceCallback cb
cb'' <- mk_EntryBackspaceCallback cb'
connectSignalFunPtr obj "backspace" cb'' SignalConnectBefore
afterEntryBackspace :: (IsEntry a, MonadIO m) => a -> EntryBackspaceCallback -> m SignalHandlerId
afterEntryBackspace obj cb = liftIO $ do
let cb' = wrap_EntryBackspaceCallback cb
cb'' <- mk_EntryBackspaceCallback cb'
connectSignalFunPtr obj "backspace" cb'' SignalConnectAfter
type EntryCopyClipboardCallback =
IO ()
noEntryCopyClipboardCallback :: Maybe EntryCopyClipboardCallback
noEntryCopyClipboardCallback = Nothing
type C_EntryCopyClipboardCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryCopyClipboardCallback :: C_EntryCopyClipboardCallback -> IO (FunPtr C_EntryCopyClipboardCallback)
genClosure_EntryCopyClipboard :: EntryCopyClipboardCallback -> IO Closure
genClosure_EntryCopyClipboard cb = do
let cb' = wrap_EntryCopyClipboardCallback cb
mk_EntryCopyClipboardCallback cb' >>= newCClosure
wrap_EntryCopyClipboardCallback ::
EntryCopyClipboardCallback ->
C_EntryCopyClipboardCallback
wrap_EntryCopyClipboardCallback _cb _ _ = do
_cb
onEntryCopyClipboard :: (IsEntry a, MonadIO m) => a -> EntryCopyClipboardCallback -> m SignalHandlerId
onEntryCopyClipboard obj cb = liftIO $ do
let cb' = wrap_EntryCopyClipboardCallback cb
cb'' <- mk_EntryCopyClipboardCallback cb'
connectSignalFunPtr obj "copy-clipboard" cb'' SignalConnectBefore
afterEntryCopyClipboard :: (IsEntry a, MonadIO m) => a -> EntryCopyClipboardCallback -> m SignalHandlerId
afterEntryCopyClipboard obj cb = liftIO $ do
let cb' = wrap_EntryCopyClipboardCallback cb
cb'' <- mk_EntryCopyClipboardCallback cb'
connectSignalFunPtr obj "copy-clipboard" cb'' SignalConnectAfter
type EntryCutClipboardCallback =
IO ()
noEntryCutClipboardCallback :: Maybe EntryCutClipboardCallback
noEntryCutClipboardCallback = Nothing
type C_EntryCutClipboardCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryCutClipboardCallback :: C_EntryCutClipboardCallback -> IO (FunPtr C_EntryCutClipboardCallback)
genClosure_EntryCutClipboard :: EntryCutClipboardCallback -> IO Closure
genClosure_EntryCutClipboard cb = do
let cb' = wrap_EntryCutClipboardCallback cb
mk_EntryCutClipboardCallback cb' >>= newCClosure
wrap_EntryCutClipboardCallback ::
EntryCutClipboardCallback ->
C_EntryCutClipboardCallback
wrap_EntryCutClipboardCallback _cb _ _ = do
_cb
onEntryCutClipboard :: (IsEntry a, MonadIO m) => a -> EntryCutClipboardCallback -> m SignalHandlerId
onEntryCutClipboard obj cb = liftIO $ do
let cb' = wrap_EntryCutClipboardCallback cb
cb'' <- mk_EntryCutClipboardCallback cb'
connectSignalFunPtr obj "cut-clipboard" cb'' SignalConnectBefore
afterEntryCutClipboard :: (IsEntry a, MonadIO m) => a -> EntryCutClipboardCallback -> m SignalHandlerId
afterEntryCutClipboard obj cb = liftIO $ do
let cb' = wrap_EntryCutClipboardCallback cb
cb'' <- mk_EntryCutClipboardCallback cb'
connectSignalFunPtr obj "cut-clipboard" cb'' SignalConnectAfter
type EntryDeleteFromCursorCallback =
Gtk.Enums.DeleteType
-> Int32
-> IO ()
noEntryDeleteFromCursorCallback :: Maybe EntryDeleteFromCursorCallback
noEntryDeleteFromCursorCallback = Nothing
type C_EntryDeleteFromCursorCallback =
Ptr () ->
CUInt ->
Int32 ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryDeleteFromCursorCallback :: C_EntryDeleteFromCursorCallback -> IO (FunPtr C_EntryDeleteFromCursorCallback)
genClosure_EntryDeleteFromCursor :: EntryDeleteFromCursorCallback -> IO Closure
genClosure_EntryDeleteFromCursor cb = do
let cb' = wrap_EntryDeleteFromCursorCallback cb
mk_EntryDeleteFromCursorCallback cb' >>= newCClosure
wrap_EntryDeleteFromCursorCallback ::
EntryDeleteFromCursorCallback ->
C_EntryDeleteFromCursorCallback
wrap_EntryDeleteFromCursorCallback _cb _ type_ count _ = do
let type_' = (toEnum . fromIntegral) type_
_cb type_' count
onEntryDeleteFromCursor :: (IsEntry a, MonadIO m) => a -> EntryDeleteFromCursorCallback -> m SignalHandlerId
onEntryDeleteFromCursor obj cb = liftIO $ do
let cb' = wrap_EntryDeleteFromCursorCallback cb
cb'' <- mk_EntryDeleteFromCursorCallback cb'
connectSignalFunPtr obj "delete-from-cursor" cb'' SignalConnectBefore
afterEntryDeleteFromCursor :: (IsEntry a, MonadIO m) => a -> EntryDeleteFromCursorCallback -> m SignalHandlerId
afterEntryDeleteFromCursor obj cb = liftIO $ do
let cb' = wrap_EntryDeleteFromCursorCallback cb
cb'' <- mk_EntryDeleteFromCursorCallback cb'
connectSignalFunPtr obj "delete-from-cursor" cb'' SignalConnectAfter
type EntryIconPressCallback =
Gtk.Enums.EntryIconPosition
-> Gdk.EventButton.EventButton
-> IO ()
noEntryIconPressCallback :: Maybe EntryIconPressCallback
noEntryIconPressCallback = Nothing
type C_EntryIconPressCallback =
Ptr () ->
CUInt ->
Ptr Gdk.EventButton.EventButton ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryIconPressCallback :: C_EntryIconPressCallback -> IO (FunPtr C_EntryIconPressCallback)
genClosure_EntryIconPress :: EntryIconPressCallback -> IO Closure
genClosure_EntryIconPress cb = do
let cb' = wrap_EntryIconPressCallback cb
mk_EntryIconPressCallback cb' >>= newCClosure
wrap_EntryIconPressCallback ::
EntryIconPressCallback ->
C_EntryIconPressCallback
wrap_EntryIconPressCallback _cb _ iconPos event _ = do
let iconPos' = (toEnum . fromIntegral) iconPos
event' <- (newPtr Gdk.EventButton.EventButton) event
_cb iconPos' event'
onEntryIconPress :: (IsEntry a, MonadIO m) => a -> EntryIconPressCallback -> m SignalHandlerId
onEntryIconPress obj cb = liftIO $ do
let cb' = wrap_EntryIconPressCallback cb
cb'' <- mk_EntryIconPressCallback cb'
connectSignalFunPtr obj "icon-press" cb'' SignalConnectBefore
afterEntryIconPress :: (IsEntry a, MonadIO m) => a -> EntryIconPressCallback -> m SignalHandlerId
afterEntryIconPress obj cb = liftIO $ do
let cb' = wrap_EntryIconPressCallback cb
cb'' <- mk_EntryIconPressCallback cb'
connectSignalFunPtr obj "icon-press" cb'' SignalConnectAfter
type EntryIconReleaseCallback =
Gtk.Enums.EntryIconPosition
-> Gdk.EventButton.EventButton
-> IO ()
noEntryIconReleaseCallback :: Maybe EntryIconReleaseCallback
noEntryIconReleaseCallback = Nothing
type C_EntryIconReleaseCallback =
Ptr () ->
CUInt ->
Ptr Gdk.EventButton.EventButton ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryIconReleaseCallback :: C_EntryIconReleaseCallback -> IO (FunPtr C_EntryIconReleaseCallback)
genClosure_EntryIconRelease :: EntryIconReleaseCallback -> IO Closure
genClosure_EntryIconRelease cb = do
let cb' = wrap_EntryIconReleaseCallback cb
mk_EntryIconReleaseCallback cb' >>= newCClosure
wrap_EntryIconReleaseCallback ::
EntryIconReleaseCallback ->
C_EntryIconReleaseCallback
wrap_EntryIconReleaseCallback _cb _ iconPos event _ = do
let iconPos' = (toEnum . fromIntegral) iconPos
event' <- (newPtr Gdk.EventButton.EventButton) event
_cb iconPos' event'
onEntryIconRelease :: (IsEntry a, MonadIO m) => a -> EntryIconReleaseCallback -> m SignalHandlerId
onEntryIconRelease obj cb = liftIO $ do
let cb' = wrap_EntryIconReleaseCallback cb
cb'' <- mk_EntryIconReleaseCallback cb'
connectSignalFunPtr obj "icon-release" cb'' SignalConnectBefore
afterEntryIconRelease :: (IsEntry a, MonadIO m) => a -> EntryIconReleaseCallback -> m SignalHandlerId
afterEntryIconRelease obj cb = liftIO $ do
let cb' = wrap_EntryIconReleaseCallback cb
cb'' <- mk_EntryIconReleaseCallback cb'
connectSignalFunPtr obj "icon-release" cb'' SignalConnectAfter
type EntryInsertAtCursorCallback =
T.Text
-> IO ()
noEntryInsertAtCursorCallback :: Maybe EntryInsertAtCursorCallback
noEntryInsertAtCursorCallback = Nothing
type C_EntryInsertAtCursorCallback =
Ptr () ->
CString ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryInsertAtCursorCallback :: C_EntryInsertAtCursorCallback -> IO (FunPtr C_EntryInsertAtCursorCallback)
genClosure_EntryInsertAtCursor :: EntryInsertAtCursorCallback -> IO Closure
genClosure_EntryInsertAtCursor cb = do
let cb' = wrap_EntryInsertAtCursorCallback cb
mk_EntryInsertAtCursorCallback cb' >>= newCClosure
wrap_EntryInsertAtCursorCallback ::
EntryInsertAtCursorCallback ->
C_EntryInsertAtCursorCallback
wrap_EntryInsertAtCursorCallback _cb _ string _ = do
string' <- cstringToText string
_cb string'
onEntryInsertAtCursor :: (IsEntry a, MonadIO m) => a -> EntryInsertAtCursorCallback -> m SignalHandlerId
onEntryInsertAtCursor obj cb = liftIO $ do
let cb' = wrap_EntryInsertAtCursorCallback cb
cb'' <- mk_EntryInsertAtCursorCallback cb'
connectSignalFunPtr obj "insert-at-cursor" cb'' SignalConnectBefore
afterEntryInsertAtCursor :: (IsEntry a, MonadIO m) => a -> EntryInsertAtCursorCallback -> m SignalHandlerId
afterEntryInsertAtCursor obj cb = liftIO $ do
let cb' = wrap_EntryInsertAtCursorCallback cb
cb'' <- mk_EntryInsertAtCursorCallback cb'
connectSignalFunPtr obj "insert-at-cursor" cb'' SignalConnectAfter
type EntryInsertEmojiCallback =
IO ()
noEntryInsertEmojiCallback :: Maybe EntryInsertEmojiCallback
noEntryInsertEmojiCallback = Nothing
type C_EntryInsertEmojiCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryInsertEmojiCallback :: C_EntryInsertEmojiCallback -> IO (FunPtr C_EntryInsertEmojiCallback)
genClosure_EntryInsertEmoji :: EntryInsertEmojiCallback -> IO Closure
genClosure_EntryInsertEmoji cb = do
let cb' = wrap_EntryInsertEmojiCallback cb
mk_EntryInsertEmojiCallback cb' >>= newCClosure
wrap_EntryInsertEmojiCallback ::
EntryInsertEmojiCallback ->
C_EntryInsertEmojiCallback
wrap_EntryInsertEmojiCallback _cb _ _ = do
_cb
onEntryInsertEmoji :: (IsEntry a, MonadIO m) => a -> EntryInsertEmojiCallback -> m SignalHandlerId
onEntryInsertEmoji obj cb = liftIO $ do
let cb' = wrap_EntryInsertEmojiCallback cb
cb'' <- mk_EntryInsertEmojiCallback cb'
connectSignalFunPtr obj "insert-emoji" cb'' SignalConnectBefore
afterEntryInsertEmoji :: (IsEntry a, MonadIO m) => a -> EntryInsertEmojiCallback -> m SignalHandlerId
afterEntryInsertEmoji obj cb = liftIO $ do
let cb' = wrap_EntryInsertEmojiCallback cb
cb'' <- mk_EntryInsertEmojiCallback cb'
connectSignalFunPtr obj "insert-emoji" cb'' SignalConnectAfter
type EntryMoveCursorCallback =
Gtk.Enums.MovementStep
-> Int32
-> Bool
-> IO ()
noEntryMoveCursorCallback :: Maybe EntryMoveCursorCallback
noEntryMoveCursorCallback = Nothing
type C_EntryMoveCursorCallback =
Ptr () ->
CUInt ->
Int32 ->
CInt ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryMoveCursorCallback :: C_EntryMoveCursorCallback -> IO (FunPtr C_EntryMoveCursorCallback)
genClosure_EntryMoveCursor :: EntryMoveCursorCallback -> IO Closure
genClosure_EntryMoveCursor cb = do
let cb' = wrap_EntryMoveCursorCallback cb
mk_EntryMoveCursorCallback cb' >>= newCClosure
wrap_EntryMoveCursorCallback ::
EntryMoveCursorCallback ->
C_EntryMoveCursorCallback
wrap_EntryMoveCursorCallback _cb _ step count extendSelection _ = do
let step' = (toEnum . fromIntegral) step
let extendSelection' = (/= 0) extendSelection
_cb step' count extendSelection'
onEntryMoveCursor :: (IsEntry a, MonadIO m) => a -> EntryMoveCursorCallback -> m SignalHandlerId
onEntryMoveCursor obj cb = liftIO $ do
let cb' = wrap_EntryMoveCursorCallback cb
cb'' <- mk_EntryMoveCursorCallback cb'
connectSignalFunPtr obj "move-cursor" cb'' SignalConnectBefore
afterEntryMoveCursor :: (IsEntry a, MonadIO m) => a -> EntryMoveCursorCallback -> m SignalHandlerId
afterEntryMoveCursor obj cb = liftIO $ do
let cb' = wrap_EntryMoveCursorCallback cb
cb'' <- mk_EntryMoveCursorCallback cb'
connectSignalFunPtr obj "move-cursor" cb'' SignalConnectAfter
type EntryPasteClipboardCallback =
IO ()
noEntryPasteClipboardCallback :: Maybe EntryPasteClipboardCallback
noEntryPasteClipboardCallback = Nothing
type C_EntryPasteClipboardCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryPasteClipboardCallback :: C_EntryPasteClipboardCallback -> IO (FunPtr C_EntryPasteClipboardCallback)
genClosure_EntryPasteClipboard :: EntryPasteClipboardCallback -> IO Closure
genClosure_EntryPasteClipboard cb = do
let cb' = wrap_EntryPasteClipboardCallback cb
mk_EntryPasteClipboardCallback cb' >>= newCClosure
wrap_EntryPasteClipboardCallback ::
EntryPasteClipboardCallback ->
C_EntryPasteClipboardCallback
wrap_EntryPasteClipboardCallback _cb _ _ = do
_cb
onEntryPasteClipboard :: (IsEntry a, MonadIO m) => a -> EntryPasteClipboardCallback -> m SignalHandlerId
onEntryPasteClipboard obj cb = liftIO $ do
let cb' = wrap_EntryPasteClipboardCallback cb
cb'' <- mk_EntryPasteClipboardCallback cb'
connectSignalFunPtr obj "paste-clipboard" cb'' SignalConnectBefore
afterEntryPasteClipboard :: (IsEntry a, MonadIO m) => a -> EntryPasteClipboardCallback -> m SignalHandlerId
afterEntryPasteClipboard obj cb = liftIO $ do
let cb' = wrap_EntryPasteClipboardCallback cb
cb'' <- mk_EntryPasteClipboardCallback cb'
connectSignalFunPtr obj "paste-clipboard" cb'' SignalConnectAfter
type EntryPopulatePopupCallback =
Gtk.Widget.Widget
-> IO ()
noEntryPopulatePopupCallback :: Maybe EntryPopulatePopupCallback
noEntryPopulatePopupCallback = Nothing
type C_EntryPopulatePopupCallback =
Ptr () ->
Ptr Gtk.Widget.Widget ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryPopulatePopupCallback :: C_EntryPopulatePopupCallback -> IO (FunPtr C_EntryPopulatePopupCallback)
genClosure_EntryPopulatePopup :: EntryPopulatePopupCallback -> IO Closure
genClosure_EntryPopulatePopup cb = do
let cb' = wrap_EntryPopulatePopupCallback cb
mk_EntryPopulatePopupCallback cb' >>= newCClosure
wrap_EntryPopulatePopupCallback ::
EntryPopulatePopupCallback ->
C_EntryPopulatePopupCallback
wrap_EntryPopulatePopupCallback _cb _ widget _ = do
widget' <- (newObject Gtk.Widget.Widget) widget
_cb widget'
onEntryPopulatePopup :: (IsEntry a, MonadIO m) => a -> EntryPopulatePopupCallback -> m SignalHandlerId
onEntryPopulatePopup obj cb = liftIO $ do
let cb' = wrap_EntryPopulatePopupCallback cb
cb'' <- mk_EntryPopulatePopupCallback cb'
connectSignalFunPtr obj "populate-popup" cb'' SignalConnectBefore
afterEntryPopulatePopup :: (IsEntry a, MonadIO m) => a -> EntryPopulatePopupCallback -> m SignalHandlerId
afterEntryPopulatePopup obj cb = liftIO $ do
let cb' = wrap_EntryPopulatePopupCallback cb
cb'' <- mk_EntryPopulatePopupCallback cb'
connectSignalFunPtr obj "populate-popup" cb'' SignalConnectAfter
type EntryPreeditChangedCallback =
T.Text
-> IO ()
noEntryPreeditChangedCallback :: Maybe EntryPreeditChangedCallback
noEntryPreeditChangedCallback = Nothing
type C_EntryPreeditChangedCallback =
Ptr () ->
CString ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryPreeditChangedCallback :: C_EntryPreeditChangedCallback -> IO (FunPtr C_EntryPreeditChangedCallback)
genClosure_EntryPreeditChanged :: EntryPreeditChangedCallback -> IO Closure
genClosure_EntryPreeditChanged cb = do
let cb' = wrap_EntryPreeditChangedCallback cb
mk_EntryPreeditChangedCallback cb' >>= newCClosure
wrap_EntryPreeditChangedCallback ::
EntryPreeditChangedCallback ->
C_EntryPreeditChangedCallback
wrap_EntryPreeditChangedCallback _cb _ preedit _ = do
preedit' <- cstringToText preedit
_cb preedit'
onEntryPreeditChanged :: (IsEntry a, MonadIO m) => a -> EntryPreeditChangedCallback -> m SignalHandlerId
onEntryPreeditChanged obj cb = liftIO $ do
let cb' = wrap_EntryPreeditChangedCallback cb
cb'' <- mk_EntryPreeditChangedCallback cb'
connectSignalFunPtr obj "preedit-changed" cb'' SignalConnectBefore
afterEntryPreeditChanged :: (IsEntry a, MonadIO m) => a -> EntryPreeditChangedCallback -> m SignalHandlerId
afterEntryPreeditChanged obj cb = liftIO $ do
let cb' = wrap_EntryPreeditChangedCallback cb
cb'' <- mk_EntryPreeditChangedCallback cb'
connectSignalFunPtr obj "preedit-changed" cb'' SignalConnectAfter
type EntryToggleOverwriteCallback =
IO ()
noEntryToggleOverwriteCallback :: Maybe EntryToggleOverwriteCallback
noEntryToggleOverwriteCallback = Nothing
type C_EntryToggleOverwriteCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryToggleOverwriteCallback :: C_EntryToggleOverwriteCallback -> IO (FunPtr C_EntryToggleOverwriteCallback)
genClosure_EntryToggleOverwrite :: EntryToggleOverwriteCallback -> IO Closure
genClosure_EntryToggleOverwrite cb = do
let cb' = wrap_EntryToggleOverwriteCallback cb
mk_EntryToggleOverwriteCallback cb' >>= newCClosure
wrap_EntryToggleOverwriteCallback ::
EntryToggleOverwriteCallback ->
C_EntryToggleOverwriteCallback
wrap_EntryToggleOverwriteCallback _cb _ _ = do
_cb
onEntryToggleOverwrite :: (IsEntry a, MonadIO m) => a -> EntryToggleOverwriteCallback -> m SignalHandlerId
onEntryToggleOverwrite obj cb = liftIO $ do
let cb' = wrap_EntryToggleOverwriteCallback cb
cb'' <- mk_EntryToggleOverwriteCallback cb'
connectSignalFunPtr obj "toggle-overwrite" cb'' SignalConnectBefore
afterEntryToggleOverwrite :: (IsEntry a, MonadIO m) => a -> EntryToggleOverwriteCallback -> m SignalHandlerId
afterEntryToggleOverwrite obj cb = liftIO $ do
let cb' = wrap_EntryToggleOverwriteCallback cb
cb'' <- mk_EntryToggleOverwriteCallback cb'
connectSignalFunPtr obj "toggle-overwrite" cb'' SignalConnectAfter
getEntryActivatesDefault :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryActivatesDefault obj = liftIO $ getObjectPropertyBool obj "activates-default"
setEntryActivatesDefault :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryActivatesDefault obj val = liftIO $ setObjectPropertyBool obj "activates-default" val
constructEntryActivatesDefault :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryActivatesDefault val = constructObjectPropertyBool "activates-default" val
#if ENABLE_OVERLOADING
data EntryActivatesDefaultPropertyInfo
instance AttrInfo EntryActivatesDefaultPropertyInfo where
type AttrAllowedOps EntryActivatesDefaultPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryActivatesDefaultPropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryActivatesDefaultPropertyInfo = IsEntry
type AttrGetType EntryActivatesDefaultPropertyInfo = Bool
type AttrLabel EntryActivatesDefaultPropertyInfo = "activates-default"
type AttrOrigin EntryActivatesDefaultPropertyInfo = Entry
attrGet _ = getEntryActivatesDefault
attrSet _ = setEntryActivatesDefault
attrConstruct _ = constructEntryActivatesDefault
attrClear _ = undefined
#endif
getEntryAttributes :: (MonadIO m, IsEntry o) => o -> m (Maybe Pango.AttrList.AttrList)
getEntryAttributes obj = liftIO $ getObjectPropertyBoxed obj "attributes" Pango.AttrList.AttrList
setEntryAttributes :: (MonadIO m, IsEntry o) => o -> Pango.AttrList.AttrList -> m ()
setEntryAttributes obj val = liftIO $ setObjectPropertyBoxed obj "attributes" (Just val)
constructEntryAttributes :: (IsEntry o) => Pango.AttrList.AttrList -> IO (GValueConstruct o)
constructEntryAttributes val = constructObjectPropertyBoxed "attributes" (Just val)
#if ENABLE_OVERLOADING
data EntryAttributesPropertyInfo
instance AttrInfo EntryAttributesPropertyInfo where
type AttrAllowedOps EntryAttributesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryAttributesPropertyInfo = (~) Pango.AttrList.AttrList
type AttrBaseTypeConstraint EntryAttributesPropertyInfo = IsEntry
type AttrGetType EntryAttributesPropertyInfo = (Maybe Pango.AttrList.AttrList)
type AttrLabel EntryAttributesPropertyInfo = "attributes"
type AttrOrigin EntryAttributesPropertyInfo = Entry
attrGet _ = getEntryAttributes
attrSet _ = setEntryAttributes
attrConstruct _ = constructEntryAttributes
attrClear _ = undefined
#endif
getEntryBuffer :: (MonadIO m, IsEntry o) => o -> m Gtk.EntryBuffer.EntryBuffer
getEntryBuffer obj = liftIO $ checkUnexpectedNothing "getEntryBuffer" $ getObjectPropertyObject obj "buffer" Gtk.EntryBuffer.EntryBuffer
setEntryBuffer :: (MonadIO m, IsEntry o, Gtk.EntryBuffer.IsEntryBuffer a) => o -> a -> m ()
setEntryBuffer obj val = liftIO $ setObjectPropertyObject obj "buffer" (Just val)
constructEntryBuffer :: (IsEntry o, Gtk.EntryBuffer.IsEntryBuffer a) => a -> IO (GValueConstruct o)
constructEntryBuffer val = constructObjectPropertyObject "buffer" (Just val)
#if ENABLE_OVERLOADING
data EntryBufferPropertyInfo
instance AttrInfo EntryBufferPropertyInfo where
type AttrAllowedOps EntryBufferPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryBufferPropertyInfo = Gtk.EntryBuffer.IsEntryBuffer
type AttrBaseTypeConstraint EntryBufferPropertyInfo = IsEntry
type AttrGetType EntryBufferPropertyInfo = Gtk.EntryBuffer.EntryBuffer
type AttrLabel EntryBufferPropertyInfo = "buffer"
type AttrOrigin EntryBufferPropertyInfo = Entry
attrGet _ = getEntryBuffer
attrSet _ = setEntryBuffer
attrConstruct _ = constructEntryBuffer
attrClear _ = undefined
#endif
getEntryCapsLockWarning :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryCapsLockWarning obj = liftIO $ getObjectPropertyBool obj "caps-lock-warning"
setEntryCapsLockWarning :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryCapsLockWarning obj val = liftIO $ setObjectPropertyBool obj "caps-lock-warning" val
constructEntryCapsLockWarning :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryCapsLockWarning val = constructObjectPropertyBool "caps-lock-warning" val
#if ENABLE_OVERLOADING
data EntryCapsLockWarningPropertyInfo
instance AttrInfo EntryCapsLockWarningPropertyInfo where
type AttrAllowedOps EntryCapsLockWarningPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryCapsLockWarningPropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryCapsLockWarningPropertyInfo = IsEntry
type AttrGetType EntryCapsLockWarningPropertyInfo = Bool
type AttrLabel EntryCapsLockWarningPropertyInfo = "caps-lock-warning"
type AttrOrigin EntryCapsLockWarningPropertyInfo = Entry
attrGet _ = getEntryCapsLockWarning
attrSet _ = setEntryCapsLockWarning
attrConstruct _ = constructEntryCapsLockWarning
attrClear _ = undefined
#endif
getEntryCompletion :: (MonadIO m, IsEntry o) => o -> m Gtk.EntryCompletion.EntryCompletion
getEntryCompletion obj = liftIO $ checkUnexpectedNothing "getEntryCompletion" $ getObjectPropertyObject obj "completion" Gtk.EntryCompletion.EntryCompletion
setEntryCompletion :: (MonadIO m, IsEntry o, Gtk.EntryCompletion.IsEntryCompletion a) => o -> a -> m ()
setEntryCompletion obj val = liftIO $ setObjectPropertyObject obj "completion" (Just val)
constructEntryCompletion :: (IsEntry o, Gtk.EntryCompletion.IsEntryCompletion a) => a -> IO (GValueConstruct o)
constructEntryCompletion val = constructObjectPropertyObject "completion" (Just val)
clearEntryCompletion :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryCompletion obj = liftIO $ setObjectPropertyObject obj "completion" (Nothing :: Maybe Gtk.EntryCompletion.EntryCompletion)
#if ENABLE_OVERLOADING
data EntryCompletionPropertyInfo
instance AttrInfo EntryCompletionPropertyInfo where
type AttrAllowedOps EntryCompletionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryCompletionPropertyInfo = Gtk.EntryCompletion.IsEntryCompletion
type AttrBaseTypeConstraint EntryCompletionPropertyInfo = IsEntry
type AttrGetType EntryCompletionPropertyInfo = Gtk.EntryCompletion.EntryCompletion
type AttrLabel EntryCompletionPropertyInfo = "completion"
type AttrOrigin EntryCompletionPropertyInfo = Entry
attrGet _ = getEntryCompletion
attrSet _ = setEntryCompletion
attrConstruct _ = constructEntryCompletion
attrClear _ = clearEntryCompletion
#endif
getEntryCursorPosition :: (MonadIO m, IsEntry o) => o -> m Int32
getEntryCursorPosition obj = liftIO $ getObjectPropertyInt32 obj "cursor-position"
#if ENABLE_OVERLOADING
data EntryCursorPositionPropertyInfo
instance AttrInfo EntryCursorPositionPropertyInfo where
type AttrAllowedOps EntryCursorPositionPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint EntryCursorPositionPropertyInfo = (~) ()
type AttrBaseTypeConstraint EntryCursorPositionPropertyInfo = IsEntry
type AttrGetType EntryCursorPositionPropertyInfo = Int32
type AttrLabel EntryCursorPositionPropertyInfo = "cursor-position"
type AttrOrigin EntryCursorPositionPropertyInfo = Entry
attrGet _ = getEntryCursorPosition
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
getEntryEditable :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryEditable obj = liftIO $ getObjectPropertyBool obj "editable"
setEntryEditable :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryEditable obj val = liftIO $ setObjectPropertyBool obj "editable" val
constructEntryEditable :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryEditable val = constructObjectPropertyBool "editable" val
#if ENABLE_OVERLOADING
data EntryEditablePropertyInfo
instance AttrInfo EntryEditablePropertyInfo where
type AttrAllowedOps EntryEditablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryEditablePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryEditablePropertyInfo = IsEntry
type AttrGetType EntryEditablePropertyInfo = Bool
type AttrLabel EntryEditablePropertyInfo = "editable"
type AttrOrigin EntryEditablePropertyInfo = Entry
attrGet _ = getEntryEditable
attrSet _ = setEntryEditable
attrConstruct _ = constructEntryEditable
attrClear _ = undefined
#endif
getEntryEnableEmojiCompletion :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryEnableEmojiCompletion obj = liftIO $ getObjectPropertyBool obj "enable-emoji-completion"
setEntryEnableEmojiCompletion :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryEnableEmojiCompletion obj val = liftIO $ setObjectPropertyBool obj "enable-emoji-completion" val
constructEntryEnableEmojiCompletion :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryEnableEmojiCompletion val = constructObjectPropertyBool "enable-emoji-completion" val
#if ENABLE_OVERLOADING
data EntryEnableEmojiCompletionPropertyInfo
instance AttrInfo EntryEnableEmojiCompletionPropertyInfo where
type AttrAllowedOps EntryEnableEmojiCompletionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryEnableEmojiCompletionPropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryEnableEmojiCompletionPropertyInfo = IsEntry
type AttrGetType EntryEnableEmojiCompletionPropertyInfo = Bool
type AttrLabel EntryEnableEmojiCompletionPropertyInfo = "enable-emoji-completion"
type AttrOrigin EntryEnableEmojiCompletionPropertyInfo = Entry
attrGet _ = getEntryEnableEmojiCompletion
attrSet _ = setEntryEnableEmojiCompletion
attrConstruct _ = constructEntryEnableEmojiCompletion
attrClear _ = undefined
#endif
getEntryHasFrame :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryHasFrame obj = liftIO $ getObjectPropertyBool obj "has-frame"
setEntryHasFrame :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryHasFrame obj val = liftIO $ setObjectPropertyBool obj "has-frame" val
constructEntryHasFrame :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryHasFrame val = constructObjectPropertyBool "has-frame" val
#if ENABLE_OVERLOADING
data EntryHasFramePropertyInfo
instance AttrInfo EntryHasFramePropertyInfo where
type AttrAllowedOps EntryHasFramePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryHasFramePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryHasFramePropertyInfo = IsEntry
type AttrGetType EntryHasFramePropertyInfo = Bool
type AttrLabel EntryHasFramePropertyInfo = "has-frame"
type AttrOrigin EntryHasFramePropertyInfo = Entry
attrGet _ = getEntryHasFrame
attrSet _ = setEntryHasFrame
attrConstruct _ = constructEntryHasFrame
attrClear _ = undefined
#endif
getEntryImModule :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntryImModule obj = liftIO $ getObjectPropertyString obj "im-module"
setEntryImModule :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryImModule obj val = liftIO $ setObjectPropertyString obj "im-module" (Just val)
constructEntryImModule :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntryImModule val = constructObjectPropertyString "im-module" (Just val)
clearEntryImModule :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryImModule obj = liftIO $ setObjectPropertyString obj "im-module" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntryImModulePropertyInfo
instance AttrInfo EntryImModulePropertyInfo where
type AttrAllowedOps EntryImModulePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryImModulePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntryImModulePropertyInfo = IsEntry
type AttrGetType EntryImModulePropertyInfo = (Maybe T.Text)
type AttrLabel EntryImModulePropertyInfo = "im-module"
type AttrOrigin EntryImModulePropertyInfo = Entry
attrGet _ = getEntryImModule
attrSet _ = setEntryImModule
attrConstruct _ = constructEntryImModule
attrClear _ = clearEntryImModule
#endif
getEntryInnerBorder :: (MonadIO m, IsEntry o) => o -> m (Maybe Gtk.Border.Border)
getEntryInnerBorder obj = liftIO $ getObjectPropertyBoxed obj "inner-border" Gtk.Border.Border
setEntryInnerBorder :: (MonadIO m, IsEntry o) => o -> Gtk.Border.Border -> m ()
setEntryInnerBorder obj val = liftIO $ setObjectPropertyBoxed obj "inner-border" (Just val)
constructEntryInnerBorder :: (IsEntry o) => Gtk.Border.Border -> IO (GValueConstruct o)
constructEntryInnerBorder val = constructObjectPropertyBoxed "inner-border" (Just val)
clearEntryInnerBorder :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryInnerBorder obj = liftIO $ setObjectPropertyBoxed obj "inner-border" (Nothing :: Maybe Gtk.Border.Border)
#if ENABLE_OVERLOADING
data EntryInnerBorderPropertyInfo
instance AttrInfo EntryInnerBorderPropertyInfo where
type AttrAllowedOps EntryInnerBorderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryInnerBorderPropertyInfo = (~) Gtk.Border.Border
type AttrBaseTypeConstraint EntryInnerBorderPropertyInfo = IsEntry
type AttrGetType EntryInnerBorderPropertyInfo = (Maybe Gtk.Border.Border)
type AttrLabel EntryInnerBorderPropertyInfo = "inner-border"
type AttrOrigin EntryInnerBorderPropertyInfo = Entry
attrGet _ = getEntryInnerBorder
attrSet _ = setEntryInnerBorder
attrConstruct _ = constructEntryInnerBorder
attrClear _ = clearEntryInnerBorder
#endif
getEntryInputHints :: (MonadIO m, IsEntry o) => o -> m [Gtk.Flags.InputHints]
getEntryInputHints obj = liftIO $ getObjectPropertyFlags obj "input-hints"
setEntryInputHints :: (MonadIO m, IsEntry o) => o -> [Gtk.Flags.InputHints] -> m ()
setEntryInputHints obj val = liftIO $ setObjectPropertyFlags obj "input-hints" val
constructEntryInputHints :: (IsEntry o) => [Gtk.Flags.InputHints] -> IO (GValueConstruct o)
constructEntryInputHints val = constructObjectPropertyFlags "input-hints" val
#if ENABLE_OVERLOADING
data EntryInputHintsPropertyInfo
instance AttrInfo EntryInputHintsPropertyInfo where
type AttrAllowedOps EntryInputHintsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryInputHintsPropertyInfo = (~) [Gtk.Flags.InputHints]
type AttrBaseTypeConstraint EntryInputHintsPropertyInfo = IsEntry
type AttrGetType EntryInputHintsPropertyInfo = [Gtk.Flags.InputHints]
type AttrLabel EntryInputHintsPropertyInfo = "input-hints"
type AttrOrigin EntryInputHintsPropertyInfo = Entry
attrGet _ = getEntryInputHints
attrSet _ = setEntryInputHints
attrConstruct _ = constructEntryInputHints
attrClear _ = undefined
#endif
getEntryInputPurpose :: (MonadIO m, IsEntry o) => o -> m Gtk.Enums.InputPurpose
getEntryInputPurpose obj = liftIO $ getObjectPropertyEnum obj "input-purpose"
setEntryInputPurpose :: (MonadIO m, IsEntry o) => o -> Gtk.Enums.InputPurpose -> m ()
setEntryInputPurpose obj val = liftIO $ setObjectPropertyEnum obj "input-purpose" val
constructEntryInputPurpose :: (IsEntry o) => Gtk.Enums.InputPurpose -> IO (GValueConstruct o)
constructEntryInputPurpose val = constructObjectPropertyEnum "input-purpose" val
#if ENABLE_OVERLOADING
data EntryInputPurposePropertyInfo
instance AttrInfo EntryInputPurposePropertyInfo where
type AttrAllowedOps EntryInputPurposePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryInputPurposePropertyInfo = (~) Gtk.Enums.InputPurpose
type AttrBaseTypeConstraint EntryInputPurposePropertyInfo = IsEntry
type AttrGetType EntryInputPurposePropertyInfo = Gtk.Enums.InputPurpose
type AttrLabel EntryInputPurposePropertyInfo = "input-purpose"
type AttrOrigin EntryInputPurposePropertyInfo = Entry
attrGet _ = getEntryInputPurpose
attrSet _ = setEntryInputPurpose
attrConstruct _ = constructEntryInputPurpose
attrClear _ = undefined
#endif
getEntryInvisibleChar :: (MonadIO m, IsEntry o) => o -> m Word32
getEntryInvisibleChar obj = liftIO $ getObjectPropertyUInt32 obj "invisible-char"
setEntryInvisibleChar :: (MonadIO m, IsEntry o) => o -> Word32 -> m ()
setEntryInvisibleChar obj val = liftIO $ setObjectPropertyUInt32 obj "invisible-char" val
constructEntryInvisibleChar :: (IsEntry o) => Word32 -> IO (GValueConstruct o)
constructEntryInvisibleChar val = constructObjectPropertyUInt32 "invisible-char" val
#if ENABLE_OVERLOADING
data EntryInvisibleCharPropertyInfo
instance AttrInfo EntryInvisibleCharPropertyInfo where
type AttrAllowedOps EntryInvisibleCharPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryInvisibleCharPropertyInfo = (~) Word32
type AttrBaseTypeConstraint EntryInvisibleCharPropertyInfo = IsEntry
type AttrGetType EntryInvisibleCharPropertyInfo = Word32
type AttrLabel EntryInvisibleCharPropertyInfo = "invisible-char"
type AttrOrigin EntryInvisibleCharPropertyInfo = Entry
attrGet _ = getEntryInvisibleChar
attrSet _ = setEntryInvisibleChar
attrConstruct _ = constructEntryInvisibleChar
attrClear _ = undefined
#endif
getEntryInvisibleCharSet :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryInvisibleCharSet obj = liftIO $ getObjectPropertyBool obj "invisible-char-set"
setEntryInvisibleCharSet :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryInvisibleCharSet obj val = liftIO $ setObjectPropertyBool obj "invisible-char-set" val
constructEntryInvisibleCharSet :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryInvisibleCharSet val = constructObjectPropertyBool "invisible-char-set" val
#if ENABLE_OVERLOADING
data EntryInvisibleCharSetPropertyInfo
instance AttrInfo EntryInvisibleCharSetPropertyInfo where
type AttrAllowedOps EntryInvisibleCharSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryInvisibleCharSetPropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryInvisibleCharSetPropertyInfo = IsEntry
type AttrGetType EntryInvisibleCharSetPropertyInfo = Bool
type AttrLabel EntryInvisibleCharSetPropertyInfo = "invisible-char-set"
type AttrOrigin EntryInvisibleCharSetPropertyInfo = Entry
attrGet _ = getEntryInvisibleCharSet
attrSet _ = setEntryInvisibleCharSet
attrConstruct _ = constructEntryInvisibleCharSet
attrClear _ = undefined
#endif
getEntryMaxLength :: (MonadIO m, IsEntry o) => o -> m Int32
getEntryMaxLength obj = liftIO $ getObjectPropertyInt32 obj "max-length"
setEntryMaxLength :: (MonadIO m, IsEntry o) => o -> Int32 -> m ()
setEntryMaxLength obj val = liftIO $ setObjectPropertyInt32 obj "max-length" val
constructEntryMaxLength :: (IsEntry o) => Int32 -> IO (GValueConstruct o)
constructEntryMaxLength val = constructObjectPropertyInt32 "max-length" val
#if ENABLE_OVERLOADING
data EntryMaxLengthPropertyInfo
instance AttrInfo EntryMaxLengthPropertyInfo where
type AttrAllowedOps EntryMaxLengthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryMaxLengthPropertyInfo = (~) Int32
type AttrBaseTypeConstraint EntryMaxLengthPropertyInfo = IsEntry
type AttrGetType EntryMaxLengthPropertyInfo = Int32
type AttrLabel EntryMaxLengthPropertyInfo = "max-length"
type AttrOrigin EntryMaxLengthPropertyInfo = Entry
attrGet _ = getEntryMaxLength
attrSet _ = setEntryMaxLength
attrConstruct _ = constructEntryMaxLength
attrClear _ = undefined
#endif
getEntryMaxWidthChars :: (MonadIO m, IsEntry o) => o -> m Int32
getEntryMaxWidthChars obj = liftIO $ getObjectPropertyInt32 obj "max-width-chars"
setEntryMaxWidthChars :: (MonadIO m, IsEntry o) => o -> Int32 -> m ()
setEntryMaxWidthChars obj val = liftIO $ setObjectPropertyInt32 obj "max-width-chars" val
constructEntryMaxWidthChars :: (IsEntry o) => Int32 -> IO (GValueConstruct o)
constructEntryMaxWidthChars val = constructObjectPropertyInt32 "max-width-chars" val
#if ENABLE_OVERLOADING
data EntryMaxWidthCharsPropertyInfo
instance AttrInfo EntryMaxWidthCharsPropertyInfo where
type AttrAllowedOps EntryMaxWidthCharsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryMaxWidthCharsPropertyInfo = (~) Int32
type AttrBaseTypeConstraint EntryMaxWidthCharsPropertyInfo = IsEntry
type AttrGetType EntryMaxWidthCharsPropertyInfo = Int32
type AttrLabel EntryMaxWidthCharsPropertyInfo = "max-width-chars"
type AttrOrigin EntryMaxWidthCharsPropertyInfo = Entry
attrGet _ = getEntryMaxWidthChars
attrSet _ = setEntryMaxWidthChars
attrConstruct _ = constructEntryMaxWidthChars
attrClear _ = undefined
#endif
getEntryOverwriteMode :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryOverwriteMode obj = liftIO $ getObjectPropertyBool obj "overwrite-mode"
setEntryOverwriteMode :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryOverwriteMode obj val = liftIO $ setObjectPropertyBool obj "overwrite-mode" val
constructEntryOverwriteMode :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryOverwriteMode val = constructObjectPropertyBool "overwrite-mode" val
#if ENABLE_OVERLOADING
data EntryOverwriteModePropertyInfo
instance AttrInfo EntryOverwriteModePropertyInfo where
type AttrAllowedOps EntryOverwriteModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryOverwriteModePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryOverwriteModePropertyInfo = IsEntry
type AttrGetType EntryOverwriteModePropertyInfo = Bool
type AttrLabel EntryOverwriteModePropertyInfo = "overwrite-mode"
type AttrOrigin EntryOverwriteModePropertyInfo = Entry
attrGet _ = getEntryOverwriteMode
attrSet _ = setEntryOverwriteMode
attrConstruct _ = constructEntryOverwriteMode
attrClear _ = undefined
#endif
getEntryPlaceholderText :: (MonadIO m, IsEntry o) => o -> m T.Text
getEntryPlaceholderText obj = liftIO $ checkUnexpectedNothing "getEntryPlaceholderText" $ getObjectPropertyString obj "placeholder-text"
setEntryPlaceholderText :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryPlaceholderText obj val = liftIO $ setObjectPropertyString obj "placeholder-text" (Just val)
constructEntryPlaceholderText :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntryPlaceholderText val = constructObjectPropertyString "placeholder-text" (Just val)
clearEntryPlaceholderText :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryPlaceholderText obj = liftIO $ setObjectPropertyString obj "placeholder-text" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntryPlaceholderTextPropertyInfo
instance AttrInfo EntryPlaceholderTextPropertyInfo where
type AttrAllowedOps EntryPlaceholderTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryPlaceholderTextPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntryPlaceholderTextPropertyInfo = IsEntry
type AttrGetType EntryPlaceholderTextPropertyInfo = T.Text
type AttrLabel EntryPlaceholderTextPropertyInfo = "placeholder-text"
type AttrOrigin EntryPlaceholderTextPropertyInfo = Entry
attrGet _ = getEntryPlaceholderText
attrSet _ = setEntryPlaceholderText
attrConstruct _ = constructEntryPlaceholderText
attrClear _ = clearEntryPlaceholderText
#endif
getEntryPopulateAll :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryPopulateAll obj = liftIO $ getObjectPropertyBool obj "populate-all"
setEntryPopulateAll :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryPopulateAll obj val = liftIO $ setObjectPropertyBool obj "populate-all" val
constructEntryPopulateAll :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryPopulateAll val = constructObjectPropertyBool "populate-all" val
#if ENABLE_OVERLOADING
data EntryPopulateAllPropertyInfo
instance AttrInfo EntryPopulateAllPropertyInfo where
type AttrAllowedOps EntryPopulateAllPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryPopulateAllPropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryPopulateAllPropertyInfo = IsEntry
type AttrGetType EntryPopulateAllPropertyInfo = Bool
type AttrLabel EntryPopulateAllPropertyInfo = "populate-all"
type AttrOrigin EntryPopulateAllPropertyInfo = Entry
attrGet _ = getEntryPopulateAll
attrSet _ = setEntryPopulateAll
attrConstruct _ = constructEntryPopulateAll
attrClear _ = undefined
#endif
getEntryPrimaryIconActivatable :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryPrimaryIconActivatable obj = liftIO $ getObjectPropertyBool obj "primary-icon-activatable"
setEntryPrimaryIconActivatable :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryPrimaryIconActivatable obj val = liftIO $ setObjectPropertyBool obj "primary-icon-activatable" val
constructEntryPrimaryIconActivatable :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryPrimaryIconActivatable val = constructObjectPropertyBool "primary-icon-activatable" val
#if ENABLE_OVERLOADING
data EntryPrimaryIconActivatablePropertyInfo
instance AttrInfo EntryPrimaryIconActivatablePropertyInfo where
type AttrAllowedOps EntryPrimaryIconActivatablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryPrimaryIconActivatablePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryPrimaryIconActivatablePropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconActivatablePropertyInfo = Bool
type AttrLabel EntryPrimaryIconActivatablePropertyInfo = "primary-icon-activatable"
type AttrOrigin EntryPrimaryIconActivatablePropertyInfo = Entry
attrGet _ = getEntryPrimaryIconActivatable
attrSet _ = setEntryPrimaryIconActivatable
attrConstruct _ = constructEntryPrimaryIconActivatable
attrClear _ = undefined
#endif
getEntryPrimaryIconGicon :: (MonadIO m, IsEntry o) => o -> m (Maybe Gio.Icon.Icon)
getEntryPrimaryIconGicon obj = liftIO $ getObjectPropertyObject obj "primary-icon-gicon" Gio.Icon.Icon
setEntryPrimaryIconGicon :: (MonadIO m, IsEntry o, Gio.Icon.IsIcon a) => o -> a -> m ()
setEntryPrimaryIconGicon obj val = liftIO $ setObjectPropertyObject obj "primary-icon-gicon" (Just val)
constructEntryPrimaryIconGicon :: (IsEntry o, Gio.Icon.IsIcon a) => a -> IO (GValueConstruct o)
constructEntryPrimaryIconGicon val = constructObjectPropertyObject "primary-icon-gicon" (Just val)
clearEntryPrimaryIconGicon :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryPrimaryIconGicon obj = liftIO $ setObjectPropertyObject obj "primary-icon-gicon" (Nothing :: Maybe Gio.Icon.Icon)
#if ENABLE_OVERLOADING
data EntryPrimaryIconGiconPropertyInfo
instance AttrInfo EntryPrimaryIconGiconPropertyInfo where
type AttrAllowedOps EntryPrimaryIconGiconPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryPrimaryIconGiconPropertyInfo = Gio.Icon.IsIcon
type AttrBaseTypeConstraint EntryPrimaryIconGiconPropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconGiconPropertyInfo = (Maybe Gio.Icon.Icon)
type AttrLabel EntryPrimaryIconGiconPropertyInfo = "primary-icon-gicon"
type AttrOrigin EntryPrimaryIconGiconPropertyInfo = Entry
attrGet _ = getEntryPrimaryIconGicon
attrSet _ = setEntryPrimaryIconGicon
attrConstruct _ = constructEntryPrimaryIconGicon
attrClear _ = clearEntryPrimaryIconGicon
#endif
getEntryPrimaryIconName :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntryPrimaryIconName obj = liftIO $ getObjectPropertyString obj "primary-icon-name"
setEntryPrimaryIconName :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryPrimaryIconName obj val = liftIO $ setObjectPropertyString obj "primary-icon-name" (Just val)
constructEntryPrimaryIconName :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntryPrimaryIconName val = constructObjectPropertyString "primary-icon-name" (Just val)
clearEntryPrimaryIconName :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryPrimaryIconName obj = liftIO $ setObjectPropertyString obj "primary-icon-name" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntryPrimaryIconNamePropertyInfo
instance AttrInfo EntryPrimaryIconNamePropertyInfo where
type AttrAllowedOps EntryPrimaryIconNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryPrimaryIconNamePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntryPrimaryIconNamePropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconNamePropertyInfo = (Maybe T.Text)
type AttrLabel EntryPrimaryIconNamePropertyInfo = "primary-icon-name"
type AttrOrigin EntryPrimaryIconNamePropertyInfo = Entry
attrGet _ = getEntryPrimaryIconName
attrSet _ = setEntryPrimaryIconName
attrConstruct _ = constructEntryPrimaryIconName
attrClear _ = clearEntryPrimaryIconName
#endif
getEntryPrimaryIconPixbuf :: (MonadIO m, IsEntry o) => o -> m (Maybe GdkPixbuf.Pixbuf.Pixbuf)
getEntryPrimaryIconPixbuf obj = liftIO $ getObjectPropertyObject obj "primary-icon-pixbuf" GdkPixbuf.Pixbuf.Pixbuf
setEntryPrimaryIconPixbuf :: (MonadIO m, IsEntry o, GdkPixbuf.Pixbuf.IsPixbuf a) => o -> a -> m ()
setEntryPrimaryIconPixbuf obj val = liftIO $ setObjectPropertyObject obj "primary-icon-pixbuf" (Just val)
constructEntryPrimaryIconPixbuf :: (IsEntry o, GdkPixbuf.Pixbuf.IsPixbuf a) => a -> IO (GValueConstruct o)
constructEntryPrimaryIconPixbuf val = constructObjectPropertyObject "primary-icon-pixbuf" (Just val)
clearEntryPrimaryIconPixbuf :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryPrimaryIconPixbuf obj = liftIO $ setObjectPropertyObject obj "primary-icon-pixbuf" (Nothing :: Maybe GdkPixbuf.Pixbuf.Pixbuf)
#if ENABLE_OVERLOADING
data EntryPrimaryIconPixbufPropertyInfo
instance AttrInfo EntryPrimaryIconPixbufPropertyInfo where
type AttrAllowedOps EntryPrimaryIconPixbufPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryPrimaryIconPixbufPropertyInfo = GdkPixbuf.Pixbuf.IsPixbuf
type AttrBaseTypeConstraint EntryPrimaryIconPixbufPropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconPixbufPropertyInfo = (Maybe GdkPixbuf.Pixbuf.Pixbuf)
type AttrLabel EntryPrimaryIconPixbufPropertyInfo = "primary-icon-pixbuf"
type AttrOrigin EntryPrimaryIconPixbufPropertyInfo = Entry
attrGet _ = getEntryPrimaryIconPixbuf
attrSet _ = setEntryPrimaryIconPixbuf
attrConstruct _ = constructEntryPrimaryIconPixbuf
attrClear _ = clearEntryPrimaryIconPixbuf
#endif
getEntryPrimaryIconSensitive :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryPrimaryIconSensitive obj = liftIO $ getObjectPropertyBool obj "primary-icon-sensitive"
setEntryPrimaryIconSensitive :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryPrimaryIconSensitive obj val = liftIO $ setObjectPropertyBool obj "primary-icon-sensitive" val
constructEntryPrimaryIconSensitive :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryPrimaryIconSensitive val = constructObjectPropertyBool "primary-icon-sensitive" val
#if ENABLE_OVERLOADING
data EntryPrimaryIconSensitivePropertyInfo
instance AttrInfo EntryPrimaryIconSensitivePropertyInfo where
type AttrAllowedOps EntryPrimaryIconSensitivePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryPrimaryIconSensitivePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryPrimaryIconSensitivePropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconSensitivePropertyInfo = Bool
type AttrLabel EntryPrimaryIconSensitivePropertyInfo = "primary-icon-sensitive"
type AttrOrigin EntryPrimaryIconSensitivePropertyInfo = Entry
attrGet _ = getEntryPrimaryIconSensitive
attrSet _ = setEntryPrimaryIconSensitive
attrConstruct _ = constructEntryPrimaryIconSensitive
attrClear _ = undefined
#endif
getEntryPrimaryIconStock :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntryPrimaryIconStock obj = liftIO $ getObjectPropertyString obj "primary-icon-stock"
setEntryPrimaryIconStock :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryPrimaryIconStock obj val = liftIO $ setObjectPropertyString obj "primary-icon-stock" (Just val)
constructEntryPrimaryIconStock :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntryPrimaryIconStock val = constructObjectPropertyString "primary-icon-stock" (Just val)
clearEntryPrimaryIconStock :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryPrimaryIconStock obj = liftIO $ setObjectPropertyString obj "primary-icon-stock" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntryPrimaryIconStockPropertyInfo
instance AttrInfo EntryPrimaryIconStockPropertyInfo where
type AttrAllowedOps EntryPrimaryIconStockPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryPrimaryIconStockPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntryPrimaryIconStockPropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconStockPropertyInfo = (Maybe T.Text)
type AttrLabel EntryPrimaryIconStockPropertyInfo = "primary-icon-stock"
type AttrOrigin EntryPrimaryIconStockPropertyInfo = Entry
attrGet _ = getEntryPrimaryIconStock
attrSet _ = setEntryPrimaryIconStock
attrConstruct _ = constructEntryPrimaryIconStock
attrClear _ = clearEntryPrimaryIconStock
#endif
getEntryPrimaryIconStorageType :: (MonadIO m, IsEntry o) => o -> m Gtk.Enums.ImageType
getEntryPrimaryIconStorageType obj = liftIO $ getObjectPropertyEnum obj "primary-icon-storage-type"
#if ENABLE_OVERLOADING
data EntryPrimaryIconStorageTypePropertyInfo
instance AttrInfo EntryPrimaryIconStorageTypePropertyInfo where
type AttrAllowedOps EntryPrimaryIconStorageTypePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint EntryPrimaryIconStorageTypePropertyInfo = (~) ()
type AttrBaseTypeConstraint EntryPrimaryIconStorageTypePropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconStorageTypePropertyInfo = Gtk.Enums.ImageType
type AttrLabel EntryPrimaryIconStorageTypePropertyInfo = "primary-icon-storage-type"
type AttrOrigin EntryPrimaryIconStorageTypePropertyInfo = Entry
attrGet _ = getEntryPrimaryIconStorageType
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
getEntryPrimaryIconTooltipMarkup :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntryPrimaryIconTooltipMarkup obj = liftIO $ getObjectPropertyString obj "primary-icon-tooltip-markup"
setEntryPrimaryIconTooltipMarkup :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryPrimaryIconTooltipMarkup obj val = liftIO $ setObjectPropertyString obj "primary-icon-tooltip-markup" (Just val)
constructEntryPrimaryIconTooltipMarkup :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntryPrimaryIconTooltipMarkup val = constructObjectPropertyString "primary-icon-tooltip-markup" (Just val)
clearEntryPrimaryIconTooltipMarkup :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryPrimaryIconTooltipMarkup obj = liftIO $ setObjectPropertyString obj "primary-icon-tooltip-markup" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntryPrimaryIconTooltipMarkupPropertyInfo
instance AttrInfo EntryPrimaryIconTooltipMarkupPropertyInfo where
type AttrAllowedOps EntryPrimaryIconTooltipMarkupPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryPrimaryIconTooltipMarkupPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntryPrimaryIconTooltipMarkupPropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconTooltipMarkupPropertyInfo = (Maybe T.Text)
type AttrLabel EntryPrimaryIconTooltipMarkupPropertyInfo = "primary-icon-tooltip-markup"
type AttrOrigin EntryPrimaryIconTooltipMarkupPropertyInfo = Entry
attrGet _ = getEntryPrimaryIconTooltipMarkup
attrSet _ = setEntryPrimaryIconTooltipMarkup
attrConstruct _ = constructEntryPrimaryIconTooltipMarkup
attrClear _ = clearEntryPrimaryIconTooltipMarkup
#endif
getEntryPrimaryIconTooltipText :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntryPrimaryIconTooltipText obj = liftIO $ getObjectPropertyString obj "primary-icon-tooltip-text"
setEntryPrimaryIconTooltipText :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryPrimaryIconTooltipText obj val = liftIO $ setObjectPropertyString obj "primary-icon-tooltip-text" (Just val)
constructEntryPrimaryIconTooltipText :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntryPrimaryIconTooltipText val = constructObjectPropertyString "primary-icon-tooltip-text" (Just val)
clearEntryPrimaryIconTooltipText :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryPrimaryIconTooltipText obj = liftIO $ setObjectPropertyString obj "primary-icon-tooltip-text" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntryPrimaryIconTooltipTextPropertyInfo
instance AttrInfo EntryPrimaryIconTooltipTextPropertyInfo where
type AttrAllowedOps EntryPrimaryIconTooltipTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntryPrimaryIconTooltipTextPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntryPrimaryIconTooltipTextPropertyInfo = IsEntry
type AttrGetType EntryPrimaryIconTooltipTextPropertyInfo = (Maybe T.Text)
type AttrLabel EntryPrimaryIconTooltipTextPropertyInfo = "primary-icon-tooltip-text"
type AttrOrigin EntryPrimaryIconTooltipTextPropertyInfo = Entry
attrGet _ = getEntryPrimaryIconTooltipText
attrSet _ = setEntryPrimaryIconTooltipText
attrConstruct _ = constructEntryPrimaryIconTooltipText
attrClear _ = clearEntryPrimaryIconTooltipText
#endif
getEntryProgressFraction :: (MonadIO m, IsEntry o) => o -> m Double
getEntryProgressFraction obj = liftIO $ getObjectPropertyDouble obj "progress-fraction"
setEntryProgressFraction :: (MonadIO m, IsEntry o) => o -> Double -> m ()
setEntryProgressFraction obj val = liftIO $ setObjectPropertyDouble obj "progress-fraction" val
constructEntryProgressFraction :: (IsEntry o) => Double -> IO (GValueConstruct o)
constructEntryProgressFraction val = constructObjectPropertyDouble "progress-fraction" val
#if ENABLE_OVERLOADING
data EntryProgressFractionPropertyInfo
instance AttrInfo EntryProgressFractionPropertyInfo where
type AttrAllowedOps EntryProgressFractionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryProgressFractionPropertyInfo = (~) Double
type AttrBaseTypeConstraint EntryProgressFractionPropertyInfo = IsEntry
type AttrGetType EntryProgressFractionPropertyInfo = Double
type AttrLabel EntryProgressFractionPropertyInfo = "progress-fraction"
type AttrOrigin EntryProgressFractionPropertyInfo = Entry
attrGet _ = getEntryProgressFraction
attrSet _ = setEntryProgressFraction
attrConstruct _ = constructEntryProgressFraction
attrClear _ = undefined
#endif
getEntryProgressPulseStep :: (MonadIO m, IsEntry o) => o -> m Double
getEntryProgressPulseStep obj = liftIO $ getObjectPropertyDouble obj "progress-pulse-step"
setEntryProgressPulseStep :: (MonadIO m, IsEntry o) => o -> Double -> m ()
setEntryProgressPulseStep obj val = liftIO $ setObjectPropertyDouble obj "progress-pulse-step" val
constructEntryProgressPulseStep :: (IsEntry o) => Double -> IO (GValueConstruct o)
constructEntryProgressPulseStep val = constructObjectPropertyDouble "progress-pulse-step" val
#if ENABLE_OVERLOADING
data EntryProgressPulseStepPropertyInfo
instance AttrInfo EntryProgressPulseStepPropertyInfo where
type AttrAllowedOps EntryProgressPulseStepPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryProgressPulseStepPropertyInfo = (~) Double
type AttrBaseTypeConstraint EntryProgressPulseStepPropertyInfo = IsEntry
type AttrGetType EntryProgressPulseStepPropertyInfo = Double
type AttrLabel EntryProgressPulseStepPropertyInfo = "progress-pulse-step"
type AttrOrigin EntryProgressPulseStepPropertyInfo = Entry
attrGet _ = getEntryProgressPulseStep
attrSet _ = setEntryProgressPulseStep
attrConstruct _ = constructEntryProgressPulseStep
attrClear _ = undefined
#endif
getEntryScrollOffset :: (MonadIO m, IsEntry o) => o -> m Int32
getEntryScrollOffset obj = liftIO $ getObjectPropertyInt32 obj "scroll-offset"
#if ENABLE_OVERLOADING
data EntryScrollOffsetPropertyInfo
instance AttrInfo EntryScrollOffsetPropertyInfo where
type AttrAllowedOps EntryScrollOffsetPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint EntryScrollOffsetPropertyInfo = (~) ()
type AttrBaseTypeConstraint EntryScrollOffsetPropertyInfo = IsEntry
type AttrGetType EntryScrollOffsetPropertyInfo = Int32
type AttrLabel EntryScrollOffsetPropertyInfo = "scroll-offset"
type AttrOrigin EntryScrollOffsetPropertyInfo = Entry
attrGet _ = getEntryScrollOffset
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
getEntrySecondaryIconActivatable :: (MonadIO m, IsEntry o) => o -> m Bool
getEntrySecondaryIconActivatable obj = liftIO $ getObjectPropertyBool obj "secondary-icon-activatable"
setEntrySecondaryIconActivatable :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntrySecondaryIconActivatable obj val = liftIO $ setObjectPropertyBool obj "secondary-icon-activatable" val
constructEntrySecondaryIconActivatable :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntrySecondaryIconActivatable val = constructObjectPropertyBool "secondary-icon-activatable" val
#if ENABLE_OVERLOADING
data EntrySecondaryIconActivatablePropertyInfo
instance AttrInfo EntrySecondaryIconActivatablePropertyInfo where
type AttrAllowedOps EntrySecondaryIconActivatablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntrySecondaryIconActivatablePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntrySecondaryIconActivatablePropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconActivatablePropertyInfo = Bool
type AttrLabel EntrySecondaryIconActivatablePropertyInfo = "secondary-icon-activatable"
type AttrOrigin EntrySecondaryIconActivatablePropertyInfo = Entry
attrGet _ = getEntrySecondaryIconActivatable
attrSet _ = setEntrySecondaryIconActivatable
attrConstruct _ = constructEntrySecondaryIconActivatable
attrClear _ = undefined
#endif
getEntrySecondaryIconGicon :: (MonadIO m, IsEntry o) => o -> m (Maybe Gio.Icon.Icon)
getEntrySecondaryIconGicon obj = liftIO $ getObjectPropertyObject obj "secondary-icon-gicon" Gio.Icon.Icon
setEntrySecondaryIconGicon :: (MonadIO m, IsEntry o, Gio.Icon.IsIcon a) => o -> a -> m ()
setEntrySecondaryIconGicon obj val = liftIO $ setObjectPropertyObject obj "secondary-icon-gicon" (Just val)
constructEntrySecondaryIconGicon :: (IsEntry o, Gio.Icon.IsIcon a) => a -> IO (GValueConstruct o)
constructEntrySecondaryIconGicon val = constructObjectPropertyObject "secondary-icon-gicon" (Just val)
clearEntrySecondaryIconGicon :: (MonadIO m, IsEntry o) => o -> m ()
clearEntrySecondaryIconGicon obj = liftIO $ setObjectPropertyObject obj "secondary-icon-gicon" (Nothing :: Maybe Gio.Icon.Icon)
#if ENABLE_OVERLOADING
data EntrySecondaryIconGiconPropertyInfo
instance AttrInfo EntrySecondaryIconGiconPropertyInfo where
type AttrAllowedOps EntrySecondaryIconGiconPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntrySecondaryIconGiconPropertyInfo = Gio.Icon.IsIcon
type AttrBaseTypeConstraint EntrySecondaryIconGiconPropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconGiconPropertyInfo = (Maybe Gio.Icon.Icon)
type AttrLabel EntrySecondaryIconGiconPropertyInfo = "secondary-icon-gicon"
type AttrOrigin EntrySecondaryIconGiconPropertyInfo = Entry
attrGet _ = getEntrySecondaryIconGicon
attrSet _ = setEntrySecondaryIconGicon
attrConstruct _ = constructEntrySecondaryIconGicon
attrClear _ = clearEntrySecondaryIconGicon
#endif
getEntrySecondaryIconName :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntrySecondaryIconName obj = liftIO $ getObjectPropertyString obj "secondary-icon-name"
setEntrySecondaryIconName :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntrySecondaryIconName obj val = liftIO $ setObjectPropertyString obj "secondary-icon-name" (Just val)
constructEntrySecondaryIconName :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntrySecondaryIconName val = constructObjectPropertyString "secondary-icon-name" (Just val)
clearEntrySecondaryIconName :: (MonadIO m, IsEntry o) => o -> m ()
clearEntrySecondaryIconName obj = liftIO $ setObjectPropertyString obj "secondary-icon-name" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntrySecondaryIconNamePropertyInfo
instance AttrInfo EntrySecondaryIconNamePropertyInfo where
type AttrAllowedOps EntrySecondaryIconNamePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntrySecondaryIconNamePropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntrySecondaryIconNamePropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconNamePropertyInfo = (Maybe T.Text)
type AttrLabel EntrySecondaryIconNamePropertyInfo = "secondary-icon-name"
type AttrOrigin EntrySecondaryIconNamePropertyInfo = Entry
attrGet _ = getEntrySecondaryIconName
attrSet _ = setEntrySecondaryIconName
attrConstruct _ = constructEntrySecondaryIconName
attrClear _ = clearEntrySecondaryIconName
#endif
getEntrySecondaryIconPixbuf :: (MonadIO m, IsEntry o) => o -> m (Maybe GdkPixbuf.Pixbuf.Pixbuf)
getEntrySecondaryIconPixbuf obj = liftIO $ getObjectPropertyObject obj "secondary-icon-pixbuf" GdkPixbuf.Pixbuf.Pixbuf
setEntrySecondaryIconPixbuf :: (MonadIO m, IsEntry o, GdkPixbuf.Pixbuf.IsPixbuf a) => o -> a -> m ()
setEntrySecondaryIconPixbuf obj val = liftIO $ setObjectPropertyObject obj "secondary-icon-pixbuf" (Just val)
constructEntrySecondaryIconPixbuf :: (IsEntry o, GdkPixbuf.Pixbuf.IsPixbuf a) => a -> IO (GValueConstruct o)
constructEntrySecondaryIconPixbuf val = constructObjectPropertyObject "secondary-icon-pixbuf" (Just val)
clearEntrySecondaryIconPixbuf :: (MonadIO m, IsEntry o) => o -> m ()
clearEntrySecondaryIconPixbuf obj = liftIO $ setObjectPropertyObject obj "secondary-icon-pixbuf" (Nothing :: Maybe GdkPixbuf.Pixbuf.Pixbuf)
#if ENABLE_OVERLOADING
data EntrySecondaryIconPixbufPropertyInfo
instance AttrInfo EntrySecondaryIconPixbufPropertyInfo where
type AttrAllowedOps EntrySecondaryIconPixbufPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntrySecondaryIconPixbufPropertyInfo = GdkPixbuf.Pixbuf.IsPixbuf
type AttrBaseTypeConstraint EntrySecondaryIconPixbufPropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconPixbufPropertyInfo = (Maybe GdkPixbuf.Pixbuf.Pixbuf)
type AttrLabel EntrySecondaryIconPixbufPropertyInfo = "secondary-icon-pixbuf"
type AttrOrigin EntrySecondaryIconPixbufPropertyInfo = Entry
attrGet _ = getEntrySecondaryIconPixbuf
attrSet _ = setEntrySecondaryIconPixbuf
attrConstruct _ = constructEntrySecondaryIconPixbuf
attrClear _ = clearEntrySecondaryIconPixbuf
#endif
getEntrySecondaryIconSensitive :: (MonadIO m, IsEntry o) => o -> m Bool
getEntrySecondaryIconSensitive obj = liftIO $ getObjectPropertyBool obj "secondary-icon-sensitive"
setEntrySecondaryIconSensitive :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntrySecondaryIconSensitive obj val = liftIO $ setObjectPropertyBool obj "secondary-icon-sensitive" val
constructEntrySecondaryIconSensitive :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntrySecondaryIconSensitive val = constructObjectPropertyBool "secondary-icon-sensitive" val
#if ENABLE_OVERLOADING
data EntrySecondaryIconSensitivePropertyInfo
instance AttrInfo EntrySecondaryIconSensitivePropertyInfo where
type AttrAllowedOps EntrySecondaryIconSensitivePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntrySecondaryIconSensitivePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntrySecondaryIconSensitivePropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconSensitivePropertyInfo = Bool
type AttrLabel EntrySecondaryIconSensitivePropertyInfo = "secondary-icon-sensitive"
type AttrOrigin EntrySecondaryIconSensitivePropertyInfo = Entry
attrGet _ = getEntrySecondaryIconSensitive
attrSet _ = setEntrySecondaryIconSensitive
attrConstruct _ = constructEntrySecondaryIconSensitive
attrClear _ = undefined
#endif
getEntrySecondaryIconStock :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntrySecondaryIconStock obj = liftIO $ getObjectPropertyString obj "secondary-icon-stock"
setEntrySecondaryIconStock :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntrySecondaryIconStock obj val = liftIO $ setObjectPropertyString obj "secondary-icon-stock" (Just val)
constructEntrySecondaryIconStock :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntrySecondaryIconStock val = constructObjectPropertyString "secondary-icon-stock" (Just val)
clearEntrySecondaryIconStock :: (MonadIO m, IsEntry o) => o -> m ()
clearEntrySecondaryIconStock obj = liftIO $ setObjectPropertyString obj "secondary-icon-stock" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntrySecondaryIconStockPropertyInfo
instance AttrInfo EntrySecondaryIconStockPropertyInfo where
type AttrAllowedOps EntrySecondaryIconStockPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntrySecondaryIconStockPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntrySecondaryIconStockPropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconStockPropertyInfo = (Maybe T.Text)
type AttrLabel EntrySecondaryIconStockPropertyInfo = "secondary-icon-stock"
type AttrOrigin EntrySecondaryIconStockPropertyInfo = Entry
attrGet _ = getEntrySecondaryIconStock
attrSet _ = setEntrySecondaryIconStock
attrConstruct _ = constructEntrySecondaryIconStock
attrClear _ = clearEntrySecondaryIconStock
#endif
getEntrySecondaryIconStorageType :: (MonadIO m, IsEntry o) => o -> m Gtk.Enums.ImageType
getEntrySecondaryIconStorageType obj = liftIO $ getObjectPropertyEnum obj "secondary-icon-storage-type"
#if ENABLE_OVERLOADING
data EntrySecondaryIconStorageTypePropertyInfo
instance AttrInfo EntrySecondaryIconStorageTypePropertyInfo where
type AttrAllowedOps EntrySecondaryIconStorageTypePropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint EntrySecondaryIconStorageTypePropertyInfo = (~) ()
type AttrBaseTypeConstraint EntrySecondaryIconStorageTypePropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconStorageTypePropertyInfo = Gtk.Enums.ImageType
type AttrLabel EntrySecondaryIconStorageTypePropertyInfo = "secondary-icon-storage-type"
type AttrOrigin EntrySecondaryIconStorageTypePropertyInfo = Entry
attrGet _ = getEntrySecondaryIconStorageType
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
getEntrySecondaryIconTooltipMarkup :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntrySecondaryIconTooltipMarkup obj = liftIO $ getObjectPropertyString obj "secondary-icon-tooltip-markup"
setEntrySecondaryIconTooltipMarkup :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntrySecondaryIconTooltipMarkup obj val = liftIO $ setObjectPropertyString obj "secondary-icon-tooltip-markup" (Just val)
constructEntrySecondaryIconTooltipMarkup :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntrySecondaryIconTooltipMarkup val = constructObjectPropertyString "secondary-icon-tooltip-markup" (Just val)
clearEntrySecondaryIconTooltipMarkup :: (MonadIO m, IsEntry o) => o -> m ()
clearEntrySecondaryIconTooltipMarkup obj = liftIO $ setObjectPropertyString obj "secondary-icon-tooltip-markup" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntrySecondaryIconTooltipMarkupPropertyInfo
instance AttrInfo EntrySecondaryIconTooltipMarkupPropertyInfo where
type AttrAllowedOps EntrySecondaryIconTooltipMarkupPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntrySecondaryIconTooltipMarkupPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntrySecondaryIconTooltipMarkupPropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconTooltipMarkupPropertyInfo = (Maybe T.Text)
type AttrLabel EntrySecondaryIconTooltipMarkupPropertyInfo = "secondary-icon-tooltip-markup"
type AttrOrigin EntrySecondaryIconTooltipMarkupPropertyInfo = Entry
attrGet _ = getEntrySecondaryIconTooltipMarkup
attrSet _ = setEntrySecondaryIconTooltipMarkup
attrConstruct _ = constructEntrySecondaryIconTooltipMarkup
attrClear _ = clearEntrySecondaryIconTooltipMarkup
#endif
getEntrySecondaryIconTooltipText :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntrySecondaryIconTooltipText obj = liftIO $ getObjectPropertyString obj "secondary-icon-tooltip-text"
setEntrySecondaryIconTooltipText :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntrySecondaryIconTooltipText obj val = liftIO $ setObjectPropertyString obj "secondary-icon-tooltip-text" (Just val)
constructEntrySecondaryIconTooltipText :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntrySecondaryIconTooltipText val = constructObjectPropertyString "secondary-icon-tooltip-text" (Just val)
clearEntrySecondaryIconTooltipText :: (MonadIO m, IsEntry o) => o -> m ()
clearEntrySecondaryIconTooltipText obj = liftIO $ setObjectPropertyString obj "secondary-icon-tooltip-text" (Nothing :: Maybe T.Text)
#if ENABLE_OVERLOADING
data EntrySecondaryIconTooltipTextPropertyInfo
instance AttrInfo EntrySecondaryIconTooltipTextPropertyInfo where
type AttrAllowedOps EntrySecondaryIconTooltipTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint EntrySecondaryIconTooltipTextPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntrySecondaryIconTooltipTextPropertyInfo = IsEntry
type AttrGetType EntrySecondaryIconTooltipTextPropertyInfo = (Maybe T.Text)
type AttrLabel EntrySecondaryIconTooltipTextPropertyInfo = "secondary-icon-tooltip-text"
type AttrOrigin EntrySecondaryIconTooltipTextPropertyInfo = Entry
attrGet _ = getEntrySecondaryIconTooltipText
attrSet _ = setEntrySecondaryIconTooltipText
attrConstruct _ = constructEntrySecondaryIconTooltipText
attrClear _ = clearEntrySecondaryIconTooltipText
#endif
getEntrySelectionBound :: (MonadIO m, IsEntry o) => o -> m Int32
getEntrySelectionBound obj = liftIO $ getObjectPropertyInt32 obj "selection-bound"
#if ENABLE_OVERLOADING
data EntrySelectionBoundPropertyInfo
instance AttrInfo EntrySelectionBoundPropertyInfo where
type AttrAllowedOps EntrySelectionBoundPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint EntrySelectionBoundPropertyInfo = (~) ()
type AttrBaseTypeConstraint EntrySelectionBoundPropertyInfo = IsEntry
type AttrGetType EntrySelectionBoundPropertyInfo = Int32
type AttrLabel EntrySelectionBoundPropertyInfo = "selection-bound"
type AttrOrigin EntrySelectionBoundPropertyInfo = Entry
attrGet _ = getEntrySelectionBound
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
getEntryShadowType :: (MonadIO m, IsEntry o) => o -> m Gtk.Enums.ShadowType
getEntryShadowType obj = liftIO $ getObjectPropertyEnum obj "shadow-type"
setEntryShadowType :: (MonadIO m, IsEntry o) => o -> Gtk.Enums.ShadowType -> m ()
setEntryShadowType obj val = liftIO $ setObjectPropertyEnum obj "shadow-type" val
constructEntryShadowType :: (IsEntry o) => Gtk.Enums.ShadowType -> IO (GValueConstruct o)
constructEntryShadowType val = constructObjectPropertyEnum "shadow-type" val
#if ENABLE_OVERLOADING
data EntryShadowTypePropertyInfo
instance AttrInfo EntryShadowTypePropertyInfo where
type AttrAllowedOps EntryShadowTypePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryShadowTypePropertyInfo = (~) Gtk.Enums.ShadowType
type AttrBaseTypeConstraint EntryShadowTypePropertyInfo = IsEntry
type AttrGetType EntryShadowTypePropertyInfo = Gtk.Enums.ShadowType
type AttrLabel EntryShadowTypePropertyInfo = "shadow-type"
type AttrOrigin EntryShadowTypePropertyInfo = Entry
attrGet _ = getEntryShadowType
attrSet _ = setEntryShadowType
attrConstruct _ = constructEntryShadowType
attrClear _ = undefined
#endif
getEntryShowEmojiIcon :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryShowEmojiIcon obj = liftIO $ getObjectPropertyBool obj "show-emoji-icon"
setEntryShowEmojiIcon :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryShowEmojiIcon obj val = liftIO $ setObjectPropertyBool obj "show-emoji-icon" val
constructEntryShowEmojiIcon :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryShowEmojiIcon val = constructObjectPropertyBool "show-emoji-icon" val
#if ENABLE_OVERLOADING
data EntryShowEmojiIconPropertyInfo
instance AttrInfo EntryShowEmojiIconPropertyInfo where
type AttrAllowedOps EntryShowEmojiIconPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryShowEmojiIconPropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryShowEmojiIconPropertyInfo = IsEntry
type AttrGetType EntryShowEmojiIconPropertyInfo = Bool
type AttrLabel EntryShowEmojiIconPropertyInfo = "show-emoji-icon"
type AttrOrigin EntryShowEmojiIconPropertyInfo = Entry
attrGet _ = getEntryShowEmojiIcon
attrSet _ = setEntryShowEmojiIcon
attrConstruct _ = constructEntryShowEmojiIcon
attrClear _ = undefined
#endif
getEntryTabs :: (MonadIO m, IsEntry o) => o -> m (Maybe Pango.TabArray.TabArray)
getEntryTabs obj = liftIO $ getObjectPropertyBoxed obj "tabs" Pango.TabArray.TabArray
setEntryTabs :: (MonadIO m, IsEntry o) => o -> Pango.TabArray.TabArray -> m ()
setEntryTabs obj val = liftIO $ setObjectPropertyBoxed obj "tabs" (Just val)
constructEntryTabs :: (IsEntry o) => Pango.TabArray.TabArray -> IO (GValueConstruct o)
constructEntryTabs val = constructObjectPropertyBoxed "tabs" (Just val)
#if ENABLE_OVERLOADING
data EntryTabsPropertyInfo
instance AttrInfo EntryTabsPropertyInfo where
type AttrAllowedOps EntryTabsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryTabsPropertyInfo = (~) Pango.TabArray.TabArray
type AttrBaseTypeConstraint EntryTabsPropertyInfo = IsEntry
type AttrGetType EntryTabsPropertyInfo = (Maybe Pango.TabArray.TabArray)
type AttrLabel EntryTabsPropertyInfo = "tabs"
type AttrOrigin EntryTabsPropertyInfo = Entry
attrGet _ = getEntryTabs
attrSet _ = setEntryTabs
attrConstruct _ = constructEntryTabs
attrClear _ = undefined
#endif
getEntryText :: (MonadIO m, IsEntry o) => o -> m T.Text
getEntryText obj = liftIO $ checkUnexpectedNothing "getEntryText" $ getObjectPropertyString obj "text"
setEntryText :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryText obj val = liftIO $ setObjectPropertyString obj "text" (Just val)
constructEntryText :: (IsEntry o) => T.Text -> IO (GValueConstruct o)
constructEntryText val = constructObjectPropertyString "text" (Just val)
#if ENABLE_OVERLOADING
data EntryTextPropertyInfo
instance AttrInfo EntryTextPropertyInfo where
type AttrAllowedOps EntryTextPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryTextPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint EntryTextPropertyInfo = IsEntry
type AttrGetType EntryTextPropertyInfo = T.Text
type AttrLabel EntryTextPropertyInfo = "text"
type AttrOrigin EntryTextPropertyInfo = Entry
attrGet _ = getEntryText
attrSet _ = setEntryText
attrConstruct _ = constructEntryText
attrClear _ = undefined
#endif
getEntryTextLength :: (MonadIO m, IsEntry o) => o -> m Word32
getEntryTextLength obj = liftIO $ getObjectPropertyUInt32 obj "text-length"
#if ENABLE_OVERLOADING
data EntryTextLengthPropertyInfo
instance AttrInfo EntryTextLengthPropertyInfo where
type AttrAllowedOps EntryTextLengthPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint EntryTextLengthPropertyInfo = (~) ()
type AttrBaseTypeConstraint EntryTextLengthPropertyInfo = IsEntry
type AttrGetType EntryTextLengthPropertyInfo = Word32
type AttrLabel EntryTextLengthPropertyInfo = "text-length"
type AttrOrigin EntryTextLengthPropertyInfo = Entry
attrGet _ = getEntryTextLength
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
#endif
getEntryTruncateMultiline :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryTruncateMultiline obj = liftIO $ getObjectPropertyBool obj "truncate-multiline"
setEntryTruncateMultiline :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryTruncateMultiline obj val = liftIO $ setObjectPropertyBool obj "truncate-multiline" val
constructEntryTruncateMultiline :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryTruncateMultiline val = constructObjectPropertyBool "truncate-multiline" val
#if ENABLE_OVERLOADING
data EntryTruncateMultilinePropertyInfo
instance AttrInfo EntryTruncateMultilinePropertyInfo where
type AttrAllowedOps EntryTruncateMultilinePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryTruncateMultilinePropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryTruncateMultilinePropertyInfo = IsEntry
type AttrGetType EntryTruncateMultilinePropertyInfo = Bool
type AttrLabel EntryTruncateMultilinePropertyInfo = "truncate-multiline"
type AttrOrigin EntryTruncateMultilinePropertyInfo = Entry
attrGet _ = getEntryTruncateMultiline
attrSet _ = setEntryTruncateMultiline
attrConstruct _ = constructEntryTruncateMultiline
attrClear _ = undefined
#endif
getEntryVisibility :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryVisibility obj = liftIO $ getObjectPropertyBool obj "visibility"
setEntryVisibility :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryVisibility obj val = liftIO $ setObjectPropertyBool obj "visibility" val
constructEntryVisibility :: (IsEntry o) => Bool -> IO (GValueConstruct o)
constructEntryVisibility val = constructObjectPropertyBool "visibility" val
#if ENABLE_OVERLOADING
data EntryVisibilityPropertyInfo
instance AttrInfo EntryVisibilityPropertyInfo where
type AttrAllowedOps EntryVisibilityPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryVisibilityPropertyInfo = (~) Bool
type AttrBaseTypeConstraint EntryVisibilityPropertyInfo = IsEntry
type AttrGetType EntryVisibilityPropertyInfo = Bool
type AttrLabel EntryVisibilityPropertyInfo = "visibility"
type AttrOrigin EntryVisibilityPropertyInfo = Entry
attrGet _ = getEntryVisibility
attrSet _ = setEntryVisibility
attrConstruct _ = constructEntryVisibility
attrClear _ = undefined
#endif
getEntryWidthChars :: (MonadIO m, IsEntry o) => o -> m Int32
getEntryWidthChars obj = liftIO $ getObjectPropertyInt32 obj "width-chars"
setEntryWidthChars :: (MonadIO m, IsEntry o) => o -> Int32 -> m ()
setEntryWidthChars obj val = liftIO $ setObjectPropertyInt32 obj "width-chars" val
constructEntryWidthChars :: (IsEntry o) => Int32 -> IO (GValueConstruct o)
constructEntryWidthChars val = constructObjectPropertyInt32 "width-chars" val
#if ENABLE_OVERLOADING
data EntryWidthCharsPropertyInfo
instance AttrInfo EntryWidthCharsPropertyInfo where
type AttrAllowedOps EntryWidthCharsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryWidthCharsPropertyInfo = (~) Int32
type AttrBaseTypeConstraint EntryWidthCharsPropertyInfo = IsEntry
type AttrGetType EntryWidthCharsPropertyInfo = Int32
type AttrLabel EntryWidthCharsPropertyInfo = "width-chars"
type AttrOrigin EntryWidthCharsPropertyInfo = Entry
attrGet _ = getEntryWidthChars
attrSet _ = setEntryWidthChars
attrConstruct _ = constructEntryWidthChars
attrClear _ = undefined
#endif
getEntryXalign :: (MonadIO m, IsEntry o) => o -> m Float
getEntryXalign obj = liftIO $ getObjectPropertyFloat obj "xalign"
setEntryXalign :: (MonadIO m, IsEntry o) => o -> Float -> m ()
setEntryXalign obj val = liftIO $ setObjectPropertyFloat obj "xalign" val
constructEntryXalign :: (IsEntry o) => Float -> IO (GValueConstruct o)
constructEntryXalign val = constructObjectPropertyFloat "xalign" val
#if ENABLE_OVERLOADING
data EntryXalignPropertyInfo
instance AttrInfo EntryXalignPropertyInfo where
type AttrAllowedOps EntryXalignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint EntryXalignPropertyInfo = (~) Float
type AttrBaseTypeConstraint EntryXalignPropertyInfo = IsEntry
type AttrGetType EntryXalignPropertyInfo = Float
type AttrLabel EntryXalignPropertyInfo = "xalign"
type AttrOrigin EntryXalignPropertyInfo = Entry
attrGet _ = getEntryXalign
attrSet _ = setEntryXalign
attrConstruct _ = constructEntryXalign
attrClear _ = undefined
#endif
#if ENABLE_OVERLOADING
instance O.HasAttributeList Entry
type instance O.AttributeList Entry = EntryAttributeList
type EntryAttributeList = ('[ '("activatesDefault", EntryActivatesDefaultPropertyInfo), '("appPaintable", Gtk.Widget.WidgetAppPaintablePropertyInfo), '("attributes", EntryAttributesPropertyInfo), '("buffer", EntryBufferPropertyInfo), '("canDefault", Gtk.Widget.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("capsLockWarning", EntryCapsLockWarningPropertyInfo), '("completion", EntryCompletionPropertyInfo), '("compositeChild", Gtk.Widget.WidgetCompositeChildPropertyInfo), '("cursorPosition", EntryCursorPositionPropertyInfo), '("doubleBuffered", Gtk.Widget.WidgetDoubleBufferedPropertyInfo), '("editable", EntryEditablePropertyInfo), '("editingCanceled", Gtk.CellEditable.CellEditableEditingCanceledPropertyInfo), '("enableEmojiCompletion", EntryEnableEmojiCompletionPropertyInfo), '("events", Gtk.Widget.WidgetEventsPropertyInfo), '("expand", Gtk.Widget.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasFrame", EntryHasFramePropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("imModule", EntryImModulePropertyInfo), '("innerBorder", EntryInnerBorderPropertyInfo), '("inputHints", EntryInputHintsPropertyInfo), '("inputPurpose", EntryInputPurposePropertyInfo), '("invisibleChar", EntryInvisibleCharPropertyInfo), '("invisibleCharSet", EntryInvisibleCharSetPropertyInfo), '("isFocus", Gtk.Widget.WidgetIsFocusPropertyInfo), '("margin", Gtk.Widget.WidgetMarginPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.Widget.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.Widget.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("maxLength", EntryMaxLengthPropertyInfo), '("maxWidthChars", EntryMaxWidthCharsPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("noShowAll", Gtk.Widget.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("overwriteMode", EntryOverwriteModePropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("placeholderText", EntryPlaceholderTextPropertyInfo), '("populateAll", EntryPopulateAllPropertyInfo), '("primaryIconActivatable", EntryPrimaryIconActivatablePropertyInfo), '("primaryIconGicon", EntryPrimaryIconGiconPropertyInfo), '("primaryIconName", EntryPrimaryIconNamePropertyInfo), '("primaryIconPixbuf", EntryPrimaryIconPixbufPropertyInfo), '("primaryIconSensitive", EntryPrimaryIconSensitivePropertyInfo), '("primaryIconStock", EntryPrimaryIconStockPropertyInfo), '("primaryIconStorageType", EntryPrimaryIconStorageTypePropertyInfo), '("primaryIconTooltipMarkup", EntryPrimaryIconTooltipMarkupPropertyInfo), '("primaryIconTooltipText", EntryPrimaryIconTooltipTextPropertyInfo), '("progressFraction", EntryProgressFractionPropertyInfo), '("progressPulseStep", EntryProgressPulseStepPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("scrollOffset", EntryScrollOffsetPropertyInfo), '("secondaryIconActivatable", EntrySecondaryIconActivatablePropertyInfo), '("secondaryIconGicon", EntrySecondaryIconGiconPropertyInfo), '("secondaryIconName", EntrySecondaryIconNamePropertyInfo), '("secondaryIconPixbuf", EntrySecondaryIconPixbufPropertyInfo), '("secondaryIconSensitive", EntrySecondaryIconSensitivePropertyInfo), '("secondaryIconStock", EntrySecondaryIconStockPropertyInfo), '("secondaryIconStorageType", EntrySecondaryIconStorageTypePropertyInfo), '("secondaryIconTooltipMarkup", EntrySecondaryIconTooltipMarkupPropertyInfo), '("secondaryIconTooltipText", EntrySecondaryIconTooltipTextPropertyInfo), '("selectionBound", EntrySelectionBoundPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("shadowType", EntryShadowTypePropertyInfo), '("showEmojiIcon", EntryShowEmojiIconPropertyInfo), '("style", Gtk.Widget.WidgetStylePropertyInfo), '("tabs", EntryTabsPropertyInfo), '("text", EntryTextPropertyInfo), '("textLength", EntryTextLengthPropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("truncateMultiline", EntryTruncateMultilinePropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visibility", EntryVisibilityPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthChars", EntryWidthCharsPropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("window", Gtk.Widget.WidgetWindowPropertyInfo), '("xalign", EntryXalignPropertyInfo)] :: [(Symbol, *)])
#endif
#if ENABLE_OVERLOADING
entryActivatesDefault :: AttrLabelProxy "activatesDefault"
entryActivatesDefault = AttrLabelProxy
entryAttributes :: AttrLabelProxy "attributes"
entryAttributes = AttrLabelProxy
entryBuffer :: AttrLabelProxy "buffer"
entryBuffer = AttrLabelProxy
entryCapsLockWarning :: AttrLabelProxy "capsLockWarning"
entryCapsLockWarning = AttrLabelProxy
entryCompletion :: AttrLabelProxy "completion"
entryCompletion = AttrLabelProxy
entryCursorPosition :: AttrLabelProxy "cursorPosition"
entryCursorPosition = AttrLabelProxy
entryEditable :: AttrLabelProxy "editable"
entryEditable = AttrLabelProxy
entryEnableEmojiCompletion :: AttrLabelProxy "enableEmojiCompletion"
entryEnableEmojiCompletion = AttrLabelProxy
entryHasFrame :: AttrLabelProxy "hasFrame"
entryHasFrame = AttrLabelProxy
entryImModule :: AttrLabelProxy "imModule"
entryImModule = AttrLabelProxy
entryInnerBorder :: AttrLabelProxy "innerBorder"
entryInnerBorder = AttrLabelProxy
entryInputHints :: AttrLabelProxy "inputHints"
entryInputHints = AttrLabelProxy
entryInputPurpose :: AttrLabelProxy "inputPurpose"
entryInputPurpose = AttrLabelProxy
entryInvisibleChar :: AttrLabelProxy "invisibleChar"
entryInvisibleChar = AttrLabelProxy
entryInvisibleCharSet :: AttrLabelProxy "invisibleCharSet"
entryInvisibleCharSet = AttrLabelProxy
entryMaxLength :: AttrLabelProxy "maxLength"
entryMaxLength = AttrLabelProxy
entryMaxWidthChars :: AttrLabelProxy "maxWidthChars"
entryMaxWidthChars = AttrLabelProxy
entryOverwriteMode :: AttrLabelProxy "overwriteMode"
entryOverwriteMode = AttrLabelProxy
entryPlaceholderText :: AttrLabelProxy "placeholderText"
entryPlaceholderText = AttrLabelProxy
entryPopulateAll :: AttrLabelProxy "populateAll"
entryPopulateAll = AttrLabelProxy
entryPrimaryIconActivatable :: AttrLabelProxy "primaryIconActivatable"
entryPrimaryIconActivatable = AttrLabelProxy
entryPrimaryIconGicon :: AttrLabelProxy "primaryIconGicon"
entryPrimaryIconGicon = AttrLabelProxy
entryPrimaryIconName :: AttrLabelProxy "primaryIconName"
entryPrimaryIconName = AttrLabelProxy
entryPrimaryIconPixbuf :: AttrLabelProxy "primaryIconPixbuf"
entryPrimaryIconPixbuf = AttrLabelProxy
entryPrimaryIconSensitive :: AttrLabelProxy "primaryIconSensitive"
entryPrimaryIconSensitive = AttrLabelProxy
entryPrimaryIconStock :: AttrLabelProxy "primaryIconStock"
entryPrimaryIconStock = AttrLabelProxy
entryPrimaryIconStorageType :: AttrLabelProxy "primaryIconStorageType"
entryPrimaryIconStorageType = AttrLabelProxy
entryPrimaryIconTooltipMarkup :: AttrLabelProxy "primaryIconTooltipMarkup"
entryPrimaryIconTooltipMarkup = AttrLabelProxy
entryPrimaryIconTooltipText :: AttrLabelProxy "primaryIconTooltipText"
entryPrimaryIconTooltipText = AttrLabelProxy
entryProgressFraction :: AttrLabelProxy "progressFraction"
entryProgressFraction = AttrLabelProxy
entryProgressPulseStep :: AttrLabelProxy "progressPulseStep"
entryProgressPulseStep = AttrLabelProxy
entryScrollOffset :: AttrLabelProxy "scrollOffset"
entryScrollOffset = AttrLabelProxy
entrySecondaryIconActivatable :: AttrLabelProxy "secondaryIconActivatable"
entrySecondaryIconActivatable = AttrLabelProxy
entrySecondaryIconGicon :: AttrLabelProxy "secondaryIconGicon"
entrySecondaryIconGicon = AttrLabelProxy
entrySecondaryIconName :: AttrLabelProxy "secondaryIconName"
entrySecondaryIconName = AttrLabelProxy
entrySecondaryIconPixbuf :: AttrLabelProxy "secondaryIconPixbuf"
entrySecondaryIconPixbuf = AttrLabelProxy
entrySecondaryIconSensitive :: AttrLabelProxy "secondaryIconSensitive"
entrySecondaryIconSensitive = AttrLabelProxy
entrySecondaryIconStock :: AttrLabelProxy "secondaryIconStock"
entrySecondaryIconStock = AttrLabelProxy
entrySecondaryIconStorageType :: AttrLabelProxy "secondaryIconStorageType"
entrySecondaryIconStorageType = AttrLabelProxy
entrySecondaryIconTooltipMarkup :: AttrLabelProxy "secondaryIconTooltipMarkup"
entrySecondaryIconTooltipMarkup = AttrLabelProxy
entrySecondaryIconTooltipText :: AttrLabelProxy "secondaryIconTooltipText"
entrySecondaryIconTooltipText = AttrLabelProxy
entrySelectionBound :: AttrLabelProxy "selectionBound"
entrySelectionBound = AttrLabelProxy
entryShadowType :: AttrLabelProxy "shadowType"
entryShadowType = AttrLabelProxy
entryShowEmojiIcon :: AttrLabelProxy "showEmojiIcon"
entryShowEmojiIcon = AttrLabelProxy
entryTabs :: AttrLabelProxy "tabs"
entryTabs = AttrLabelProxy
entryText :: AttrLabelProxy "text"
entryText = AttrLabelProxy
entryTextLength :: AttrLabelProxy "textLength"
entryTextLength = AttrLabelProxy
entryTruncateMultiline :: AttrLabelProxy "truncateMultiline"
entryTruncateMultiline = AttrLabelProxy
entryVisibility :: AttrLabelProxy "visibility"
entryVisibility = AttrLabelProxy
entryWidthChars :: AttrLabelProxy "widthChars"
entryWidthChars = AttrLabelProxy
entryXalign :: AttrLabelProxy "xalign"
entryXalign = AttrLabelProxy
#endif
#if ENABLE_OVERLOADING
data EntryActivateSignalInfo
instance SignalInfo EntryActivateSignalInfo where
type HaskellCallbackType EntryActivateSignalInfo = EntryActivateCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryActivateCallback cb
cb'' <- mk_EntryActivateCallback cb'
connectSignalFunPtr obj "activate" cb'' connectMode
data EntryBackspaceSignalInfo
instance SignalInfo EntryBackspaceSignalInfo where
type HaskellCallbackType EntryBackspaceSignalInfo = EntryBackspaceCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryBackspaceCallback cb
cb'' <- mk_EntryBackspaceCallback cb'
connectSignalFunPtr obj "backspace" cb'' connectMode
data EntryCopyClipboardSignalInfo
instance SignalInfo EntryCopyClipboardSignalInfo where
type HaskellCallbackType EntryCopyClipboardSignalInfo = EntryCopyClipboardCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryCopyClipboardCallback cb
cb'' <- mk_EntryCopyClipboardCallback cb'
connectSignalFunPtr obj "copy-clipboard" cb'' connectMode
data EntryCutClipboardSignalInfo
instance SignalInfo EntryCutClipboardSignalInfo where
type HaskellCallbackType EntryCutClipboardSignalInfo = EntryCutClipboardCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryCutClipboardCallback cb
cb'' <- mk_EntryCutClipboardCallback cb'
connectSignalFunPtr obj "cut-clipboard" cb'' connectMode
data EntryDeleteFromCursorSignalInfo
instance SignalInfo EntryDeleteFromCursorSignalInfo where
type HaskellCallbackType EntryDeleteFromCursorSignalInfo = EntryDeleteFromCursorCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryDeleteFromCursorCallback cb
cb'' <- mk_EntryDeleteFromCursorCallback cb'
connectSignalFunPtr obj "delete-from-cursor" cb'' connectMode
data EntryIconPressSignalInfo
instance SignalInfo EntryIconPressSignalInfo where
type HaskellCallbackType EntryIconPressSignalInfo = EntryIconPressCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryIconPressCallback cb
cb'' <- mk_EntryIconPressCallback cb'
connectSignalFunPtr obj "icon-press" cb'' connectMode
data EntryIconReleaseSignalInfo
instance SignalInfo EntryIconReleaseSignalInfo where
type HaskellCallbackType EntryIconReleaseSignalInfo = EntryIconReleaseCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryIconReleaseCallback cb
cb'' <- mk_EntryIconReleaseCallback cb'
connectSignalFunPtr obj "icon-release" cb'' connectMode
data EntryInsertAtCursorSignalInfo
instance SignalInfo EntryInsertAtCursorSignalInfo where
type HaskellCallbackType EntryInsertAtCursorSignalInfo = EntryInsertAtCursorCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryInsertAtCursorCallback cb
cb'' <- mk_EntryInsertAtCursorCallback cb'
connectSignalFunPtr obj "insert-at-cursor" cb'' connectMode
data EntryInsertEmojiSignalInfo
instance SignalInfo EntryInsertEmojiSignalInfo where
type HaskellCallbackType EntryInsertEmojiSignalInfo = EntryInsertEmojiCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryInsertEmojiCallback cb
cb'' <- mk_EntryInsertEmojiCallback cb'
connectSignalFunPtr obj "insert-emoji" cb'' connectMode
data EntryMoveCursorSignalInfo
instance SignalInfo EntryMoveCursorSignalInfo where
type HaskellCallbackType EntryMoveCursorSignalInfo = EntryMoveCursorCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryMoveCursorCallback cb
cb'' <- mk_EntryMoveCursorCallback cb'
connectSignalFunPtr obj "move-cursor" cb'' connectMode
data EntryPasteClipboardSignalInfo
instance SignalInfo EntryPasteClipboardSignalInfo where
type HaskellCallbackType EntryPasteClipboardSignalInfo = EntryPasteClipboardCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryPasteClipboardCallback cb
cb'' <- mk_EntryPasteClipboardCallback cb'
connectSignalFunPtr obj "paste-clipboard" cb'' connectMode
data EntryPopulatePopupSignalInfo
instance SignalInfo EntryPopulatePopupSignalInfo where
type HaskellCallbackType EntryPopulatePopupSignalInfo = EntryPopulatePopupCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryPopulatePopupCallback cb
cb'' <- mk_EntryPopulatePopupCallback cb'
connectSignalFunPtr obj "populate-popup" cb'' connectMode
data EntryPreeditChangedSignalInfo
instance SignalInfo EntryPreeditChangedSignalInfo where
type HaskellCallbackType EntryPreeditChangedSignalInfo = EntryPreeditChangedCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryPreeditChangedCallback cb
cb'' <- mk_EntryPreeditChangedCallback cb'
connectSignalFunPtr obj "preedit-changed" cb'' connectMode
data EntryToggleOverwriteSignalInfo
instance SignalInfo EntryToggleOverwriteSignalInfo where
type HaskellCallbackType EntryToggleOverwriteSignalInfo = EntryToggleOverwriteCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_EntryToggleOverwriteCallback cb
cb'' <- mk_EntryToggleOverwriteCallback cb'
connectSignalFunPtr obj "toggle-overwrite" cb'' connectMode
type instance O.SignalList Entry = EntrySignalList
type EntrySignalList = ('[ '("accelClosuresChanged", Gtk.Widget.WidgetAccelClosuresChangedSignalInfo), '("activate", EntryActivateSignalInfo), '("backspace", EntryBackspaceSignalInfo), '("buttonPressEvent", Gtk.Widget.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.Widget.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.Widget.WidgetCanActivateAccelSignalInfo), '("changed", Gtk.Editable.EditableChangedSignalInfo), '("childNotify", Gtk.Widget.WidgetChildNotifySignalInfo), '("compositedChanged", Gtk.Widget.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.Widget.WidgetConfigureEventSignalInfo), '("copyClipboard", EntryCopyClipboardSignalInfo), '("cutClipboard", EntryCutClipboardSignalInfo), '("damageEvent", Gtk.Widget.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.Widget.WidgetDeleteEventSignalInfo), '("deleteFromCursor", EntryDeleteFromCursorSignalInfo), '("deleteText", Gtk.Editable.EditableDeleteTextSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("destroyEvent", Gtk.Widget.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("dragBegin", Gtk.Widget.WidgetDragBeginSignalInfo), '("dragDataDelete", Gtk.Widget.WidgetDragDataDeleteSignalInfo), '("dragDataGet", Gtk.Widget.WidgetDragDataGetSignalInfo), '("dragDataReceived", Gtk.Widget.WidgetDragDataReceivedSignalInfo), '("dragDrop", Gtk.Widget.WidgetDragDropSignalInfo), '("dragEnd", Gtk.Widget.WidgetDragEndSignalInfo), '("dragFailed", Gtk.Widget.WidgetDragFailedSignalInfo), '("dragLeave", Gtk.Widget.WidgetDragLeaveSignalInfo), '("dragMotion", Gtk.Widget.WidgetDragMotionSignalInfo), '("draw", Gtk.Widget.WidgetDrawSignalInfo), '("editingDone", Gtk.CellEditable.CellEditableEditingDoneSignalInfo), '("enterNotifyEvent", Gtk.Widget.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.Widget.WidgetEventSignalInfo), '("eventAfter", Gtk.Widget.WidgetEventAfterSignalInfo), '("focus", Gtk.Widget.WidgetFocusSignalInfo), '("focusInEvent", Gtk.Widget.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.Widget.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.Widget.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.Widget.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.Widget.WidgetGrabNotifySignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.Widget.WidgetHierarchyChangedSignalInfo), '("iconPress", EntryIconPressSignalInfo), '("iconRelease", EntryIconReleaseSignalInfo), '("insertAtCursor", EntryInsertAtCursorSignalInfo), '("insertEmoji", EntryInsertEmojiSignalInfo), '("insertText", Gtk.Editable.EditableInsertTextSignalInfo), '("keyPressEvent", Gtk.Widget.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.Widget.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("leaveNotifyEvent", Gtk.Widget.WidgetLeaveNotifyEventSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mapEvent", Gtk.Widget.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.Widget.WidgetMotionNotifyEventSignalInfo), '("moveCursor", EntryMoveCursorSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("parentSet", Gtk.Widget.WidgetParentSetSignalInfo), '("pasteClipboard", EntryPasteClipboardSignalInfo), '("populatePopup", EntryPopulatePopupSignalInfo), '("popupMenu", Gtk.Widget.WidgetPopupMenuSignalInfo), '("preeditChanged", EntryPreeditChangedSignalInfo), '("propertyNotifyEvent", Gtk.Widget.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.Widget.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.Widget.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("removeWidget", Gtk.CellEditable.CellEditableRemoveWidgetSignalInfo), '("screenChanged", Gtk.Widget.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.Widget.WidgetScrollEventSignalInfo), '("selectionClearEvent", Gtk.Widget.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.Widget.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.Widget.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.Widget.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.Widget.WidgetSelectionRequestEventSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("showHelp", Gtk.Widget.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.Widget.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.Widget.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.Widget.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.Widget.WidgetStyleUpdatedSignalInfo), '("toggleOverwrite", EntryToggleOverwriteSignalInfo), '("touchEvent", Gtk.Widget.WidgetTouchEventSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.Widget.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.Widget.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.Widget.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "gtk_entry_new" gtk_entry_new ::
IO (Ptr Entry)
entryNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m Entry
entryNew = liftIO $ do
result <- gtk_entry_new
checkUnexpectedReturnNULL "entryNew" result
result' <- (newObject Entry) result
return result'
#if ENABLE_OVERLOADING
#endif
foreign import ccall "gtk_entry_new_with_buffer" gtk_entry_new_with_buffer ::
Ptr Gtk.EntryBuffer.EntryBuffer ->
IO (Ptr Entry)
entryNewWithBuffer ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.EntryBuffer.IsEntryBuffer a) =>
a
-> m Entry
entryNewWithBuffer buffer = liftIO $ do
buffer' <- unsafeManagedPtrCastPtr buffer
result <- gtk_entry_new_with_buffer buffer'
checkUnexpectedReturnNULL "entryNewWithBuffer" result
result' <- (newObject Entry) result
touchManagedPtr buffer
return result'
#if ENABLE_OVERLOADING
#endif
foreign import ccall "gtk_entry_get_activates_default" gtk_entry_get_activates_default ::
Ptr Entry ->
IO CInt
entryGetActivatesDefault ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Bool
entryGetActivatesDefault entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_activates_default entry'
let result' = (/= 0) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetActivatesDefaultMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsEntry a) => O.MethodInfo EntryGetActivatesDefaultMethodInfo a signature where
overloadedMethod _ = entryGetActivatesDefault
#endif
foreign import ccall "gtk_entry_get_alignment" gtk_entry_get_alignment ::
Ptr Entry ->
IO CFloat
entryGetAlignment ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Float
entryGetAlignment entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_alignment entry'
let result' = realToFrac result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetAlignmentMethodInfo
instance (signature ~ (m Float), MonadIO m, IsEntry a) => O.MethodInfo EntryGetAlignmentMethodInfo a signature where
overloadedMethod _ = entryGetAlignment
#endif
foreign import ccall "gtk_entry_get_attributes" gtk_entry_get_attributes ::
Ptr Entry ->
IO (Ptr Pango.AttrList.AttrList)
entryGetAttributes ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m (Maybe Pango.AttrList.AttrList)
entryGetAttributes entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_attributes entry'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newBoxed Pango.AttrList.AttrList) result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetAttributesMethodInfo
instance (signature ~ (m (Maybe Pango.AttrList.AttrList)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetAttributesMethodInfo a signature where
overloadedMethod _ = entryGetAttributes
#endif
foreign import ccall "gtk_entry_get_buffer" gtk_entry_get_buffer ::
Ptr Entry ->
IO (Ptr Gtk.EntryBuffer.EntryBuffer)
entryGetBuffer ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Gtk.EntryBuffer.EntryBuffer
entryGetBuffer entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_buffer entry'
checkUnexpectedReturnNULL "entryGetBuffer" result
result' <- (newObject Gtk.EntryBuffer.EntryBuffer) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetBufferMethodInfo
instance (signature ~ (m Gtk.EntryBuffer.EntryBuffer), MonadIO m, IsEntry a) => O.MethodInfo EntryGetBufferMethodInfo a signature where
overloadedMethod _ = entryGetBuffer
#endif
foreign import ccall "gtk_entry_get_completion" gtk_entry_get_completion ::
Ptr Entry ->
IO (Ptr Gtk.EntryCompletion.EntryCompletion)
entryGetCompletion ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Gtk.EntryCompletion.EntryCompletion
entryGetCompletion entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_completion entry'
checkUnexpectedReturnNULL "entryGetCompletion" result
result' <- (newObject Gtk.EntryCompletion.EntryCompletion) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetCompletionMethodInfo
instance (signature ~ (m Gtk.EntryCompletion.EntryCompletion), MonadIO m, IsEntry a) => O.MethodInfo EntryGetCompletionMethodInfo a signature where
overloadedMethod _ = entryGetCompletion
#endif
foreign import ccall "gtk_entry_get_current_icon_drag_source" gtk_entry_get_current_icon_drag_source ::
Ptr Entry ->
IO Int32
entryGetCurrentIconDragSource ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Int32
entryGetCurrentIconDragSource entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_current_icon_drag_source entry'
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryGetCurrentIconDragSourceMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsEntry a) => O.MethodInfo EntryGetCurrentIconDragSourceMethodInfo a signature where
overloadedMethod _ = entryGetCurrentIconDragSource
#endif
foreign import ccall "gtk_entry_get_cursor_hadjustment" gtk_entry_get_cursor_hadjustment ::
Ptr Entry ->
IO (Ptr Gtk.Adjustment.Adjustment)
entryGetCursorHadjustment ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m (Maybe Gtk.Adjustment.Adjustment)
entryGetCursorHadjustment entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_cursor_hadjustment entry'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject Gtk.Adjustment.Adjustment) result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetCursorHadjustmentMethodInfo
instance (signature ~ (m (Maybe Gtk.Adjustment.Adjustment)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetCursorHadjustmentMethodInfo a signature where
overloadedMethod _ = entryGetCursorHadjustment
#endif
foreign import ccall "gtk_entry_get_has_frame" gtk_entry_get_has_frame ::
Ptr Entry ->
IO CInt
entryGetHasFrame ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Bool
entryGetHasFrame entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_has_frame entry'
let result' = (/= 0) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetHasFrameMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsEntry a) => O.MethodInfo EntryGetHasFrameMethodInfo a signature where
overloadedMethod _ = entryGetHasFrame
#endif
foreign import ccall "gtk_entry_get_icon_activatable" gtk_entry_get_icon_activatable ::
Ptr Entry ->
CUInt ->
IO CInt
entryGetIconActivatable ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> m Bool
entryGetIconActivatable entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_activatable entry' iconPos'
let result' = (/= 0) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetIconActivatableMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m Bool), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconActivatableMethodInfo a signature where
overloadedMethod _ = entryGetIconActivatable
#endif
foreign import ccall "gtk_entry_get_icon_area" gtk_entry_get_icon_area ::
Ptr Entry ->
CUInt ->
Ptr Gdk.Rectangle.Rectangle ->
IO ()
entryGetIconArea ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> m (Gdk.Rectangle.Rectangle)
entryGetIconArea entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
iconArea <- callocBoxedBytes 16 :: IO (Ptr Gdk.Rectangle.Rectangle)
gtk_entry_get_icon_area entry' iconPos' iconArea
iconArea' <- (wrapBoxed Gdk.Rectangle.Rectangle) iconArea
touchManagedPtr entry
return iconArea'
#if ENABLE_OVERLOADING
data EntryGetIconAreaMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m (Gdk.Rectangle.Rectangle)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconAreaMethodInfo a signature where
overloadedMethod _ = entryGetIconArea
#endif
foreign import ccall "gtk_entry_get_icon_at_pos" gtk_entry_get_icon_at_pos ::
Ptr Entry ->
Int32 ->
Int32 ->
IO Int32
entryGetIconAtPos ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Int32
-> Int32
-> m Int32
entryGetIconAtPos entry x y = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_icon_at_pos entry' x y
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryGetIconAtPosMethodInfo
instance (signature ~ (Int32 -> Int32 -> m Int32), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconAtPosMethodInfo a signature where
overloadedMethod _ = entryGetIconAtPos
#endif
foreign import ccall "gtk_entry_get_icon_gicon" gtk_entry_get_icon_gicon ::
Ptr Entry ->
CUInt ->
IO (Ptr Gio.Icon.Icon)
entryGetIconGicon ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> m (Maybe Gio.Icon.Icon)
entryGetIconGicon entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_gicon entry' iconPos'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject Gio.Icon.Icon) result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetIconGiconMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m (Maybe Gio.Icon.Icon)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconGiconMethodInfo a signature where
overloadedMethod _ = entryGetIconGicon
#endif
foreign import ccall "gtk_entry_get_icon_name" gtk_entry_get_icon_name ::
Ptr Entry ->
CUInt ->
IO CString
entryGetIconName ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> m (Maybe T.Text)
entryGetIconName entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_name entry' iconPos'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- cstringToText result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetIconNameMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m (Maybe T.Text)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconNameMethodInfo a signature where
overloadedMethod _ = entryGetIconName
#endif
foreign import ccall "gtk_entry_get_icon_pixbuf" gtk_entry_get_icon_pixbuf ::
Ptr Entry ->
CUInt ->
IO (Ptr GdkPixbuf.Pixbuf.Pixbuf)
entryGetIconPixbuf ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> m (Maybe GdkPixbuf.Pixbuf.Pixbuf)
entryGetIconPixbuf entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_pixbuf entry' iconPos'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject GdkPixbuf.Pixbuf.Pixbuf) result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetIconPixbufMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m (Maybe GdkPixbuf.Pixbuf.Pixbuf)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconPixbufMethodInfo a signature where
overloadedMethod _ = entryGetIconPixbuf
#endif
foreign import ccall "gtk_entry_get_icon_sensitive" gtk_entry_get_icon_sensitive ::
Ptr Entry ->
CUInt ->
IO CInt
entryGetIconSensitive ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> m Bool
entryGetIconSensitive entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_sensitive entry' iconPos'
let result' = (/= 0) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetIconSensitiveMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m Bool), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconSensitiveMethodInfo a signature where
overloadedMethod _ = entryGetIconSensitive
#endif
foreign import ccall "gtk_entry_get_icon_stock" gtk_entry_get_icon_stock ::
Ptr Entry ->
CUInt ->
IO CString
{-# DEPRECATED entryGetIconStock ["(Since version 3.10)","Use 'GI.Gtk.Objects.Entry.entryGetIconName' instead."] #-}
entryGetIconStock ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> m T.Text
entryGetIconStock entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_stock entry' iconPos'
checkUnexpectedReturnNULL "entryGetIconStock" result
result' <- cstringToText result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetIconStockMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m T.Text), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconStockMethodInfo a signature where
overloadedMethod _ = entryGetIconStock
#endif
foreign import ccall "gtk_entry_get_icon_storage_type" gtk_entry_get_icon_storage_type ::
Ptr Entry ->
CUInt ->
IO CUInt
entryGetIconStorageType ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> m Gtk.Enums.ImageType
entryGetIconStorageType entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_storage_type entry' iconPos'
let result' = (toEnum . fromIntegral) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetIconStorageTypeMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m Gtk.Enums.ImageType), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconStorageTypeMethodInfo a signature where
overloadedMethod _ = entryGetIconStorageType
#endif
foreign import ccall "gtk_entry_get_icon_tooltip_markup" gtk_entry_get_icon_tooltip_markup ::
Ptr Entry ->
CUInt ->
IO CString
entryGetIconTooltipMarkup ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> m (Maybe T.Text)
entryGetIconTooltipMarkup entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_tooltip_markup entry' iconPos'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- cstringToText result'
freeMem result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetIconTooltipMarkupMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m (Maybe T.Text)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconTooltipMarkupMethodInfo a signature where
overloadedMethod _ = entryGetIconTooltipMarkup
#endif
foreign import ccall "gtk_entry_get_icon_tooltip_text" gtk_entry_get_icon_tooltip_text ::
Ptr Entry ->
CUInt ->
IO CString
entryGetIconTooltipText ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> m (Maybe T.Text)
entryGetIconTooltipText entry iconPos = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
result <- gtk_entry_get_icon_tooltip_text entry' iconPos'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- cstringToText result'
freeMem result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetIconTooltipTextMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> m (Maybe T.Text)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetIconTooltipTextMethodInfo a signature where
overloadedMethod _ = entryGetIconTooltipText
#endif
foreign import ccall "gtk_entry_get_inner_border" gtk_entry_get_inner_border ::
Ptr Entry ->
IO (Ptr Gtk.Border.Border)
{-# DEPRECATED entryGetInnerBorder ["(Since version 3.4)","Use the standard border and padding CSS properties (through"," objects like 'GI.Gtk.Objects.StyleContext.StyleContext' and 'GI.Gtk.Objects.CssProvider.CssProvider'); the value returned by"," this function is ignored by 'GI.Gtk.Objects.Entry.Entry'."] #-}
entryGetInnerBorder ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m (Maybe Gtk.Border.Border)
entryGetInnerBorder entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_inner_border entry'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newBoxed Gtk.Border.Border) result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetInnerBorderMethodInfo
instance (signature ~ (m (Maybe Gtk.Border.Border)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetInnerBorderMethodInfo a signature where
overloadedMethod _ = entryGetInnerBorder
#endif
foreign import ccall "gtk_entry_get_input_hints" gtk_entry_get_input_hints ::
Ptr Entry ->
IO CUInt
entryGetInputHints ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m [Gtk.Flags.InputHints]
entryGetInputHints entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_input_hints entry'
let result' = wordToGFlags result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetInputHintsMethodInfo
instance (signature ~ (m [Gtk.Flags.InputHints]), MonadIO m, IsEntry a) => O.MethodInfo EntryGetInputHintsMethodInfo a signature where
overloadedMethod _ = entryGetInputHints
#endif
foreign import ccall "gtk_entry_get_input_purpose" gtk_entry_get_input_purpose ::
Ptr Entry ->
IO CUInt
entryGetInputPurpose ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Gtk.Enums.InputPurpose
entryGetInputPurpose entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_input_purpose entry'
let result' = (toEnum . fromIntegral) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetInputPurposeMethodInfo
instance (signature ~ (m Gtk.Enums.InputPurpose), MonadIO m, IsEntry a) => O.MethodInfo EntryGetInputPurposeMethodInfo a signature where
overloadedMethod _ = entryGetInputPurpose
#endif
foreign import ccall "gtk_entry_get_invisible_char" gtk_entry_get_invisible_char ::
Ptr Entry ->
IO CInt
entryGetInvisibleChar ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Char
entryGetInvisibleChar entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_invisible_char entry'
let result' = (chr . fromIntegral) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetInvisibleCharMethodInfo
instance (signature ~ (m Char), MonadIO m, IsEntry a) => O.MethodInfo EntryGetInvisibleCharMethodInfo a signature where
overloadedMethod _ = entryGetInvisibleChar
#endif
foreign import ccall "gtk_entry_get_layout" gtk_entry_get_layout ::
Ptr Entry ->
IO (Ptr Pango.Layout.Layout)
entryGetLayout ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Pango.Layout.Layout
entryGetLayout entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_layout entry'
checkUnexpectedReturnNULL "entryGetLayout" result
result' <- (newObject Pango.Layout.Layout) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetLayoutMethodInfo
instance (signature ~ (m Pango.Layout.Layout), MonadIO m, IsEntry a) => O.MethodInfo EntryGetLayoutMethodInfo a signature where
overloadedMethod _ = entryGetLayout
#endif
foreign import ccall "gtk_entry_get_layout_offsets" gtk_entry_get_layout_offsets ::
Ptr Entry ->
Ptr Int32 ->
Ptr Int32 ->
IO ()
entryGetLayoutOffsets ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m ((Int32, Int32))
entryGetLayoutOffsets entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
x <- allocMem :: IO (Ptr Int32)
y <- allocMem :: IO (Ptr Int32)
gtk_entry_get_layout_offsets entry' x y
x' <- peek x
y' <- peek y
touchManagedPtr entry
freeMem x
freeMem y
return (x', y')
#if ENABLE_OVERLOADING
data EntryGetLayoutOffsetsMethodInfo
instance (signature ~ (m ((Int32, Int32))), MonadIO m, IsEntry a) => O.MethodInfo EntryGetLayoutOffsetsMethodInfo a signature where
overloadedMethod _ = entryGetLayoutOffsets
#endif
foreign import ccall "gtk_entry_get_max_length" gtk_entry_get_max_length ::
Ptr Entry ->
IO Int32
entryGetMaxLength ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Int32
entryGetMaxLength entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_max_length entry'
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryGetMaxLengthMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsEntry a) => O.MethodInfo EntryGetMaxLengthMethodInfo a signature where
overloadedMethod _ = entryGetMaxLength
#endif
foreign import ccall "gtk_entry_get_max_width_chars" gtk_entry_get_max_width_chars ::
Ptr Entry ->
IO Int32
entryGetMaxWidthChars ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Int32
entryGetMaxWidthChars entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_max_width_chars entry'
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryGetMaxWidthCharsMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsEntry a) => O.MethodInfo EntryGetMaxWidthCharsMethodInfo a signature where
overloadedMethod _ = entryGetMaxWidthChars
#endif
foreign import ccall "gtk_entry_get_overwrite_mode" gtk_entry_get_overwrite_mode ::
Ptr Entry ->
IO CInt
entryGetOverwriteMode ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Bool
entryGetOverwriteMode entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_overwrite_mode entry'
let result' = (/= 0) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetOverwriteModeMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsEntry a) => O.MethodInfo EntryGetOverwriteModeMethodInfo a signature where
overloadedMethod _ = entryGetOverwriteMode
#endif
foreign import ccall "gtk_entry_get_placeholder_text" gtk_entry_get_placeholder_text ::
Ptr Entry ->
IO CString
entryGetPlaceholderText ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m T.Text
entryGetPlaceholderText entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_placeholder_text entry'
checkUnexpectedReturnNULL "entryGetPlaceholderText" result
result' <- cstringToText result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetPlaceholderTextMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsEntry a) => O.MethodInfo EntryGetPlaceholderTextMethodInfo a signature where
overloadedMethod _ = entryGetPlaceholderText
#endif
foreign import ccall "gtk_entry_get_progress_fraction" gtk_entry_get_progress_fraction ::
Ptr Entry ->
IO CDouble
entryGetProgressFraction ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Double
entryGetProgressFraction entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_progress_fraction entry'
let result' = realToFrac result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetProgressFractionMethodInfo
instance (signature ~ (m Double), MonadIO m, IsEntry a) => O.MethodInfo EntryGetProgressFractionMethodInfo a signature where
overloadedMethod _ = entryGetProgressFraction
#endif
foreign import ccall "gtk_entry_get_progress_pulse_step" gtk_entry_get_progress_pulse_step ::
Ptr Entry ->
IO CDouble
entryGetProgressPulseStep ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Double
entryGetProgressPulseStep entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_progress_pulse_step entry'
let result' = realToFrac result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetProgressPulseStepMethodInfo
instance (signature ~ (m Double), MonadIO m, IsEntry a) => O.MethodInfo EntryGetProgressPulseStepMethodInfo a signature where
overloadedMethod _ = entryGetProgressPulseStep
#endif
foreign import ccall "gtk_entry_get_tabs" gtk_entry_get_tabs ::
Ptr Entry ->
IO (Ptr Pango.TabArray.TabArray)
entryGetTabs ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m (Maybe Pango.TabArray.TabArray)
entryGetTabs entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_tabs entry'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newBoxed Pango.TabArray.TabArray) result'
return result''
touchManagedPtr entry
return maybeResult
#if ENABLE_OVERLOADING
data EntryGetTabsMethodInfo
instance (signature ~ (m (Maybe Pango.TabArray.TabArray)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetTabsMethodInfo a signature where
overloadedMethod _ = entryGetTabs
#endif
foreign import ccall "gtk_entry_get_text" gtk_entry_get_text ::
Ptr Entry ->
IO CString
entryGetText ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m T.Text
entryGetText entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_text entry'
checkUnexpectedReturnNULL "entryGetText" result
result' <- cstringToText result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetTextMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsEntry a) => O.MethodInfo EntryGetTextMethodInfo a signature where
overloadedMethod _ = entryGetText
#endif
foreign import ccall "gtk_entry_get_text_area" gtk_entry_get_text_area ::
Ptr Entry ->
Ptr Gdk.Rectangle.Rectangle ->
IO ()
entryGetTextArea ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m (Gdk.Rectangle.Rectangle)
entryGetTextArea entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
textArea <- callocBoxedBytes 16 :: IO (Ptr Gdk.Rectangle.Rectangle)
gtk_entry_get_text_area entry' textArea
textArea' <- (wrapBoxed Gdk.Rectangle.Rectangle) textArea
touchManagedPtr entry
return textArea'
#if ENABLE_OVERLOADING
data EntryGetTextAreaMethodInfo
instance (signature ~ (m (Gdk.Rectangle.Rectangle)), MonadIO m, IsEntry a) => O.MethodInfo EntryGetTextAreaMethodInfo a signature where
overloadedMethod _ = entryGetTextArea
#endif
foreign import ccall "gtk_entry_get_text_length" gtk_entry_get_text_length ::
Ptr Entry ->
IO Word16
entryGetTextLength ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Word16
entryGetTextLength entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_text_length entry'
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryGetTextLengthMethodInfo
instance (signature ~ (m Word16), MonadIO m, IsEntry a) => O.MethodInfo EntryGetTextLengthMethodInfo a signature where
overloadedMethod _ = entryGetTextLength
#endif
foreign import ccall "gtk_entry_get_visibility" gtk_entry_get_visibility ::
Ptr Entry ->
IO CInt
entryGetVisibility ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Bool
entryGetVisibility entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_visibility entry'
let result' = (/= 0) result
touchManagedPtr entry
return result'
#if ENABLE_OVERLOADING
data EntryGetVisibilityMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsEntry a) => O.MethodInfo EntryGetVisibilityMethodInfo a signature where
overloadedMethod _ = entryGetVisibility
#endif
foreign import ccall "gtk_entry_get_width_chars" gtk_entry_get_width_chars ::
Ptr Entry ->
IO Int32
entryGetWidthChars ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m Int32
entryGetWidthChars entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_get_width_chars entry'
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryGetWidthCharsMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsEntry a) => O.MethodInfo EntryGetWidthCharsMethodInfo a signature where
overloadedMethod _ = entryGetWidthChars
#endif
foreign import ccall "gtk_entry_grab_focus_without_selecting" gtk_entry_grab_focus_without_selecting ::
Ptr Entry ->
IO ()
entryGrabFocusWithoutSelecting ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m ()
entryGrabFocusWithoutSelecting entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
gtk_entry_grab_focus_without_selecting entry'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntryGrabFocusWithoutSelectingMethodInfo
instance (signature ~ (m ()), MonadIO m, IsEntry a) => O.MethodInfo EntryGrabFocusWithoutSelectingMethodInfo a signature where
overloadedMethod _ = entryGrabFocusWithoutSelecting
#endif
foreign import ccall "gtk_entry_im_context_filter_keypress" gtk_entry_im_context_filter_keypress ::
Ptr Entry ->
Ptr Gdk.EventKey.EventKey ->
IO CInt
entryImContextFilterKeypress ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gdk.EventKey.EventKey
-> m Bool
entryImContextFilterKeypress entry event = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
event' <- unsafeManagedPtrGetPtr event
result <- gtk_entry_im_context_filter_keypress entry' event'
let result' = (/= 0) result
touchManagedPtr entry
touchManagedPtr event
return result'
#if ENABLE_OVERLOADING
data EntryImContextFilterKeypressMethodInfo
instance (signature ~ (Gdk.EventKey.EventKey -> m Bool), MonadIO m, IsEntry a) => O.MethodInfo EntryImContextFilterKeypressMethodInfo a signature where
overloadedMethod _ = entryImContextFilterKeypress
#endif
foreign import ccall "gtk_entry_layout_index_to_text_index" gtk_entry_layout_index_to_text_index ::
Ptr Entry ->
Int32 ->
IO Int32
entryLayoutIndexToTextIndex ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Int32
-> m Int32
entryLayoutIndexToTextIndex entry layoutIndex = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_layout_index_to_text_index entry' layoutIndex
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryLayoutIndexToTextIndexMethodInfo
instance (signature ~ (Int32 -> m Int32), MonadIO m, IsEntry a) => O.MethodInfo EntryLayoutIndexToTextIndexMethodInfo a signature where
overloadedMethod _ = entryLayoutIndexToTextIndex
#endif
foreign import ccall "gtk_entry_progress_pulse" gtk_entry_progress_pulse ::
Ptr Entry ->
IO ()
entryProgressPulse ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m ()
entryProgressPulse entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
gtk_entry_progress_pulse entry'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntryProgressPulseMethodInfo
instance (signature ~ (m ()), MonadIO m, IsEntry a) => O.MethodInfo EntryProgressPulseMethodInfo a signature where
overloadedMethod _ = entryProgressPulse
#endif
foreign import ccall "gtk_entry_reset_im_context" gtk_entry_reset_im_context ::
Ptr Entry ->
IO ()
entryResetImContext ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m ()
entryResetImContext entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
gtk_entry_reset_im_context entry'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntryResetImContextMethodInfo
instance (signature ~ (m ()), MonadIO m, IsEntry a) => O.MethodInfo EntryResetImContextMethodInfo a signature where
overloadedMethod _ = entryResetImContext
#endif
foreign import ccall "gtk_entry_set_activates_default" gtk_entry_set_activates_default ::
Ptr Entry ->
CInt ->
IO ()
entrySetActivatesDefault ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Bool
-> m ()
entrySetActivatesDefault entry setting = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let setting' = (fromIntegral . fromEnum) setting
gtk_entry_set_activates_default entry' setting'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetActivatesDefaultMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetActivatesDefaultMethodInfo a signature where
overloadedMethod _ = entrySetActivatesDefault
#endif
foreign import ccall "gtk_entry_set_alignment" gtk_entry_set_alignment ::
Ptr Entry ->
CFloat ->
IO ()
entrySetAlignment ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Float
-> m ()
entrySetAlignment entry xalign = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let xalign' = realToFrac xalign
gtk_entry_set_alignment entry' xalign'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetAlignmentMethodInfo
instance (signature ~ (Float -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetAlignmentMethodInfo a signature where
overloadedMethod _ = entrySetAlignment
#endif
foreign import ccall "gtk_entry_set_attributes" gtk_entry_set_attributes ::
Ptr Entry ->
Ptr Pango.AttrList.AttrList ->
IO ()
entrySetAttributes ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Pango.AttrList.AttrList
-> m ()
entrySetAttributes entry attrs = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
attrs' <- unsafeManagedPtrGetPtr attrs
gtk_entry_set_attributes entry' attrs'
touchManagedPtr entry
touchManagedPtr attrs
return ()
#if ENABLE_OVERLOADING
data EntrySetAttributesMethodInfo
instance (signature ~ (Pango.AttrList.AttrList -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetAttributesMethodInfo a signature where
overloadedMethod _ = entrySetAttributes
#endif
foreign import ccall "gtk_entry_set_buffer" gtk_entry_set_buffer ::
Ptr Entry ->
Ptr Gtk.EntryBuffer.EntryBuffer ->
IO ()
entrySetBuffer ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a, Gtk.EntryBuffer.IsEntryBuffer b) =>
a
-> b
-> m ()
entrySetBuffer entry buffer = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
buffer' <- unsafeManagedPtrCastPtr buffer
gtk_entry_set_buffer entry' buffer'
touchManagedPtr entry
touchManagedPtr buffer
return ()
#if ENABLE_OVERLOADING
data EntrySetBufferMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsEntry a, Gtk.EntryBuffer.IsEntryBuffer b) => O.MethodInfo EntrySetBufferMethodInfo a signature where
overloadedMethod _ = entrySetBuffer
#endif
foreign import ccall "gtk_entry_set_completion" gtk_entry_set_completion ::
Ptr Entry ->
Ptr Gtk.EntryCompletion.EntryCompletion ->
IO ()
entrySetCompletion ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a, Gtk.EntryCompletion.IsEntryCompletion b) =>
a
-> Maybe (b)
-> m ()
entrySetCompletion entry completion = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
maybeCompletion <- case completion of
Nothing -> return nullPtr
Just jCompletion -> do
jCompletion' <- unsafeManagedPtrCastPtr jCompletion
return jCompletion'
gtk_entry_set_completion entry' maybeCompletion
touchManagedPtr entry
whenJust completion touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data EntrySetCompletionMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsEntry a, Gtk.EntryCompletion.IsEntryCompletion b) => O.MethodInfo EntrySetCompletionMethodInfo a signature where
overloadedMethod _ = entrySetCompletion
#endif
foreign import ccall "gtk_entry_set_cursor_hadjustment" gtk_entry_set_cursor_hadjustment ::
Ptr Entry ->
Ptr Gtk.Adjustment.Adjustment ->
IO ()
entrySetCursorHadjustment ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a, Gtk.Adjustment.IsAdjustment b) =>
a
-> Maybe (b)
-> m ()
entrySetCursorHadjustment entry adjustment = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
maybeAdjustment <- case adjustment of
Nothing -> return nullPtr
Just jAdjustment -> do
jAdjustment' <- unsafeManagedPtrCastPtr jAdjustment
return jAdjustment'
gtk_entry_set_cursor_hadjustment entry' maybeAdjustment
touchManagedPtr entry
whenJust adjustment touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data EntrySetCursorHadjustmentMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsEntry a, Gtk.Adjustment.IsAdjustment b) => O.MethodInfo EntrySetCursorHadjustmentMethodInfo a signature where
overloadedMethod _ = entrySetCursorHadjustment
#endif
foreign import ccall "gtk_entry_set_has_frame" gtk_entry_set_has_frame ::
Ptr Entry ->
CInt ->
IO ()
entrySetHasFrame ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Bool
-> m ()
entrySetHasFrame entry setting = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let setting' = (fromIntegral . fromEnum) setting
gtk_entry_set_has_frame entry' setting'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetHasFrameMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetHasFrameMethodInfo a signature where
overloadedMethod _ = entrySetHasFrame
#endif
foreign import ccall "gtk_entry_set_icon_activatable" gtk_entry_set_icon_activatable ::
Ptr Entry ->
CUInt ->
CInt ->
IO ()
entrySetIconActivatable ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> Bool
-> m ()
entrySetIconActivatable entry iconPos activatable = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
let activatable' = (fromIntegral . fromEnum) activatable
gtk_entry_set_icon_activatable entry' iconPos' activatable'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetIconActivatableMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Bool -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetIconActivatableMethodInfo a signature where
overloadedMethod _ = entrySetIconActivatable
#endif
foreign import ccall "gtk_entry_set_icon_drag_source" gtk_entry_set_icon_drag_source ::
Ptr Entry ->
CUInt ->
Ptr Gtk.TargetList.TargetList ->
CUInt ->
IO ()
entrySetIconDragSource ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> Gtk.TargetList.TargetList
-> [Gdk.Flags.DragAction]
-> m ()
entrySetIconDragSource entry iconPos targetList actions = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
targetList' <- unsafeManagedPtrGetPtr targetList
let actions' = gflagsToWord actions
gtk_entry_set_icon_drag_source entry' iconPos' targetList' actions'
touchManagedPtr entry
touchManagedPtr targetList
return ()
#if ENABLE_OVERLOADING
data EntrySetIconDragSourceMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Gtk.TargetList.TargetList -> [Gdk.Flags.DragAction] -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetIconDragSourceMethodInfo a signature where
overloadedMethod _ = entrySetIconDragSource
#endif
foreign import ccall "gtk_entry_set_icon_from_gicon" gtk_entry_set_icon_from_gicon ::
Ptr Entry ->
CUInt ->
Ptr Gio.Icon.Icon ->
IO ()
entrySetIconFromGicon ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a, Gio.Icon.IsIcon b) =>
a
-> Gtk.Enums.EntryIconPosition
-> Maybe (b)
-> m ()
entrySetIconFromGicon entry iconPos icon = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
maybeIcon <- case icon of
Nothing -> return nullPtr
Just jIcon -> do
jIcon' <- unsafeManagedPtrCastPtr jIcon
return jIcon'
gtk_entry_set_icon_from_gicon entry' iconPos' maybeIcon
touchManagedPtr entry
whenJust icon touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data EntrySetIconFromGiconMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Maybe (b) -> m ()), MonadIO m, IsEntry a, Gio.Icon.IsIcon b) => O.MethodInfo EntrySetIconFromGiconMethodInfo a signature where
overloadedMethod _ = entrySetIconFromGicon
#endif
foreign import ccall "gtk_entry_set_icon_from_icon_name" gtk_entry_set_icon_from_icon_name ::
Ptr Entry ->
CUInt ->
CString ->
IO ()
entrySetIconFromIconName ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> Maybe (T.Text)
-> m ()
entrySetIconFromIconName entry iconPos iconName = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
maybeIconName <- case iconName of
Nothing -> return nullPtr
Just jIconName -> do
jIconName' <- textToCString jIconName
return jIconName'
gtk_entry_set_icon_from_icon_name entry' iconPos' maybeIconName
touchManagedPtr entry
freeMem maybeIconName
return ()
#if ENABLE_OVERLOADING
data EntrySetIconFromIconNameMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Maybe (T.Text) -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetIconFromIconNameMethodInfo a signature where
overloadedMethod _ = entrySetIconFromIconName
#endif
foreign import ccall "gtk_entry_set_icon_from_pixbuf" gtk_entry_set_icon_from_pixbuf ::
Ptr Entry ->
CUInt ->
Ptr GdkPixbuf.Pixbuf.Pixbuf ->
IO ()
entrySetIconFromPixbuf ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a, GdkPixbuf.Pixbuf.IsPixbuf b) =>
a
-> Gtk.Enums.EntryIconPosition
-> Maybe (b)
-> m ()
entrySetIconFromPixbuf entry iconPos pixbuf = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
maybePixbuf <- case pixbuf of
Nothing -> return nullPtr
Just jPixbuf -> do
jPixbuf' <- unsafeManagedPtrCastPtr jPixbuf
return jPixbuf'
gtk_entry_set_icon_from_pixbuf entry' iconPos' maybePixbuf
touchManagedPtr entry
whenJust pixbuf touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data EntrySetIconFromPixbufMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Maybe (b) -> m ()), MonadIO m, IsEntry a, GdkPixbuf.Pixbuf.IsPixbuf b) => O.MethodInfo EntrySetIconFromPixbufMethodInfo a signature where
overloadedMethod _ = entrySetIconFromPixbuf
#endif
foreign import ccall "gtk_entry_set_icon_from_stock" gtk_entry_set_icon_from_stock ::
Ptr Entry ->
CUInt ->
CString ->
IO ()
{-# DEPRECATED entrySetIconFromStock ["(Since version 3.10)","Use 'GI.Gtk.Objects.Entry.entrySetIconFromIconName' instead."] #-}
entrySetIconFromStock ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> Maybe (T.Text)
-> m ()
entrySetIconFromStock entry iconPos stockId = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
maybeStockId <- case stockId of
Nothing -> return nullPtr
Just jStockId -> do
jStockId' <- textToCString jStockId
return jStockId'
gtk_entry_set_icon_from_stock entry' iconPos' maybeStockId
touchManagedPtr entry
freeMem maybeStockId
return ()
#if ENABLE_OVERLOADING
data EntrySetIconFromStockMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Maybe (T.Text) -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetIconFromStockMethodInfo a signature where
overloadedMethod _ = entrySetIconFromStock
#endif
foreign import ccall "gtk_entry_set_icon_sensitive" gtk_entry_set_icon_sensitive ::
Ptr Entry ->
CUInt ->
CInt ->
IO ()
entrySetIconSensitive ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> Bool
-> m ()
entrySetIconSensitive entry iconPos sensitive = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
let sensitive' = (fromIntegral . fromEnum) sensitive
gtk_entry_set_icon_sensitive entry' iconPos' sensitive'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetIconSensitiveMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Bool -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetIconSensitiveMethodInfo a signature where
overloadedMethod _ = entrySetIconSensitive
#endif
foreign import ccall "gtk_entry_set_icon_tooltip_markup" gtk_entry_set_icon_tooltip_markup ::
Ptr Entry ->
CUInt ->
CString ->
IO ()
entrySetIconTooltipMarkup ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> Maybe (T.Text)
-> m ()
entrySetIconTooltipMarkup entry iconPos tooltip = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
maybeTooltip <- case tooltip of
Nothing -> return nullPtr
Just jTooltip -> do
jTooltip' <- textToCString jTooltip
return jTooltip'
gtk_entry_set_icon_tooltip_markup entry' iconPos' maybeTooltip
touchManagedPtr entry
freeMem maybeTooltip
return ()
#if ENABLE_OVERLOADING
data EntrySetIconTooltipMarkupMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Maybe (T.Text) -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetIconTooltipMarkupMethodInfo a signature where
overloadedMethod _ = entrySetIconTooltipMarkup
#endif
foreign import ccall "gtk_entry_set_icon_tooltip_text" gtk_entry_set_icon_tooltip_text ::
Ptr Entry ->
CUInt ->
CString ->
IO ()
entrySetIconTooltipText ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.EntryIconPosition
-> Maybe (T.Text)
-> m ()
entrySetIconTooltipText entry iconPos tooltip = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let iconPos' = (fromIntegral . fromEnum) iconPos
maybeTooltip <- case tooltip of
Nothing -> return nullPtr
Just jTooltip -> do
jTooltip' <- textToCString jTooltip
return jTooltip'
gtk_entry_set_icon_tooltip_text entry' iconPos' maybeTooltip
touchManagedPtr entry
freeMem maybeTooltip
return ()
#if ENABLE_OVERLOADING
data EntrySetIconTooltipTextMethodInfo
instance (signature ~ (Gtk.Enums.EntryIconPosition -> Maybe (T.Text) -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetIconTooltipTextMethodInfo a signature where
overloadedMethod _ = entrySetIconTooltipText
#endif
foreign import ccall "gtk_entry_set_inner_border" gtk_entry_set_inner_border ::
Ptr Entry ->
Ptr Gtk.Border.Border ->
IO ()
{-# DEPRECATED entrySetInnerBorder ["(Since version 3.4)","Use the standard border and padding CSS properties (through"," objects like 'GI.Gtk.Objects.StyleContext.StyleContext' and 'GI.Gtk.Objects.CssProvider.CssProvider'); the value set with"," this function is ignored by 'GI.Gtk.Objects.Entry.Entry'."] #-}
entrySetInnerBorder ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Maybe (Gtk.Border.Border)
-> m ()
entrySetInnerBorder entry border = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
maybeBorder <- case border of
Nothing -> return nullPtr
Just jBorder -> do
jBorder' <- unsafeManagedPtrGetPtr jBorder
return jBorder'
gtk_entry_set_inner_border entry' maybeBorder
touchManagedPtr entry
whenJust border touchManagedPtr
return ()
#if ENABLE_OVERLOADING
data EntrySetInnerBorderMethodInfo
instance (signature ~ (Maybe (Gtk.Border.Border) -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetInnerBorderMethodInfo a signature where
overloadedMethod _ = entrySetInnerBorder
#endif
foreign import ccall "gtk_entry_set_input_hints" gtk_entry_set_input_hints ::
Ptr Entry ->
CUInt ->
IO ()
entrySetInputHints ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> [Gtk.Flags.InputHints]
-> m ()
entrySetInputHints entry hints = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let hints' = gflagsToWord hints
gtk_entry_set_input_hints entry' hints'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetInputHintsMethodInfo
instance (signature ~ ([Gtk.Flags.InputHints] -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetInputHintsMethodInfo a signature where
overloadedMethod _ = entrySetInputHints
#endif
foreign import ccall "gtk_entry_set_input_purpose" gtk_entry_set_input_purpose ::
Ptr Entry ->
CUInt ->
IO ()
entrySetInputPurpose ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Gtk.Enums.InputPurpose
-> m ()
entrySetInputPurpose entry purpose = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let purpose' = (fromIntegral . fromEnum) purpose
gtk_entry_set_input_purpose entry' purpose'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetInputPurposeMethodInfo
instance (signature ~ (Gtk.Enums.InputPurpose -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetInputPurposeMethodInfo a signature where
overloadedMethod _ = entrySetInputPurpose
#endif
foreign import ccall "gtk_entry_set_invisible_char" gtk_entry_set_invisible_char ::
Ptr Entry ->
CInt ->
IO ()
entrySetInvisibleChar ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Char
-> m ()
entrySetInvisibleChar entry ch = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let ch' = (fromIntegral . ord) ch
gtk_entry_set_invisible_char entry' ch'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetInvisibleCharMethodInfo
instance (signature ~ (Char -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetInvisibleCharMethodInfo a signature where
overloadedMethod _ = entrySetInvisibleChar
#endif
foreign import ccall "gtk_entry_set_max_length" gtk_entry_set_max_length ::
Ptr Entry ->
Int32 ->
IO ()
entrySetMaxLength ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Int32
-> m ()
entrySetMaxLength entry max = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
gtk_entry_set_max_length entry' max
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetMaxLengthMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetMaxLengthMethodInfo a signature where
overloadedMethod _ = entrySetMaxLength
#endif
foreign import ccall "gtk_entry_set_max_width_chars" gtk_entry_set_max_width_chars ::
Ptr Entry ->
Int32 ->
IO ()
entrySetMaxWidthChars ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Int32
-> m ()
entrySetMaxWidthChars entry nChars = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
gtk_entry_set_max_width_chars entry' nChars
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetMaxWidthCharsMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetMaxWidthCharsMethodInfo a signature where
overloadedMethod _ = entrySetMaxWidthChars
#endif
foreign import ccall "gtk_entry_set_overwrite_mode" gtk_entry_set_overwrite_mode ::
Ptr Entry ->
CInt ->
IO ()
entrySetOverwriteMode ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Bool
-> m ()
entrySetOverwriteMode entry overwrite = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let overwrite' = (fromIntegral . fromEnum) overwrite
gtk_entry_set_overwrite_mode entry' overwrite'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetOverwriteModeMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetOverwriteModeMethodInfo a signature where
overloadedMethod _ = entrySetOverwriteMode
#endif
foreign import ccall "gtk_entry_set_placeholder_text" gtk_entry_set_placeholder_text ::
Ptr Entry ->
CString ->
IO ()
entrySetPlaceholderText ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Maybe (T.Text)
-> m ()
entrySetPlaceholderText entry text = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
maybeText <- case text of
Nothing -> return nullPtr
Just jText -> do
jText' <- textToCString jText
return jText'
gtk_entry_set_placeholder_text entry' maybeText
touchManagedPtr entry
freeMem maybeText
return ()
#if ENABLE_OVERLOADING
data EntrySetPlaceholderTextMethodInfo
instance (signature ~ (Maybe (T.Text) -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetPlaceholderTextMethodInfo a signature where
overloadedMethod _ = entrySetPlaceholderText
#endif
foreign import ccall "gtk_entry_set_progress_fraction" gtk_entry_set_progress_fraction ::
Ptr Entry ->
CDouble ->
IO ()
entrySetProgressFraction ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Double
-> m ()
entrySetProgressFraction entry fraction = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let fraction' = realToFrac fraction
gtk_entry_set_progress_fraction entry' fraction'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetProgressFractionMethodInfo
instance (signature ~ (Double -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetProgressFractionMethodInfo a signature where
overloadedMethod _ = entrySetProgressFraction
#endif
foreign import ccall "gtk_entry_set_progress_pulse_step" gtk_entry_set_progress_pulse_step ::
Ptr Entry ->
CDouble ->
IO ()
entrySetProgressPulseStep ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Double
-> m ()
entrySetProgressPulseStep entry fraction = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let fraction' = realToFrac fraction
gtk_entry_set_progress_pulse_step entry' fraction'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetProgressPulseStepMethodInfo
instance (signature ~ (Double -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetProgressPulseStepMethodInfo a signature where
overloadedMethod _ = entrySetProgressPulseStep
#endif
foreign import ccall "gtk_entry_set_tabs" gtk_entry_set_tabs ::
Ptr Entry ->
Ptr Pango.TabArray.TabArray ->
IO ()
entrySetTabs ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Pango.TabArray.TabArray
-> m ()
entrySetTabs entry tabs = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
tabs' <- unsafeManagedPtrGetPtr tabs
gtk_entry_set_tabs entry' tabs'
touchManagedPtr entry
touchManagedPtr tabs
return ()
#if ENABLE_OVERLOADING
data EntrySetTabsMethodInfo
instance (signature ~ (Pango.TabArray.TabArray -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetTabsMethodInfo a signature where
overloadedMethod _ = entrySetTabs
#endif
foreign import ccall "gtk_entry_set_text" gtk_entry_set_text ::
Ptr Entry ->
CString ->
IO ()
entrySetText ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> T.Text
-> m ()
entrySetText entry text = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
text' <- textToCString text
gtk_entry_set_text entry' text'
touchManagedPtr entry
freeMem text'
return ()
#if ENABLE_OVERLOADING
data EntrySetTextMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetTextMethodInfo a signature where
overloadedMethod _ = entrySetText
#endif
foreign import ccall "gtk_entry_set_visibility" gtk_entry_set_visibility ::
Ptr Entry ->
CInt ->
IO ()
entrySetVisibility ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Bool
-> m ()
entrySetVisibility entry visible = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
let visible' = (fromIntegral . fromEnum) visible
gtk_entry_set_visibility entry' visible'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetVisibilityMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetVisibilityMethodInfo a signature where
overloadedMethod _ = entrySetVisibility
#endif
foreign import ccall "gtk_entry_set_width_chars" gtk_entry_set_width_chars ::
Ptr Entry ->
Int32 ->
IO ()
entrySetWidthChars ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Int32
-> m ()
entrySetWidthChars entry nChars = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
gtk_entry_set_width_chars entry' nChars
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntrySetWidthCharsMethodInfo
instance (signature ~ (Int32 -> m ()), MonadIO m, IsEntry a) => O.MethodInfo EntrySetWidthCharsMethodInfo a signature where
overloadedMethod _ = entrySetWidthChars
#endif
foreign import ccall "gtk_entry_text_index_to_layout_index" gtk_entry_text_index_to_layout_index ::
Ptr Entry ->
Int32 ->
IO Int32
entryTextIndexToLayoutIndex ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> Int32
-> m Int32
entryTextIndexToLayoutIndex entry textIndex = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
result <- gtk_entry_text_index_to_layout_index entry' textIndex
touchManagedPtr entry
return result
#if ENABLE_OVERLOADING
data EntryTextIndexToLayoutIndexMethodInfo
instance (signature ~ (Int32 -> m Int32), MonadIO m, IsEntry a) => O.MethodInfo EntryTextIndexToLayoutIndexMethodInfo a signature where
overloadedMethod _ = entryTextIndexToLayoutIndex
#endif
foreign import ccall "gtk_entry_unset_invisible_char" gtk_entry_unset_invisible_char ::
Ptr Entry ->
IO ()
entryUnsetInvisibleChar ::
(B.CallStack.HasCallStack, MonadIO m, IsEntry a) =>
a
-> m ()
entryUnsetInvisibleChar entry = liftIO $ do
entry' <- unsafeManagedPtrCastPtr entry
gtk_entry_unset_invisible_char entry'
touchManagedPtr entry
return ()
#if ENABLE_OVERLOADING
data EntryUnsetInvisibleCharMethodInfo
instance (signature ~ (m ()), MonadIO m, IsEntry a) => O.MethodInfo EntryUnsetInvisibleCharMethodInfo a signature where
overloadedMethod _ = entryUnsetInvisibleChar
#endif