{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gtk.Objects.Entry
(
Entry(..) ,
IsEntry ,
toEntry ,
#if defined(ENABLE_OVERLOADING)
ResolveEntryMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
EntryGetActivatesDefaultMethodInfo ,
#endif
entryGetActivatesDefault ,
#if defined(ENABLE_OVERLOADING)
EntryGetAlignmentMethodInfo ,
#endif
entryGetAlignment ,
#if defined(ENABLE_OVERLOADING)
EntryGetAttributesMethodInfo ,
#endif
entryGetAttributes ,
#if defined(ENABLE_OVERLOADING)
EntryGetBufferMethodInfo ,
#endif
entryGetBuffer ,
#if defined(ENABLE_OVERLOADING)
EntryGetCompletionMethodInfo ,
#endif
entryGetCompletion ,
#if defined(ENABLE_OVERLOADING)
EntryGetCurrentIconDragSourceMethodInfo ,
#endif
entryGetCurrentIconDragSource ,
#if defined(ENABLE_OVERLOADING)
EntryGetCursorHadjustmentMethodInfo ,
#endif
entryGetCursorHadjustment ,
#if defined(ENABLE_OVERLOADING)
EntryGetHasFrameMethodInfo ,
#endif
entryGetHasFrame ,
#if defined(ENABLE_OVERLOADING)
EntryGetIconActivatableMethodInfo ,
#endif
entryGetIconActivatable ,
#if defined(ENABLE_OVERLOADING)
EntryGetIconAreaMethodInfo ,
#endif
entryGetIconArea ,
#if defined(ENABLE_OVERLOADING)
EntryGetIconAtPosMethodInfo ,
#endif
entryGetIconAtPos ,
#if defined(ENABLE_OVERLOADING)
EntryGetIconGiconMethodInfo ,
#endif
entryGetIconGicon ,
#if defined(ENABLE_OVERLOADING)
EntryGetIconNameMethodInfo ,
#endif
entryGetIconName ,
#if defined(ENABLE_OVERLOADING)
EntryGetIconPixbufMethodInfo ,
#endif
entryGetIconPixbuf ,
#if defined(ENABLE_OVERLOADING)
EntryGetIconSensitiveMethodInfo ,
#endif
entryGetIconSensitive ,
#if defined(ENABLE_OVERLOADING)
EntryGetIconStockMethodInfo ,
#endif
entryGetIconStock ,
#if defined(ENABLE_OVERLOADING)
EntryGetIconStorageTypeMethodInfo ,
#endif
entryGetIconStorageType ,
#if defined(ENABLE_OVERLOADING)
EntryGetIconTooltipMarkupMethodInfo ,
#endif
entryGetIconTooltipMarkup ,
#if defined(ENABLE_OVERLOADING)
EntryGetIconTooltipTextMethodInfo ,
#endif
entryGetIconTooltipText ,
#if defined(ENABLE_OVERLOADING)
EntryGetInnerBorderMethodInfo ,
#endif
entryGetInnerBorder ,
#if defined(ENABLE_OVERLOADING)
EntryGetInputHintsMethodInfo ,
#endif
entryGetInputHints ,
#if defined(ENABLE_OVERLOADING)
EntryGetInputPurposeMethodInfo ,
#endif
entryGetInputPurpose ,
#if defined(ENABLE_OVERLOADING)
EntryGetInvisibleCharMethodInfo ,
#endif
entryGetInvisibleChar ,
#if defined(ENABLE_OVERLOADING)
EntryGetLayoutMethodInfo ,
#endif
entryGetLayout ,
#if defined(ENABLE_OVERLOADING)
EntryGetLayoutOffsetsMethodInfo ,
#endif
entryGetLayoutOffsets ,
#if defined(ENABLE_OVERLOADING)
EntryGetMaxLengthMethodInfo ,
#endif
entryGetMaxLength ,
#if defined(ENABLE_OVERLOADING)
EntryGetMaxWidthCharsMethodInfo ,
#endif
entryGetMaxWidthChars ,
#if defined(ENABLE_OVERLOADING)
EntryGetOverwriteModeMethodInfo ,
#endif
entryGetOverwriteMode ,
#if defined(ENABLE_OVERLOADING)
EntryGetPlaceholderTextMethodInfo ,
#endif
entryGetPlaceholderText ,
#if defined(ENABLE_OVERLOADING)
EntryGetProgressFractionMethodInfo ,
#endif
entryGetProgressFraction ,
#if defined(ENABLE_OVERLOADING)
EntryGetProgressPulseStepMethodInfo ,
#endif
entryGetProgressPulseStep ,
#if defined(ENABLE_OVERLOADING)
EntryGetTabsMethodInfo ,
#endif
entryGetTabs ,
#if defined(ENABLE_OVERLOADING)
EntryGetTextMethodInfo ,
#endif
entryGetText ,
#if defined(ENABLE_OVERLOADING)
EntryGetTextAreaMethodInfo ,
#endif
entryGetTextArea ,
#if defined(ENABLE_OVERLOADING)
EntryGetTextLengthMethodInfo ,
#endif
entryGetTextLength ,
#if defined(ENABLE_OVERLOADING)
EntryGetVisibilityMethodInfo ,
#endif
entryGetVisibility ,
#if defined(ENABLE_OVERLOADING)
EntryGetWidthCharsMethodInfo ,
#endif
entryGetWidthChars ,
#if defined(ENABLE_OVERLOADING)
EntryGrabFocusWithoutSelectingMethodInfo,
#endif
entryGrabFocusWithoutSelecting ,
#if defined(ENABLE_OVERLOADING)
EntryImContextFilterKeypressMethodInfo ,
#endif
entryImContextFilterKeypress ,
#if defined(ENABLE_OVERLOADING)
EntryLayoutIndexToTextIndexMethodInfo ,
#endif
entryLayoutIndexToTextIndex ,
entryNew ,
entryNewWithBuffer ,
#if defined(ENABLE_OVERLOADING)
EntryProgressPulseMethodInfo ,
#endif
entryProgressPulse ,
#if defined(ENABLE_OVERLOADING)
EntryResetImContextMethodInfo ,
#endif
entryResetImContext ,
#if defined(ENABLE_OVERLOADING)
EntrySetActivatesDefaultMethodInfo ,
#endif
entrySetActivatesDefault ,
#if defined(ENABLE_OVERLOADING)
EntrySetAlignmentMethodInfo ,
#endif
entrySetAlignment ,
#if defined(ENABLE_OVERLOADING)
EntrySetAttributesMethodInfo ,
#endif
entrySetAttributes ,
#if defined(ENABLE_OVERLOADING)
EntrySetBufferMethodInfo ,
#endif
entrySetBuffer ,
#if defined(ENABLE_OVERLOADING)
EntrySetCompletionMethodInfo ,
#endif
entrySetCompletion ,
#if defined(ENABLE_OVERLOADING)
EntrySetCursorHadjustmentMethodInfo ,
#endif
entrySetCursorHadjustment ,
#if defined(ENABLE_OVERLOADING)
EntrySetHasFrameMethodInfo ,
#endif
entrySetHasFrame ,
#if defined(ENABLE_OVERLOADING)
EntrySetIconActivatableMethodInfo ,
#endif
entrySetIconActivatable ,
#if defined(ENABLE_OVERLOADING)
EntrySetIconDragSourceMethodInfo ,
#endif
entrySetIconDragSource ,
#if defined(ENABLE_OVERLOADING)
EntrySetIconFromGiconMethodInfo ,
#endif
entrySetIconFromGicon ,
#if defined(ENABLE_OVERLOADING)
EntrySetIconFromIconNameMethodInfo ,
#endif
entrySetIconFromIconName ,
#if defined(ENABLE_OVERLOADING)
EntrySetIconFromPixbufMethodInfo ,
#endif
entrySetIconFromPixbuf ,
#if defined(ENABLE_OVERLOADING)
EntrySetIconFromStockMethodInfo ,
#endif
entrySetIconFromStock ,
#if defined(ENABLE_OVERLOADING)
EntrySetIconSensitiveMethodInfo ,
#endif
entrySetIconSensitive ,
#if defined(ENABLE_OVERLOADING)
EntrySetIconTooltipMarkupMethodInfo ,
#endif
entrySetIconTooltipMarkup ,
#if defined(ENABLE_OVERLOADING)
EntrySetIconTooltipTextMethodInfo ,
#endif
entrySetIconTooltipText ,
#if defined(ENABLE_OVERLOADING)
EntrySetInnerBorderMethodInfo ,
#endif
entrySetInnerBorder ,
#if defined(ENABLE_OVERLOADING)
EntrySetInputHintsMethodInfo ,
#endif
entrySetInputHints ,
#if defined(ENABLE_OVERLOADING)
EntrySetInputPurposeMethodInfo ,
#endif
entrySetInputPurpose ,
#if defined(ENABLE_OVERLOADING)
EntrySetInvisibleCharMethodInfo ,
#endif
entrySetInvisibleChar ,
#if defined(ENABLE_OVERLOADING)
EntrySetMaxLengthMethodInfo ,
#endif
entrySetMaxLength ,
#if defined(ENABLE_OVERLOADING)
EntrySetMaxWidthCharsMethodInfo ,
#endif
entrySetMaxWidthChars ,
#if defined(ENABLE_OVERLOADING)
EntrySetOverwriteModeMethodInfo ,
#endif
entrySetOverwriteMode ,
#if defined(ENABLE_OVERLOADING)
EntrySetPlaceholderTextMethodInfo ,
#endif
entrySetPlaceholderText ,
#if defined(ENABLE_OVERLOADING)
EntrySetProgressFractionMethodInfo ,
#endif
entrySetProgressFraction ,
#if defined(ENABLE_OVERLOADING)
EntrySetProgressPulseStepMethodInfo ,
#endif
entrySetProgressPulseStep ,
#if defined(ENABLE_OVERLOADING)
EntrySetTabsMethodInfo ,
#endif
entrySetTabs ,
#if defined(ENABLE_OVERLOADING)
EntrySetTextMethodInfo ,
#endif
entrySetText ,
#if defined(ENABLE_OVERLOADING)
EntrySetVisibilityMethodInfo ,
#endif
entrySetVisibility ,
#if defined(ENABLE_OVERLOADING)
EntrySetWidthCharsMethodInfo ,
#endif
entrySetWidthChars ,
#if defined(ENABLE_OVERLOADING)
EntryTextIndexToLayoutIndexMethodInfo ,
#endif
entryTextIndexToLayoutIndex ,
#if defined(ENABLE_OVERLOADING)
EntryUnsetInvisibleCharMethodInfo ,
#endif
entryUnsetInvisibleChar ,
#if defined(ENABLE_OVERLOADING)
EntryActivatesDefaultPropertyInfo ,
#endif
constructEntryActivatesDefault ,
#if defined(ENABLE_OVERLOADING)
entryActivatesDefault ,
#endif
getEntryActivatesDefault ,
setEntryActivatesDefault ,
#if defined(ENABLE_OVERLOADING)
EntryAttributesPropertyInfo ,
#endif
constructEntryAttributes ,
#if defined(ENABLE_OVERLOADING)
entryAttributes ,
#endif
getEntryAttributes ,
setEntryAttributes ,
#if defined(ENABLE_OVERLOADING)
EntryBufferPropertyInfo ,
#endif
constructEntryBuffer ,
#if defined(ENABLE_OVERLOADING)
entryBuffer ,
#endif
getEntryBuffer ,
setEntryBuffer ,
#if defined(ENABLE_OVERLOADING)
EntryCapsLockWarningPropertyInfo ,
#endif
constructEntryCapsLockWarning ,
#if defined(ENABLE_OVERLOADING)
entryCapsLockWarning ,
#endif
getEntryCapsLockWarning ,
setEntryCapsLockWarning ,
#if defined(ENABLE_OVERLOADING)
EntryCompletionPropertyInfo ,
#endif
clearEntryCompletion ,
constructEntryCompletion ,
#if defined(ENABLE_OVERLOADING)
entryCompletion ,
#endif
getEntryCompletion ,
setEntryCompletion ,
#if defined(ENABLE_OVERLOADING)
EntryCursorPositionPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
entryCursorPosition ,
#endif
getEntryCursorPosition ,
#if defined(ENABLE_OVERLOADING)
EntryEditablePropertyInfo ,
#endif
constructEntryEditable ,
#if defined(ENABLE_OVERLOADING)
entryEditable ,
#endif
getEntryEditable ,
setEntryEditable ,
#if defined(ENABLE_OVERLOADING)
EntryEnableEmojiCompletionPropertyInfo ,
#endif
constructEntryEnableEmojiCompletion ,
#if defined(ENABLE_OVERLOADING)
entryEnableEmojiCompletion ,
#endif
getEntryEnableEmojiCompletion ,
setEntryEnableEmojiCompletion ,
#if defined(ENABLE_OVERLOADING)
EntryHasFramePropertyInfo ,
#endif
constructEntryHasFrame ,
#if defined(ENABLE_OVERLOADING)
entryHasFrame ,
#endif
getEntryHasFrame ,
setEntryHasFrame ,
#if defined(ENABLE_OVERLOADING)
EntryImModulePropertyInfo ,
#endif
clearEntryImModule ,
constructEntryImModule ,
#if defined(ENABLE_OVERLOADING)
entryImModule ,
#endif
getEntryImModule ,
setEntryImModule ,
#if defined(ENABLE_OVERLOADING)
EntryInnerBorderPropertyInfo ,
#endif
clearEntryInnerBorder ,
constructEntryInnerBorder ,
#if defined(ENABLE_OVERLOADING)
entryInnerBorder ,
#endif
getEntryInnerBorder ,
setEntryInnerBorder ,
#if defined(ENABLE_OVERLOADING)
EntryInputHintsPropertyInfo ,
#endif
constructEntryInputHints ,
#if defined(ENABLE_OVERLOADING)
entryInputHints ,
#endif
getEntryInputHints ,
setEntryInputHints ,
#if defined(ENABLE_OVERLOADING)
EntryInputPurposePropertyInfo ,
#endif
constructEntryInputPurpose ,
#if defined(ENABLE_OVERLOADING)
entryInputPurpose ,
#endif
getEntryInputPurpose ,
setEntryInputPurpose ,
#if defined(ENABLE_OVERLOADING)
EntryInvisibleCharPropertyInfo ,
#endif
constructEntryInvisibleChar ,
#if defined(ENABLE_OVERLOADING)
entryInvisibleChar ,
#endif
getEntryInvisibleChar ,
setEntryInvisibleChar ,
#if defined(ENABLE_OVERLOADING)
EntryInvisibleCharSetPropertyInfo ,
#endif
constructEntryInvisibleCharSet ,
#if defined(ENABLE_OVERLOADING)
entryInvisibleCharSet ,
#endif
getEntryInvisibleCharSet ,
setEntryInvisibleCharSet ,
#if defined(ENABLE_OVERLOADING)
EntryMaxLengthPropertyInfo ,
#endif
constructEntryMaxLength ,
#if defined(ENABLE_OVERLOADING)
entryMaxLength ,
#endif
getEntryMaxLength ,
setEntryMaxLength ,
#if defined(ENABLE_OVERLOADING)
EntryMaxWidthCharsPropertyInfo ,
#endif
constructEntryMaxWidthChars ,
#if defined(ENABLE_OVERLOADING)
entryMaxWidthChars ,
#endif
getEntryMaxWidthChars ,
setEntryMaxWidthChars ,
#if defined(ENABLE_OVERLOADING)
EntryOverwriteModePropertyInfo ,
#endif
constructEntryOverwriteMode ,
#if defined(ENABLE_OVERLOADING)
entryOverwriteMode ,
#endif
getEntryOverwriteMode ,
setEntryOverwriteMode ,
#if defined(ENABLE_OVERLOADING)
EntryPlaceholderTextPropertyInfo ,
#endif
clearEntryPlaceholderText ,
constructEntryPlaceholderText ,
#if defined(ENABLE_OVERLOADING)
entryPlaceholderText ,
#endif
getEntryPlaceholderText ,
setEntryPlaceholderText ,
#if defined(ENABLE_OVERLOADING)
EntryPopulateAllPropertyInfo ,
#endif
constructEntryPopulateAll ,
#if defined(ENABLE_OVERLOADING)
entryPopulateAll ,
#endif
getEntryPopulateAll ,
setEntryPopulateAll ,
#if defined(ENABLE_OVERLOADING)
EntryPrimaryIconActivatablePropertyInfo ,
#endif
constructEntryPrimaryIconActivatable ,
#if defined(ENABLE_OVERLOADING)
entryPrimaryIconActivatable ,
#endif
getEntryPrimaryIconActivatable ,
setEntryPrimaryIconActivatable ,
#if defined(ENABLE_OVERLOADING)
EntryPrimaryIconGiconPropertyInfo ,
#endif
clearEntryPrimaryIconGicon ,
constructEntryPrimaryIconGicon ,
#if defined(ENABLE_OVERLOADING)
entryPrimaryIconGicon ,
#endif
getEntryPrimaryIconGicon ,
setEntryPrimaryIconGicon ,
#if defined(ENABLE_OVERLOADING)
EntryPrimaryIconNamePropertyInfo ,
#endif
clearEntryPrimaryIconName ,
constructEntryPrimaryIconName ,
#if defined(ENABLE_OVERLOADING)
entryPrimaryIconName ,
#endif
getEntryPrimaryIconName ,
setEntryPrimaryIconName ,
#if defined(ENABLE_OVERLOADING)
EntryPrimaryIconPixbufPropertyInfo ,
#endif
clearEntryPrimaryIconPixbuf ,
constructEntryPrimaryIconPixbuf ,
#if defined(ENABLE_OVERLOADING)
entryPrimaryIconPixbuf ,
#endif
getEntryPrimaryIconPixbuf ,
setEntryPrimaryIconPixbuf ,
#if defined(ENABLE_OVERLOADING)
EntryPrimaryIconSensitivePropertyInfo ,
#endif
constructEntryPrimaryIconSensitive ,
#if defined(ENABLE_OVERLOADING)
entryPrimaryIconSensitive ,
#endif
getEntryPrimaryIconSensitive ,
setEntryPrimaryIconSensitive ,
#if defined(ENABLE_OVERLOADING)
EntryPrimaryIconStockPropertyInfo ,
#endif
clearEntryPrimaryIconStock ,
constructEntryPrimaryIconStock ,
#if defined(ENABLE_OVERLOADING)
entryPrimaryIconStock ,
#endif
getEntryPrimaryIconStock ,
setEntryPrimaryIconStock ,
#if defined(ENABLE_OVERLOADING)
EntryPrimaryIconStorageTypePropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
entryPrimaryIconStorageType ,
#endif
getEntryPrimaryIconStorageType ,
#if defined(ENABLE_OVERLOADING)
EntryPrimaryIconTooltipMarkupPropertyInfo,
#endif
clearEntryPrimaryIconTooltipMarkup ,
constructEntryPrimaryIconTooltipMarkup ,
#if defined(ENABLE_OVERLOADING)
entryPrimaryIconTooltipMarkup ,
#endif
getEntryPrimaryIconTooltipMarkup ,
setEntryPrimaryIconTooltipMarkup ,
#if defined(ENABLE_OVERLOADING)
EntryPrimaryIconTooltipTextPropertyInfo ,
#endif
clearEntryPrimaryIconTooltipText ,
constructEntryPrimaryIconTooltipText ,
#if defined(ENABLE_OVERLOADING)
entryPrimaryIconTooltipText ,
#endif
getEntryPrimaryIconTooltipText ,
setEntryPrimaryIconTooltipText ,
#if defined(ENABLE_OVERLOADING)
EntryProgressFractionPropertyInfo ,
#endif
constructEntryProgressFraction ,
#if defined(ENABLE_OVERLOADING)
entryProgressFraction ,
#endif
getEntryProgressFraction ,
setEntryProgressFraction ,
#if defined(ENABLE_OVERLOADING)
EntryProgressPulseStepPropertyInfo ,
#endif
constructEntryProgressPulseStep ,
#if defined(ENABLE_OVERLOADING)
entryProgressPulseStep ,
#endif
getEntryProgressPulseStep ,
setEntryProgressPulseStep ,
#if defined(ENABLE_OVERLOADING)
EntryScrollOffsetPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
entryScrollOffset ,
#endif
getEntryScrollOffset ,
#if defined(ENABLE_OVERLOADING)
EntrySecondaryIconActivatablePropertyInfo,
#endif
constructEntrySecondaryIconActivatable ,
#if defined(ENABLE_OVERLOADING)
entrySecondaryIconActivatable ,
#endif
getEntrySecondaryIconActivatable ,
setEntrySecondaryIconActivatable ,
#if defined(ENABLE_OVERLOADING)
EntrySecondaryIconGiconPropertyInfo ,
#endif
clearEntrySecondaryIconGicon ,
constructEntrySecondaryIconGicon ,
#if defined(ENABLE_OVERLOADING)
entrySecondaryIconGicon ,
#endif
getEntrySecondaryIconGicon ,
setEntrySecondaryIconGicon ,
#if defined(ENABLE_OVERLOADING)
EntrySecondaryIconNamePropertyInfo ,
#endif
clearEntrySecondaryIconName ,
constructEntrySecondaryIconName ,
#if defined(ENABLE_OVERLOADING)
entrySecondaryIconName ,
#endif
getEntrySecondaryIconName ,
setEntrySecondaryIconName ,
#if defined(ENABLE_OVERLOADING)
EntrySecondaryIconPixbufPropertyInfo ,
#endif
clearEntrySecondaryIconPixbuf ,
constructEntrySecondaryIconPixbuf ,
#if defined(ENABLE_OVERLOADING)
entrySecondaryIconPixbuf ,
#endif
getEntrySecondaryIconPixbuf ,
setEntrySecondaryIconPixbuf ,
#if defined(ENABLE_OVERLOADING)
EntrySecondaryIconSensitivePropertyInfo ,
#endif
constructEntrySecondaryIconSensitive ,
#if defined(ENABLE_OVERLOADING)
entrySecondaryIconSensitive ,
#endif
getEntrySecondaryIconSensitive ,
setEntrySecondaryIconSensitive ,
#if defined(ENABLE_OVERLOADING)
EntrySecondaryIconStockPropertyInfo ,
#endif
clearEntrySecondaryIconStock ,
constructEntrySecondaryIconStock ,
#if defined(ENABLE_OVERLOADING)
entrySecondaryIconStock ,
#endif
getEntrySecondaryIconStock ,
setEntrySecondaryIconStock ,
#if defined(ENABLE_OVERLOADING)
EntrySecondaryIconStorageTypePropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
entrySecondaryIconStorageType ,
#endif
getEntrySecondaryIconStorageType ,
#if defined(ENABLE_OVERLOADING)
EntrySecondaryIconTooltipMarkupPropertyInfo,
#endif
clearEntrySecondaryIconTooltipMarkup ,
constructEntrySecondaryIconTooltipMarkup,
#if defined(ENABLE_OVERLOADING)
entrySecondaryIconTooltipMarkup ,
#endif
getEntrySecondaryIconTooltipMarkup ,
setEntrySecondaryIconTooltipMarkup ,
#if defined(ENABLE_OVERLOADING)
EntrySecondaryIconTooltipTextPropertyInfo,
#endif
clearEntrySecondaryIconTooltipText ,
constructEntrySecondaryIconTooltipText ,
#if defined(ENABLE_OVERLOADING)
entrySecondaryIconTooltipText ,
#endif
getEntrySecondaryIconTooltipText ,
setEntrySecondaryIconTooltipText ,
#if defined(ENABLE_OVERLOADING)
EntrySelectionBoundPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
entrySelectionBound ,
#endif
getEntrySelectionBound ,
#if defined(ENABLE_OVERLOADING)
EntryShadowTypePropertyInfo ,
#endif
constructEntryShadowType ,
#if defined(ENABLE_OVERLOADING)
entryShadowType ,
#endif
getEntryShadowType ,
setEntryShadowType ,
#if defined(ENABLE_OVERLOADING)
EntryShowEmojiIconPropertyInfo ,
#endif
constructEntryShowEmojiIcon ,
#if defined(ENABLE_OVERLOADING)
entryShowEmojiIcon ,
#endif
getEntryShowEmojiIcon ,
setEntryShowEmojiIcon ,
#if defined(ENABLE_OVERLOADING)
EntryTabsPropertyInfo ,
#endif
constructEntryTabs ,
#if defined(ENABLE_OVERLOADING)
entryTabs ,
#endif
getEntryTabs ,
setEntryTabs ,
#if defined(ENABLE_OVERLOADING)
EntryTextPropertyInfo ,
#endif
constructEntryText ,
#if defined(ENABLE_OVERLOADING)
entryText ,
#endif
getEntryText ,
setEntryText ,
#if defined(ENABLE_OVERLOADING)
EntryTextLengthPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
entryTextLength ,
#endif
getEntryTextLength ,
#if defined(ENABLE_OVERLOADING)
EntryTruncateMultilinePropertyInfo ,
#endif
constructEntryTruncateMultiline ,
#if defined(ENABLE_OVERLOADING)
entryTruncateMultiline ,
#endif
getEntryTruncateMultiline ,
setEntryTruncateMultiline ,
#if defined(ENABLE_OVERLOADING)
EntryVisibilityPropertyInfo ,
#endif
constructEntryVisibility ,
#if defined(ENABLE_OVERLOADING)
entryVisibility ,
#endif
getEntryVisibility ,
setEntryVisibility ,
#if defined(ENABLE_OVERLOADING)
EntryWidthCharsPropertyInfo ,
#endif
constructEntryWidthChars ,
#if defined(ENABLE_OVERLOADING)
entryWidthChars ,
#endif
getEntryWidthChars ,
setEntryWidthChars ,
#if defined(ENABLE_OVERLOADING)
EntryXalignPropertyInfo ,
#endif
constructEntryXalign ,
#if defined(ENABLE_OVERLOADING)
entryXalign ,
#endif
getEntryXalign ,
setEntryXalign ,
C_EntryActivateCallback ,
EntryActivateCallback ,
#if defined(ENABLE_OVERLOADING)
EntryActivateSignalInfo ,
#endif
afterEntryActivate ,
genClosure_EntryActivate ,
mk_EntryActivateCallback ,
noEntryActivateCallback ,
onEntryActivate ,
wrap_EntryActivateCallback ,
C_EntryBackspaceCallback ,
EntryBackspaceCallback ,
#if defined(ENABLE_OVERLOADING)
EntryBackspaceSignalInfo ,
#endif
afterEntryBackspace ,
genClosure_EntryBackspace ,
mk_EntryBackspaceCallback ,
noEntryBackspaceCallback ,
onEntryBackspace ,
wrap_EntryBackspaceCallback ,
C_EntryCopyClipboardCallback ,
EntryCopyClipboardCallback ,
#if defined(ENABLE_OVERLOADING)
EntryCopyClipboardSignalInfo ,
#endif
afterEntryCopyClipboard ,
genClosure_EntryCopyClipboard ,
mk_EntryCopyClipboardCallback ,
noEntryCopyClipboardCallback ,
onEntryCopyClipboard ,
wrap_EntryCopyClipboardCallback ,
C_EntryCutClipboardCallback ,
EntryCutClipboardCallback ,
#if defined(ENABLE_OVERLOADING)
EntryCutClipboardSignalInfo ,
#endif
afterEntryCutClipboard ,
genClosure_EntryCutClipboard ,
mk_EntryCutClipboardCallback ,
noEntryCutClipboardCallback ,
onEntryCutClipboard ,
wrap_EntryCutClipboardCallback ,
C_EntryDeleteFromCursorCallback ,
EntryDeleteFromCursorCallback ,
#if defined(ENABLE_OVERLOADING)
EntryDeleteFromCursorSignalInfo ,
#endif
afterEntryDeleteFromCursor ,
genClosure_EntryDeleteFromCursor ,
mk_EntryDeleteFromCursorCallback ,
noEntryDeleteFromCursorCallback ,
onEntryDeleteFromCursor ,
wrap_EntryDeleteFromCursorCallback ,
C_EntryIconPressCallback ,
EntryIconPressCallback ,
#if defined(ENABLE_OVERLOADING)
EntryIconPressSignalInfo ,
#endif
afterEntryIconPress ,
genClosure_EntryIconPress ,
mk_EntryIconPressCallback ,
noEntryIconPressCallback ,
onEntryIconPress ,
wrap_EntryIconPressCallback ,
C_EntryIconReleaseCallback ,
EntryIconReleaseCallback ,
#if defined(ENABLE_OVERLOADING)
EntryIconReleaseSignalInfo ,
#endif
afterEntryIconRelease ,
genClosure_EntryIconRelease ,
mk_EntryIconReleaseCallback ,
noEntryIconReleaseCallback ,
onEntryIconRelease ,
wrap_EntryIconReleaseCallback ,
C_EntryInsertAtCursorCallback ,
EntryInsertAtCursorCallback ,
#if defined(ENABLE_OVERLOADING)
EntryInsertAtCursorSignalInfo ,
#endif
afterEntryInsertAtCursor ,
genClosure_EntryInsertAtCursor ,
mk_EntryInsertAtCursorCallback ,
noEntryInsertAtCursorCallback ,
onEntryInsertAtCursor ,
wrap_EntryInsertAtCursorCallback ,
C_EntryInsertEmojiCallback ,
EntryInsertEmojiCallback ,
#if defined(ENABLE_OVERLOADING)
EntryInsertEmojiSignalInfo ,
#endif
afterEntryInsertEmoji ,
genClosure_EntryInsertEmoji ,
mk_EntryInsertEmojiCallback ,
noEntryInsertEmojiCallback ,
onEntryInsertEmoji ,
wrap_EntryInsertEmojiCallback ,
C_EntryMoveCursorCallback ,
EntryMoveCursorCallback ,
#if defined(ENABLE_OVERLOADING)
EntryMoveCursorSignalInfo ,
#endif
afterEntryMoveCursor ,
genClosure_EntryMoveCursor ,
mk_EntryMoveCursorCallback ,
noEntryMoveCursorCallback ,
onEntryMoveCursor ,
wrap_EntryMoveCursorCallback ,
C_EntryPasteClipboardCallback ,
EntryPasteClipboardCallback ,
#if defined(ENABLE_OVERLOADING)
EntryPasteClipboardSignalInfo ,
#endif
afterEntryPasteClipboard ,
genClosure_EntryPasteClipboard ,
mk_EntryPasteClipboardCallback ,
noEntryPasteClipboardCallback ,
onEntryPasteClipboard ,
wrap_EntryPasteClipboardCallback ,
C_EntryPopulatePopupCallback ,
EntryPopulatePopupCallback ,
#if defined(ENABLE_OVERLOADING)
EntryPopulatePopupSignalInfo ,
#endif
afterEntryPopulatePopup ,
genClosure_EntryPopulatePopup ,
mk_EntryPopulatePopupCallback ,
noEntryPopulatePopupCallback ,
onEntryPopulatePopup ,
wrap_EntryPopulatePopupCallback ,
C_EntryPreeditChangedCallback ,
EntryPreeditChangedCallback ,
#if defined(ENABLE_OVERLOADING)
EntryPreeditChangedSignalInfo ,
#endif
afterEntryPreeditChanged ,
genClosure_EntryPreeditChanged ,
mk_EntryPreeditChangedCallback ,
noEntryPreeditChangedCallback ,
onEntryPreeditChanged ,
wrap_EntryPreeditChangedCallback ,
C_EntryToggleOverwriteCallback ,
EntryToggleOverwriteCallback ,
#if defined(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.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
import 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 (SP.ManagedPtr Entry)
deriving (Entry -> Entry -> Bool
(Entry -> Entry -> Bool) -> (Entry -> Entry -> Bool) -> Eq Entry
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Entry -> Entry -> Bool
$c/= :: Entry -> Entry -> Bool
== :: Entry -> Entry -> Bool
$c== :: Entry -> Entry -> Bool
Eq)
instance SP.ManagedPtrNewtype Entry where
toManagedPtr :: Entry -> ManagedPtr Entry
toManagedPtr (Entry ManagedPtr Entry
p) = ManagedPtr Entry
p
foreign import ccall "gtk_entry_get_type"
c_gtk_entry_get_type :: IO B.Types.GType
instance B.Types.TypedObject Entry where
glibType :: IO GType
glibType = IO GType
c_gtk_entry_get_type
instance B.Types.GObject Entry
instance B.GValue.IsGValue Entry where
toGValue :: Entry -> IO GValue
toGValue Entry
o = do
GType
gtype <- IO GType
c_gtk_entry_get_type
Entry -> (Ptr Entry -> IO GValue) -> IO GValue
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr Entry
o (GType -> (GValue -> Ptr Entry -> IO ()) -> Ptr Entry -> IO GValue
forall a. GType -> (GValue -> a -> IO ()) -> a -> IO GValue
B.GValue.buildGValue GType
gtype GValue -> Ptr Entry -> IO ()
forall a. GObject a => GValue -> Ptr a -> IO ()
B.GValue.set_object)
fromGValue :: GValue -> IO Entry
fromGValue GValue
gv = do
Ptr Entry
ptr <- GValue -> IO (Ptr Entry)
forall b. GObject b => GValue -> IO (Ptr b)
B.GValue.get_object GValue
gv :: IO (Ptr Entry)
(ManagedPtr Entry -> Entry) -> Ptr Entry -> IO Entry
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr Entry -> Entry
Entry Ptr Entry
ptr
class (SP.GObject o, O.IsDescendantOf Entry o) => IsEntry o
instance (SP.GObject o, O.IsDescendantOf Entry o) => IsEntry o
instance O.HasParentTypes Entry
type instance O.ParentTypes Entry = '[Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable, Gtk.CellEditable.CellEditable, Gtk.Editable.Editable]
toEntry :: (MonadIO m, IsEntry o) => o -> m Entry
toEntry :: o -> m Entry
toEntry = IO Entry -> m Entry
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Entry -> m Entry) -> (o -> IO Entry) -> o -> m Entry
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr Entry -> Entry) -> o -> IO Entry
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
unsafeCastTo ManagedPtr Entry -> Entry
Entry
#if defined(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 "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
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) => OL.IsLabel t (Entry -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#endif
type EntryActivateCallback =
IO ()
noEntryActivateCallback :: Maybe EntryActivateCallback
noEntryActivateCallback :: Maybe (IO ())
noEntryActivateCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_EntryActivateCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryActivateCallback :: C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
genClosure_EntryActivate :: MonadIO m => EntryActivateCallback -> m (GClosure C_EntryActivateCallback)
genClosure_EntryActivate :: IO () -> m (GClosure C_EntryActivateCallback)
genClosure_EntryActivate IO ()
cb = IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback))
-> IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryActivateCallback IO ()
cb
C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryActivateCallback C_EntryActivateCallback
cb' IO (FunPtr C_EntryActivateCallback)
-> (FunPtr C_EntryActivateCallback
-> IO (GClosure C_EntryActivateCallback))
-> IO (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_EntryActivateCallback
-> IO (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_EntryActivateCallback ::
EntryActivateCallback ->
C_EntryActivateCallback
wrap_EntryActivateCallback :: IO () -> C_EntryActivateCallback
wrap_EntryActivateCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onEntryActivate :: (IsEntry a, MonadIO m) => a -> EntryActivateCallback -> m SignalHandlerId
onEntryActivate :: a -> IO () -> m SignalHandlerId
onEntryActivate a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryActivateCallback IO ()
cb
FunPtr C_EntryActivateCallback
cb'' <- C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryActivateCallback C_EntryActivateCallback
cb'
a
-> Text
-> FunPtr C_EntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"activate" FunPtr C_EntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterEntryActivate :: (IsEntry a, MonadIO m) => a -> EntryActivateCallback -> m SignalHandlerId
afterEntryActivate :: a -> IO () -> m SignalHandlerId
afterEntryActivate a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryActivateCallback IO ()
cb
FunPtr C_EntryActivateCallback
cb'' <- C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryActivateCallback C_EntryActivateCallback
cb'
a
-> Text
-> FunPtr C_EntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"activate" FunPtr C_EntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data EntryActivateSignalInfo
instance SignalInfo EntryActivateSignalInfo where
type HaskellCallbackType EntryActivateSignalInfo = EntryActivateCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_EntryActivateCallback cb
cb'' <- mk_EntryActivateCallback cb'
connectSignalFunPtr obj "activate" cb'' connectMode detail
#endif
type EntryBackspaceCallback =
IO ()
noEntryBackspaceCallback :: Maybe EntryBackspaceCallback
noEntryBackspaceCallback :: Maybe (IO ())
noEntryBackspaceCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_EntryBackspaceCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryBackspaceCallback :: C_EntryBackspaceCallback -> IO (FunPtr C_EntryBackspaceCallback)
genClosure_EntryBackspace :: MonadIO m => EntryBackspaceCallback -> m (GClosure C_EntryBackspaceCallback)
genClosure_EntryBackspace :: IO () -> m (GClosure C_EntryActivateCallback)
genClosure_EntryBackspace IO ()
cb = IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback))
-> IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryBackspaceCallback IO ()
cb
C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryBackspaceCallback C_EntryActivateCallback
cb' IO (FunPtr C_EntryActivateCallback)
-> (FunPtr C_EntryActivateCallback
-> IO (GClosure C_EntryActivateCallback))
-> IO (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_EntryActivateCallback
-> IO (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_EntryBackspaceCallback ::
EntryBackspaceCallback ->
C_EntryBackspaceCallback
wrap_EntryBackspaceCallback :: IO () -> C_EntryActivateCallback
wrap_EntryBackspaceCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onEntryBackspace :: (IsEntry a, MonadIO m) => a -> EntryBackspaceCallback -> m SignalHandlerId
onEntryBackspace :: a -> IO () -> m SignalHandlerId
onEntryBackspace a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryBackspaceCallback IO ()
cb
FunPtr C_EntryActivateCallback
cb'' <- C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryBackspaceCallback C_EntryActivateCallback
cb'
a
-> Text
-> FunPtr C_EntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"backspace" FunPtr C_EntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterEntryBackspace :: (IsEntry a, MonadIO m) => a -> EntryBackspaceCallback -> m SignalHandlerId
afterEntryBackspace :: a -> IO () -> m SignalHandlerId
afterEntryBackspace a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryBackspaceCallback IO ()
cb
FunPtr C_EntryActivateCallback
cb'' <- C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryBackspaceCallback C_EntryActivateCallback
cb'
a
-> Text
-> FunPtr C_EntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"backspace" FunPtr C_EntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data EntryBackspaceSignalInfo
instance SignalInfo EntryBackspaceSignalInfo where
type HaskellCallbackType EntryBackspaceSignalInfo = EntryBackspaceCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_EntryBackspaceCallback cb
cb'' <- mk_EntryBackspaceCallback cb'
connectSignalFunPtr obj "backspace" cb'' connectMode detail
#endif
type EntryCopyClipboardCallback =
IO ()
noEntryCopyClipboardCallback :: Maybe EntryCopyClipboardCallback
noEntryCopyClipboardCallback :: Maybe (IO ())
noEntryCopyClipboardCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_EntryCopyClipboardCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryCopyClipboardCallback :: C_EntryCopyClipboardCallback -> IO (FunPtr C_EntryCopyClipboardCallback)
genClosure_EntryCopyClipboard :: MonadIO m => EntryCopyClipboardCallback -> m (GClosure C_EntryCopyClipboardCallback)
genClosure_EntryCopyClipboard :: IO () -> m (GClosure C_EntryActivateCallback)
genClosure_EntryCopyClipboard IO ()
cb = IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback))
-> IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryCopyClipboardCallback IO ()
cb
C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryCopyClipboardCallback C_EntryActivateCallback
cb' IO (FunPtr C_EntryActivateCallback)
-> (FunPtr C_EntryActivateCallback
-> IO (GClosure C_EntryActivateCallback))
-> IO (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_EntryActivateCallback
-> IO (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_EntryCopyClipboardCallback ::
EntryCopyClipboardCallback ->
C_EntryCopyClipboardCallback
wrap_EntryCopyClipboardCallback :: IO () -> C_EntryActivateCallback
wrap_EntryCopyClipboardCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onEntryCopyClipboard :: (IsEntry a, MonadIO m) => a -> EntryCopyClipboardCallback -> m SignalHandlerId
onEntryCopyClipboard :: a -> IO () -> m SignalHandlerId
onEntryCopyClipboard a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryCopyClipboardCallback IO ()
cb
FunPtr C_EntryActivateCallback
cb'' <- C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryCopyClipboardCallback C_EntryActivateCallback
cb'
a
-> Text
-> FunPtr C_EntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"copy-clipboard" FunPtr C_EntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterEntryCopyClipboard :: (IsEntry a, MonadIO m) => a -> EntryCopyClipboardCallback -> m SignalHandlerId
afterEntryCopyClipboard :: a -> IO () -> m SignalHandlerId
afterEntryCopyClipboard a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryCopyClipboardCallback IO ()
cb
FunPtr C_EntryActivateCallback
cb'' <- C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryCopyClipboardCallback C_EntryActivateCallback
cb'
a
-> Text
-> FunPtr C_EntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"copy-clipboard" FunPtr C_EntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data EntryCopyClipboardSignalInfo
instance SignalInfo EntryCopyClipboardSignalInfo where
type HaskellCallbackType EntryCopyClipboardSignalInfo = EntryCopyClipboardCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_EntryCopyClipboardCallback cb
cb'' <- mk_EntryCopyClipboardCallback cb'
connectSignalFunPtr obj "copy-clipboard" cb'' connectMode detail
#endif
type EntryCutClipboardCallback =
IO ()
noEntryCutClipboardCallback :: Maybe EntryCutClipboardCallback
noEntryCutClipboardCallback :: Maybe (IO ())
noEntryCutClipboardCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_EntryCutClipboardCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryCutClipboardCallback :: C_EntryCutClipboardCallback -> IO (FunPtr C_EntryCutClipboardCallback)
genClosure_EntryCutClipboard :: MonadIO m => EntryCutClipboardCallback -> m (GClosure C_EntryCutClipboardCallback)
genClosure_EntryCutClipboard :: IO () -> m (GClosure C_EntryActivateCallback)
genClosure_EntryCutClipboard IO ()
cb = IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback))
-> IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryCutClipboardCallback IO ()
cb
C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryCutClipboardCallback C_EntryActivateCallback
cb' IO (FunPtr C_EntryActivateCallback)
-> (FunPtr C_EntryActivateCallback
-> IO (GClosure C_EntryActivateCallback))
-> IO (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_EntryActivateCallback
-> IO (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_EntryCutClipboardCallback ::
EntryCutClipboardCallback ->
C_EntryCutClipboardCallback
wrap_EntryCutClipboardCallback :: IO () -> C_EntryActivateCallback
wrap_EntryCutClipboardCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onEntryCutClipboard :: (IsEntry a, MonadIO m) => a -> EntryCutClipboardCallback -> m SignalHandlerId
onEntryCutClipboard :: a -> IO () -> m SignalHandlerId
onEntryCutClipboard a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryCutClipboardCallback IO ()
cb
FunPtr C_EntryActivateCallback
cb'' <- C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryCutClipboardCallback C_EntryActivateCallback
cb'
a
-> Text
-> FunPtr C_EntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"cut-clipboard" FunPtr C_EntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterEntryCutClipboard :: (IsEntry a, MonadIO m) => a -> EntryCutClipboardCallback -> m SignalHandlerId
afterEntryCutClipboard :: a -> IO () -> m SignalHandlerId
afterEntryCutClipboard a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryCutClipboardCallback IO ()
cb
FunPtr C_EntryActivateCallback
cb'' <- C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryCutClipboardCallback C_EntryActivateCallback
cb'
a
-> Text
-> FunPtr C_EntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"cut-clipboard" FunPtr C_EntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data EntryCutClipboardSignalInfo
instance SignalInfo EntryCutClipboardSignalInfo where
type HaskellCallbackType EntryCutClipboardSignalInfo = EntryCutClipboardCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_EntryCutClipboardCallback cb
cb'' <- mk_EntryCutClipboardCallback cb'
connectSignalFunPtr obj "cut-clipboard" cb'' connectMode detail
#endif
type EntryDeleteFromCursorCallback =
Gtk.Enums.DeleteType
-> Int32
-> IO ()
noEntryDeleteFromCursorCallback :: Maybe EntryDeleteFromCursorCallback
noEntryDeleteFromCursorCallback :: Maybe EntryDeleteFromCursorCallback
noEntryDeleteFromCursorCallback = Maybe EntryDeleteFromCursorCallback
forall a. Maybe a
Nothing
type C_EntryDeleteFromCursorCallback =
Ptr () ->
CUInt ->
Int32 ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryDeleteFromCursorCallback :: C_EntryDeleteFromCursorCallback -> IO (FunPtr C_EntryDeleteFromCursorCallback)
genClosure_EntryDeleteFromCursor :: MonadIO m => EntryDeleteFromCursorCallback -> m (GClosure C_EntryDeleteFromCursorCallback)
genClosure_EntryDeleteFromCursor :: EntryDeleteFromCursorCallback
-> m (GClosure C_EntryDeleteFromCursorCallback)
genClosure_EntryDeleteFromCursor EntryDeleteFromCursorCallback
cb = IO (GClosure C_EntryDeleteFromCursorCallback)
-> m (GClosure C_EntryDeleteFromCursorCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_EntryDeleteFromCursorCallback)
-> m (GClosure C_EntryDeleteFromCursorCallback))
-> IO (GClosure C_EntryDeleteFromCursorCallback)
-> m (GClosure C_EntryDeleteFromCursorCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryDeleteFromCursorCallback
cb' = EntryDeleteFromCursorCallback -> C_EntryDeleteFromCursorCallback
wrap_EntryDeleteFromCursorCallback EntryDeleteFromCursorCallback
cb
C_EntryDeleteFromCursorCallback
-> IO (FunPtr C_EntryDeleteFromCursorCallback)
mk_EntryDeleteFromCursorCallback C_EntryDeleteFromCursorCallback
cb' IO (FunPtr C_EntryDeleteFromCursorCallback)
-> (FunPtr C_EntryDeleteFromCursorCallback
-> IO (GClosure C_EntryDeleteFromCursorCallback))
-> IO (GClosure C_EntryDeleteFromCursorCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_EntryDeleteFromCursorCallback
-> IO (GClosure C_EntryDeleteFromCursorCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_EntryDeleteFromCursorCallback ::
EntryDeleteFromCursorCallback ->
C_EntryDeleteFromCursorCallback
wrap_EntryDeleteFromCursorCallback :: EntryDeleteFromCursorCallback -> C_EntryDeleteFromCursorCallback
wrap_EntryDeleteFromCursorCallback EntryDeleteFromCursorCallback
_cb Ptr ()
_ CUInt
type_ Int32
count Ptr ()
_ = do
let type_' :: DeleteType
type_' = (Int -> DeleteType
forall a. Enum a => Int -> a
toEnum (Int -> DeleteType) -> (CUInt -> Int) -> CUInt -> DeleteType
forall b c a. (b -> c) -> (a -> b) -> a -> c
. CUInt -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral) CUInt
type_
EntryDeleteFromCursorCallback
_cb DeleteType
type_' Int32
count
onEntryDeleteFromCursor :: (IsEntry a, MonadIO m) => a -> EntryDeleteFromCursorCallback -> m SignalHandlerId
onEntryDeleteFromCursor :: a -> EntryDeleteFromCursorCallback -> m SignalHandlerId
onEntryDeleteFromCursor a
obj EntryDeleteFromCursorCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryDeleteFromCursorCallback
cb' = EntryDeleteFromCursorCallback -> C_EntryDeleteFromCursorCallback
wrap_EntryDeleteFromCursorCallback EntryDeleteFromCursorCallback
cb
FunPtr C_EntryDeleteFromCursorCallback
cb'' <- C_EntryDeleteFromCursorCallback
-> IO (FunPtr C_EntryDeleteFromCursorCallback)
mk_EntryDeleteFromCursorCallback C_EntryDeleteFromCursorCallback
cb'
a
-> Text
-> FunPtr C_EntryDeleteFromCursorCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"delete-from-cursor" FunPtr C_EntryDeleteFromCursorCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterEntryDeleteFromCursor :: (IsEntry a, MonadIO m) => a -> EntryDeleteFromCursorCallback -> m SignalHandlerId
afterEntryDeleteFromCursor :: a -> EntryDeleteFromCursorCallback -> m SignalHandlerId
afterEntryDeleteFromCursor a
obj EntryDeleteFromCursorCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryDeleteFromCursorCallback
cb' = EntryDeleteFromCursorCallback -> C_EntryDeleteFromCursorCallback
wrap_EntryDeleteFromCursorCallback EntryDeleteFromCursorCallback
cb
FunPtr C_EntryDeleteFromCursorCallback
cb'' <- C_EntryDeleteFromCursorCallback
-> IO (FunPtr C_EntryDeleteFromCursorCallback)
mk_EntryDeleteFromCursorCallback C_EntryDeleteFromCursorCallback
cb'
a
-> Text
-> FunPtr C_EntryDeleteFromCursorCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"delete-from-cursor" FunPtr C_EntryDeleteFromCursorCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data EntryDeleteFromCursorSignalInfo
instance SignalInfo EntryDeleteFromCursorSignalInfo where
type HaskellCallbackType EntryDeleteFromCursorSignalInfo = EntryDeleteFromCursorCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_EntryDeleteFromCursorCallback cb
cb'' <- mk_EntryDeleteFromCursorCallback cb'
connectSignalFunPtr obj "delete-from-cursor" cb'' connectMode detail
#endif
type EntryIconPressCallback =
Gtk.Enums.EntryIconPosition
-> Gdk.EventButton.EventButton
-> IO ()
noEntryIconPressCallback :: Maybe EntryIconPressCallback
noEntryIconPressCallback :: Maybe EntryIconPressCallback
noEntryIconPressCallback = Maybe EntryIconPressCallback
forall a. Maybe a
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 :: MonadIO m => EntryIconPressCallback -> m (GClosure C_EntryIconPressCallback)
genClosure_EntryIconPress :: EntryIconPressCallback -> m (GClosure C_EntryIconPressCallback)
genClosure_EntryIconPress EntryIconPressCallback
cb = IO (GClosure C_EntryIconPressCallback)
-> m (GClosure C_EntryIconPressCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_EntryIconPressCallback)
-> m (GClosure C_EntryIconPressCallback))
-> IO (GClosure C_EntryIconPressCallback)
-> m (GClosure C_EntryIconPressCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryIconPressCallback
cb' = EntryIconPressCallback -> C_EntryIconPressCallback
wrap_EntryIconPressCallback EntryIconPressCallback
cb
C_EntryIconPressCallback -> IO (FunPtr C_EntryIconPressCallback)
mk_EntryIconPressCallback C_EntryIconPressCallback
cb' IO (FunPtr C_EntryIconPressCallback)
-> (FunPtr C_EntryIconPressCallback
-> IO (GClosure C_EntryIconPressCallback))
-> IO (GClosure C_EntryIconPressCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_EntryIconPressCallback
-> IO (GClosure C_EntryIconPressCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_EntryIconPressCallback ::
EntryIconPressCallback ->
C_EntryIconPressCallback
wrap_EntryIconPressCallback :: EntryIconPressCallback -> C_EntryIconPressCallback
wrap_EntryIconPressCallback EntryIconPressCallback
_cb Ptr ()
_ CUInt
iconPos Ptr EventButton
event Ptr ()
_ = do
let iconPos' :: EntryIconPosition
iconPos' = (Int -> EntryIconPosition
forall a. Enum a => Int -> a
toEnum (Int -> EntryIconPosition)
-> (CUInt -> Int) -> CUInt -> EntryIconPosition
forall b c a. (b -> c) -> (a -> b) -> a -> c
. CUInt -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral) CUInt
iconPos
EventButton
event' <- ((ManagedPtr EventButton -> EventButton)
-> Ptr EventButton -> IO EventButton
forall a.
(HasCallStack, BoxedPtr a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
newPtr ManagedPtr EventButton -> EventButton
Gdk.EventButton.EventButton) Ptr EventButton
event
EntryIconPressCallback
_cb EntryIconPosition
iconPos' EventButton
event'
onEntryIconPress :: (IsEntry a, MonadIO m) => a -> EntryIconPressCallback -> m SignalHandlerId
onEntryIconPress :: a -> EntryIconPressCallback -> m SignalHandlerId
onEntryIconPress a
obj EntryIconPressCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryIconPressCallback
cb' = EntryIconPressCallback -> C_EntryIconPressCallback
wrap_EntryIconPressCallback EntryIconPressCallback
cb
FunPtr C_EntryIconPressCallback
cb'' <- C_EntryIconPressCallback -> IO (FunPtr C_EntryIconPressCallback)
mk_EntryIconPressCallback C_EntryIconPressCallback
cb'
a
-> Text
-> FunPtr C_EntryIconPressCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"icon-press" FunPtr C_EntryIconPressCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterEntryIconPress :: (IsEntry a, MonadIO m) => a -> EntryIconPressCallback -> m SignalHandlerId
afterEntryIconPress :: a -> EntryIconPressCallback -> m SignalHandlerId
afterEntryIconPress a
obj EntryIconPressCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryIconPressCallback
cb' = EntryIconPressCallback -> C_EntryIconPressCallback
wrap_EntryIconPressCallback EntryIconPressCallback
cb
FunPtr C_EntryIconPressCallback
cb'' <- C_EntryIconPressCallback -> IO (FunPtr C_EntryIconPressCallback)
mk_EntryIconPressCallback C_EntryIconPressCallback
cb'
a
-> Text
-> FunPtr C_EntryIconPressCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"icon-press" FunPtr C_EntryIconPressCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data EntryIconPressSignalInfo
instance SignalInfo EntryIconPressSignalInfo where
type HaskellCallbackType EntryIconPressSignalInfo = EntryIconPressCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_EntryIconPressCallback cb
cb'' <- mk_EntryIconPressCallback cb'
connectSignalFunPtr obj "icon-press" cb'' connectMode detail
#endif
type EntryIconReleaseCallback =
Gtk.Enums.EntryIconPosition
-> Gdk.EventButton.EventButton
-> IO ()
noEntryIconReleaseCallback :: Maybe EntryIconReleaseCallback
noEntryIconReleaseCallback :: Maybe EntryIconPressCallback
noEntryIconReleaseCallback = Maybe EntryIconPressCallback
forall a. Maybe a
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 :: MonadIO m => EntryIconReleaseCallback -> m (GClosure C_EntryIconReleaseCallback)
genClosure_EntryIconRelease :: EntryIconPressCallback -> m (GClosure C_EntryIconPressCallback)
genClosure_EntryIconRelease EntryIconPressCallback
cb = IO (GClosure C_EntryIconPressCallback)
-> m (GClosure C_EntryIconPressCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_EntryIconPressCallback)
-> m (GClosure C_EntryIconPressCallback))
-> IO (GClosure C_EntryIconPressCallback)
-> m (GClosure C_EntryIconPressCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryIconPressCallback
cb' = EntryIconPressCallback -> C_EntryIconPressCallback
wrap_EntryIconReleaseCallback EntryIconPressCallback
cb
C_EntryIconPressCallback -> IO (FunPtr C_EntryIconPressCallback)
mk_EntryIconReleaseCallback C_EntryIconPressCallback
cb' IO (FunPtr C_EntryIconPressCallback)
-> (FunPtr C_EntryIconPressCallback
-> IO (GClosure C_EntryIconPressCallback))
-> IO (GClosure C_EntryIconPressCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_EntryIconPressCallback
-> IO (GClosure C_EntryIconPressCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_EntryIconReleaseCallback ::
EntryIconReleaseCallback ->
C_EntryIconReleaseCallback
wrap_EntryIconReleaseCallback :: EntryIconPressCallback -> C_EntryIconPressCallback
wrap_EntryIconReleaseCallback EntryIconPressCallback
_cb Ptr ()
_ CUInt
iconPos Ptr EventButton
event Ptr ()
_ = do
let iconPos' :: EntryIconPosition
iconPos' = (Int -> EntryIconPosition
forall a. Enum a => Int -> a
toEnum (Int -> EntryIconPosition)
-> (CUInt -> Int) -> CUInt -> EntryIconPosition
forall b c a. (b -> c) -> (a -> b) -> a -> c
. CUInt -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral) CUInt
iconPos
EventButton
event' <- ((ManagedPtr EventButton -> EventButton)
-> Ptr EventButton -> IO EventButton
forall a.
(HasCallStack, BoxedPtr a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
newPtr ManagedPtr EventButton -> EventButton
Gdk.EventButton.EventButton) Ptr EventButton
event
EntryIconPressCallback
_cb EntryIconPosition
iconPos' EventButton
event'
onEntryIconRelease :: (IsEntry a, MonadIO m) => a -> EntryIconReleaseCallback -> m SignalHandlerId
onEntryIconRelease :: a -> EntryIconPressCallback -> m SignalHandlerId
onEntryIconRelease a
obj EntryIconPressCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryIconPressCallback
cb' = EntryIconPressCallback -> C_EntryIconPressCallback
wrap_EntryIconReleaseCallback EntryIconPressCallback
cb
FunPtr C_EntryIconPressCallback
cb'' <- C_EntryIconPressCallback -> IO (FunPtr C_EntryIconPressCallback)
mk_EntryIconReleaseCallback C_EntryIconPressCallback
cb'
a
-> Text
-> FunPtr C_EntryIconPressCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"icon-release" FunPtr C_EntryIconPressCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterEntryIconRelease :: (IsEntry a, MonadIO m) => a -> EntryIconReleaseCallback -> m SignalHandlerId
afterEntryIconRelease :: a -> EntryIconPressCallback -> m SignalHandlerId
afterEntryIconRelease a
obj EntryIconPressCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryIconPressCallback
cb' = EntryIconPressCallback -> C_EntryIconPressCallback
wrap_EntryIconReleaseCallback EntryIconPressCallback
cb
FunPtr C_EntryIconPressCallback
cb'' <- C_EntryIconPressCallback -> IO (FunPtr C_EntryIconPressCallback)
mk_EntryIconReleaseCallback C_EntryIconPressCallback
cb'
a
-> Text
-> FunPtr C_EntryIconPressCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"icon-release" FunPtr C_EntryIconPressCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data EntryIconReleaseSignalInfo
instance SignalInfo EntryIconReleaseSignalInfo where
type HaskellCallbackType EntryIconReleaseSignalInfo = EntryIconReleaseCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_EntryIconReleaseCallback cb
cb'' <- mk_EntryIconReleaseCallback cb'
connectSignalFunPtr obj "icon-release" cb'' connectMode detail
#endif
type EntryInsertAtCursorCallback =
T.Text
-> IO ()
noEntryInsertAtCursorCallback :: Maybe EntryInsertAtCursorCallback
noEntryInsertAtCursorCallback :: Maybe EntryInsertAtCursorCallback
noEntryInsertAtCursorCallback = Maybe EntryInsertAtCursorCallback
forall a. Maybe a
Nothing
type C_EntryInsertAtCursorCallback =
Ptr () ->
CString ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryInsertAtCursorCallback :: C_EntryInsertAtCursorCallback -> IO (FunPtr C_EntryInsertAtCursorCallback)
genClosure_EntryInsertAtCursor :: MonadIO m => EntryInsertAtCursorCallback -> m (GClosure C_EntryInsertAtCursorCallback)
genClosure_EntryInsertAtCursor :: EntryInsertAtCursorCallback
-> m (GClosure C_EntryInsertAtCursorCallback)
genClosure_EntryInsertAtCursor EntryInsertAtCursorCallback
cb = IO (GClosure C_EntryInsertAtCursorCallback)
-> m (GClosure C_EntryInsertAtCursorCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_EntryInsertAtCursorCallback)
-> m (GClosure C_EntryInsertAtCursorCallback))
-> IO (GClosure C_EntryInsertAtCursorCallback)
-> m (GClosure C_EntryInsertAtCursorCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryInsertAtCursorCallback
cb' = EntryInsertAtCursorCallback -> C_EntryInsertAtCursorCallback
wrap_EntryInsertAtCursorCallback EntryInsertAtCursorCallback
cb
C_EntryInsertAtCursorCallback
-> IO (FunPtr C_EntryInsertAtCursorCallback)
mk_EntryInsertAtCursorCallback C_EntryInsertAtCursorCallback
cb' IO (FunPtr C_EntryInsertAtCursorCallback)
-> (FunPtr C_EntryInsertAtCursorCallback
-> IO (GClosure C_EntryInsertAtCursorCallback))
-> IO (GClosure C_EntryInsertAtCursorCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_EntryInsertAtCursorCallback
-> IO (GClosure C_EntryInsertAtCursorCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_EntryInsertAtCursorCallback ::
EntryInsertAtCursorCallback ->
C_EntryInsertAtCursorCallback
wrap_EntryInsertAtCursorCallback :: EntryInsertAtCursorCallback -> C_EntryInsertAtCursorCallback
wrap_EntryInsertAtCursorCallback EntryInsertAtCursorCallback
_cb Ptr ()
_ CString
string Ptr ()
_ = do
Text
string' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
string
EntryInsertAtCursorCallback
_cb Text
string'
onEntryInsertAtCursor :: (IsEntry a, MonadIO m) => a -> EntryInsertAtCursorCallback -> m SignalHandlerId
onEntryInsertAtCursor :: a -> EntryInsertAtCursorCallback -> m SignalHandlerId
onEntryInsertAtCursor a
obj EntryInsertAtCursorCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryInsertAtCursorCallback
cb' = EntryInsertAtCursorCallback -> C_EntryInsertAtCursorCallback
wrap_EntryInsertAtCursorCallback EntryInsertAtCursorCallback
cb
FunPtr C_EntryInsertAtCursorCallback
cb'' <- C_EntryInsertAtCursorCallback
-> IO (FunPtr C_EntryInsertAtCursorCallback)
mk_EntryInsertAtCursorCallback C_EntryInsertAtCursorCallback
cb'
a
-> Text
-> FunPtr C_EntryInsertAtCursorCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"insert-at-cursor" FunPtr C_EntryInsertAtCursorCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterEntryInsertAtCursor :: (IsEntry a, MonadIO m) => a -> EntryInsertAtCursorCallback -> m SignalHandlerId
afterEntryInsertAtCursor :: a -> EntryInsertAtCursorCallback -> m SignalHandlerId
afterEntryInsertAtCursor a
obj EntryInsertAtCursorCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryInsertAtCursorCallback
cb' = EntryInsertAtCursorCallback -> C_EntryInsertAtCursorCallback
wrap_EntryInsertAtCursorCallback EntryInsertAtCursorCallback
cb
FunPtr C_EntryInsertAtCursorCallback
cb'' <- C_EntryInsertAtCursorCallback
-> IO (FunPtr C_EntryInsertAtCursorCallback)
mk_EntryInsertAtCursorCallback C_EntryInsertAtCursorCallback
cb'
a
-> Text
-> FunPtr C_EntryInsertAtCursorCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"insert-at-cursor" FunPtr C_EntryInsertAtCursorCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data EntryInsertAtCursorSignalInfo
instance SignalInfo EntryInsertAtCursorSignalInfo where
type HaskellCallbackType EntryInsertAtCursorSignalInfo = EntryInsertAtCursorCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_EntryInsertAtCursorCallback cb
cb'' <- mk_EntryInsertAtCursorCallback cb'
connectSignalFunPtr obj "insert-at-cursor" cb'' connectMode detail
#endif
type EntryInsertEmojiCallback =
IO ()
noEntryInsertEmojiCallback :: Maybe EntryInsertEmojiCallback
noEntryInsertEmojiCallback :: Maybe (IO ())
noEntryInsertEmojiCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_EntryInsertEmojiCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryInsertEmojiCallback :: C_EntryInsertEmojiCallback -> IO (FunPtr C_EntryInsertEmojiCallback)
genClosure_EntryInsertEmoji :: MonadIO m => EntryInsertEmojiCallback -> m (GClosure C_EntryInsertEmojiCallback)
genClosure_EntryInsertEmoji :: IO () -> m (GClosure C_EntryActivateCallback)
genClosure_EntryInsertEmoji IO ()
cb = IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback))
-> IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryInsertEmojiCallback IO ()
cb
C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryInsertEmojiCallback C_EntryActivateCallback
cb' IO (FunPtr C_EntryActivateCallback)
-> (FunPtr C_EntryActivateCallback
-> IO (GClosure C_EntryActivateCallback))
-> IO (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_EntryActivateCallback
-> IO (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_EntryInsertEmojiCallback ::
EntryInsertEmojiCallback ->
C_EntryInsertEmojiCallback
wrap_EntryInsertEmojiCallback :: IO () -> C_EntryActivateCallback
wrap_EntryInsertEmojiCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onEntryInsertEmoji :: (IsEntry a, MonadIO m) => a -> EntryInsertEmojiCallback -> m SignalHandlerId
onEntryInsertEmoji :: a -> IO () -> m SignalHandlerId
onEntryInsertEmoji a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryInsertEmojiCallback IO ()
cb
FunPtr C_EntryActivateCallback
cb'' <- C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryInsertEmojiCallback C_EntryActivateCallback
cb'
a
-> Text
-> FunPtr C_EntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"insert-emoji" FunPtr C_EntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterEntryInsertEmoji :: (IsEntry a, MonadIO m) => a -> EntryInsertEmojiCallback -> m SignalHandlerId
afterEntryInsertEmoji :: a -> IO () -> m SignalHandlerId
afterEntryInsertEmoji a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryInsertEmojiCallback IO ()
cb
FunPtr C_EntryActivateCallback
cb'' <- C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryInsertEmojiCallback C_EntryActivateCallback
cb'
a
-> Text
-> FunPtr C_EntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"insert-emoji" FunPtr C_EntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data EntryInsertEmojiSignalInfo
instance SignalInfo EntryInsertEmojiSignalInfo where
type HaskellCallbackType EntryInsertEmojiSignalInfo = EntryInsertEmojiCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_EntryInsertEmojiCallback cb
cb'' <- mk_EntryInsertEmojiCallback cb'
connectSignalFunPtr obj "insert-emoji" cb'' connectMode detail
#endif
type EntryMoveCursorCallback =
Gtk.Enums.MovementStep
-> Int32
-> Bool
-> IO ()
noEntryMoveCursorCallback :: Maybe EntryMoveCursorCallback
noEntryMoveCursorCallback :: Maybe EntryMoveCursorCallback
noEntryMoveCursorCallback = Maybe EntryMoveCursorCallback
forall a. Maybe a
Nothing
type C_EntryMoveCursorCallback =
Ptr () ->
CUInt ->
Int32 ->
CInt ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryMoveCursorCallback :: C_EntryMoveCursorCallback -> IO (FunPtr C_EntryMoveCursorCallback)
genClosure_EntryMoveCursor :: MonadIO m => EntryMoveCursorCallback -> m (GClosure C_EntryMoveCursorCallback)
genClosure_EntryMoveCursor :: EntryMoveCursorCallback -> m (GClosure C_EntryMoveCursorCallback)
genClosure_EntryMoveCursor EntryMoveCursorCallback
cb = IO (GClosure C_EntryMoveCursorCallback)
-> m (GClosure C_EntryMoveCursorCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_EntryMoveCursorCallback)
-> m (GClosure C_EntryMoveCursorCallback))
-> IO (GClosure C_EntryMoveCursorCallback)
-> m (GClosure C_EntryMoveCursorCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryMoveCursorCallback
cb' = EntryMoveCursorCallback -> C_EntryMoveCursorCallback
wrap_EntryMoveCursorCallback EntryMoveCursorCallback
cb
C_EntryMoveCursorCallback -> IO (FunPtr C_EntryMoveCursorCallback)
mk_EntryMoveCursorCallback C_EntryMoveCursorCallback
cb' IO (FunPtr C_EntryMoveCursorCallback)
-> (FunPtr C_EntryMoveCursorCallback
-> IO (GClosure C_EntryMoveCursorCallback))
-> IO (GClosure C_EntryMoveCursorCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_EntryMoveCursorCallback
-> IO (GClosure C_EntryMoveCursorCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_EntryMoveCursorCallback ::
EntryMoveCursorCallback ->
C_EntryMoveCursorCallback
wrap_EntryMoveCursorCallback :: EntryMoveCursorCallback -> C_EntryMoveCursorCallback
wrap_EntryMoveCursorCallback EntryMoveCursorCallback
_cb Ptr ()
_ CUInt
step Int32
count CInt
extendSelection Ptr ()
_ = do
let step' :: MovementStep
step' = (Int -> MovementStep
forall a. Enum a => Int -> a
toEnum (Int -> MovementStep) -> (CUInt -> Int) -> CUInt -> MovementStep
forall b c a. (b -> c) -> (a -> b) -> a -> c
. CUInt -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral) CUInt
step
let extendSelection' :: Bool
extendSelection' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
extendSelection
EntryMoveCursorCallback
_cb MovementStep
step' Int32
count Bool
extendSelection'
onEntryMoveCursor :: (IsEntry a, MonadIO m) => a -> EntryMoveCursorCallback -> m SignalHandlerId
onEntryMoveCursor :: a -> EntryMoveCursorCallback -> m SignalHandlerId
onEntryMoveCursor a
obj EntryMoveCursorCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryMoveCursorCallback
cb' = EntryMoveCursorCallback -> C_EntryMoveCursorCallback
wrap_EntryMoveCursorCallback EntryMoveCursorCallback
cb
FunPtr C_EntryMoveCursorCallback
cb'' <- C_EntryMoveCursorCallback -> IO (FunPtr C_EntryMoveCursorCallback)
mk_EntryMoveCursorCallback C_EntryMoveCursorCallback
cb'
a
-> Text
-> FunPtr C_EntryMoveCursorCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"move-cursor" FunPtr C_EntryMoveCursorCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterEntryMoveCursor :: (IsEntry a, MonadIO m) => a -> EntryMoveCursorCallback -> m SignalHandlerId
afterEntryMoveCursor :: a -> EntryMoveCursorCallback -> m SignalHandlerId
afterEntryMoveCursor a
obj EntryMoveCursorCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryMoveCursorCallback
cb' = EntryMoveCursorCallback -> C_EntryMoveCursorCallback
wrap_EntryMoveCursorCallback EntryMoveCursorCallback
cb
FunPtr C_EntryMoveCursorCallback
cb'' <- C_EntryMoveCursorCallback -> IO (FunPtr C_EntryMoveCursorCallback)
mk_EntryMoveCursorCallback C_EntryMoveCursorCallback
cb'
a
-> Text
-> FunPtr C_EntryMoveCursorCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"move-cursor" FunPtr C_EntryMoveCursorCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data EntryMoveCursorSignalInfo
instance SignalInfo EntryMoveCursorSignalInfo where
type HaskellCallbackType EntryMoveCursorSignalInfo = EntryMoveCursorCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_EntryMoveCursorCallback cb
cb'' <- mk_EntryMoveCursorCallback cb'
connectSignalFunPtr obj "move-cursor" cb'' connectMode detail
#endif
type EntryPasteClipboardCallback =
IO ()
noEntryPasteClipboardCallback :: Maybe EntryPasteClipboardCallback
noEntryPasteClipboardCallback :: Maybe (IO ())
noEntryPasteClipboardCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_EntryPasteClipboardCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryPasteClipboardCallback :: C_EntryPasteClipboardCallback -> IO (FunPtr C_EntryPasteClipboardCallback)
genClosure_EntryPasteClipboard :: MonadIO m => EntryPasteClipboardCallback -> m (GClosure C_EntryPasteClipboardCallback)
genClosure_EntryPasteClipboard :: IO () -> m (GClosure C_EntryActivateCallback)
genClosure_EntryPasteClipboard IO ()
cb = IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback))
-> IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryPasteClipboardCallback IO ()
cb
C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryPasteClipboardCallback C_EntryActivateCallback
cb' IO (FunPtr C_EntryActivateCallback)
-> (FunPtr C_EntryActivateCallback
-> IO (GClosure C_EntryActivateCallback))
-> IO (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_EntryActivateCallback
-> IO (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_EntryPasteClipboardCallback ::
EntryPasteClipboardCallback ->
C_EntryPasteClipboardCallback
wrap_EntryPasteClipboardCallback :: IO () -> C_EntryActivateCallback
wrap_EntryPasteClipboardCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onEntryPasteClipboard :: (IsEntry a, MonadIO m) => a -> EntryPasteClipboardCallback -> m SignalHandlerId
onEntryPasteClipboard :: a -> IO () -> m SignalHandlerId
onEntryPasteClipboard a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryPasteClipboardCallback IO ()
cb
FunPtr C_EntryActivateCallback
cb'' <- C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryPasteClipboardCallback C_EntryActivateCallback
cb'
a
-> Text
-> FunPtr C_EntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"paste-clipboard" FunPtr C_EntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterEntryPasteClipboard :: (IsEntry a, MonadIO m) => a -> EntryPasteClipboardCallback -> m SignalHandlerId
afterEntryPasteClipboard :: a -> IO () -> m SignalHandlerId
afterEntryPasteClipboard a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryPasteClipboardCallback IO ()
cb
FunPtr C_EntryActivateCallback
cb'' <- C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryPasteClipboardCallback C_EntryActivateCallback
cb'
a
-> Text
-> FunPtr C_EntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"paste-clipboard" FunPtr C_EntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data EntryPasteClipboardSignalInfo
instance SignalInfo EntryPasteClipboardSignalInfo where
type HaskellCallbackType EntryPasteClipboardSignalInfo = EntryPasteClipboardCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_EntryPasteClipboardCallback cb
cb'' <- mk_EntryPasteClipboardCallback cb'
connectSignalFunPtr obj "paste-clipboard" cb'' connectMode detail
#endif
type =
Gtk.Widget.Widget
-> IO ()
noEntryPopulatePopupCallback :: Maybe EntryPopulatePopupCallback
= Maybe EntryPopulatePopupCallback
forall a. Maybe a
Nothing
type =
Ptr () ->
Ptr Gtk.Widget.Widget ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
:: C_EntryPopulatePopupCallback -> IO (FunPtr C_EntryPopulatePopupCallback)
genClosure_EntryPopulatePopup :: MonadIO m => EntryPopulatePopupCallback -> m (GClosure C_EntryPopulatePopupCallback)
EntryPopulatePopupCallback
cb = IO (GClosure C_EntryPopulatePopupCallback)
-> m (GClosure C_EntryPopulatePopupCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_EntryPopulatePopupCallback)
-> m (GClosure C_EntryPopulatePopupCallback))
-> IO (GClosure C_EntryPopulatePopupCallback)
-> m (GClosure C_EntryPopulatePopupCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryPopulatePopupCallback
cb' = EntryPopulatePopupCallback -> C_EntryPopulatePopupCallback
wrap_EntryPopulatePopupCallback EntryPopulatePopupCallback
cb
C_EntryPopulatePopupCallback
-> IO (FunPtr C_EntryPopulatePopupCallback)
mk_EntryPopulatePopupCallback C_EntryPopulatePopupCallback
cb' IO (FunPtr C_EntryPopulatePopupCallback)
-> (FunPtr C_EntryPopulatePopupCallback
-> IO (GClosure C_EntryPopulatePopupCallback))
-> IO (GClosure C_EntryPopulatePopupCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_EntryPopulatePopupCallback
-> IO (GClosure C_EntryPopulatePopupCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_EntryPopulatePopupCallback ::
EntryPopulatePopupCallback ->
C_EntryPopulatePopupCallback
EntryPopulatePopupCallback
_cb Ptr ()
_ Ptr Widget
widget Ptr ()
_ = do
Widget
widget' <- ((ManagedPtr Widget -> Widget) -> Ptr Widget -> IO Widget
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Widget -> Widget
Gtk.Widget.Widget) Ptr Widget
widget
EntryPopulatePopupCallback
_cb Widget
widget'
onEntryPopulatePopup :: (IsEntry a, MonadIO m) => a -> EntryPopulatePopupCallback -> m SignalHandlerId
a
obj EntryPopulatePopupCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryPopulatePopupCallback
cb' = EntryPopulatePopupCallback -> C_EntryPopulatePopupCallback
wrap_EntryPopulatePopupCallback EntryPopulatePopupCallback
cb
FunPtr C_EntryPopulatePopupCallback
cb'' <- C_EntryPopulatePopupCallback
-> IO (FunPtr C_EntryPopulatePopupCallback)
mk_EntryPopulatePopupCallback C_EntryPopulatePopupCallback
cb'
a
-> Text
-> FunPtr C_EntryPopulatePopupCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"populate-popup" FunPtr C_EntryPopulatePopupCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterEntryPopulatePopup :: (IsEntry a, MonadIO m) => a -> EntryPopulatePopupCallback -> m SignalHandlerId
a
obj EntryPopulatePopupCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryPopulatePopupCallback
cb' = EntryPopulatePopupCallback -> C_EntryPopulatePopupCallback
wrap_EntryPopulatePopupCallback EntryPopulatePopupCallback
cb
FunPtr C_EntryPopulatePopupCallback
cb'' <- C_EntryPopulatePopupCallback
-> IO (FunPtr C_EntryPopulatePopupCallback)
mk_EntryPopulatePopupCallback C_EntryPopulatePopupCallback
cb'
a
-> Text
-> FunPtr C_EntryPopulatePopupCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"populate-popup" FunPtr C_EntryPopulatePopupCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data EntryPopulatePopupSignalInfo
instance SignalInfo EntryPopulatePopupSignalInfo where
type HaskellCallbackType EntryPopulatePopupSignalInfo = EntryPopulatePopupCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_EntryPopulatePopupCallback cb
cb'' <- mk_EntryPopulatePopupCallback cb'
connectSignalFunPtr obj "populate-popup" cb'' connectMode detail
#endif
type EntryPreeditChangedCallback =
T.Text
-> IO ()
noEntryPreeditChangedCallback :: Maybe EntryPreeditChangedCallback
noEntryPreeditChangedCallback :: Maybe EntryInsertAtCursorCallback
noEntryPreeditChangedCallback = Maybe EntryInsertAtCursorCallback
forall a. Maybe a
Nothing
type C_EntryPreeditChangedCallback =
Ptr () ->
CString ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryPreeditChangedCallback :: C_EntryPreeditChangedCallback -> IO (FunPtr C_EntryPreeditChangedCallback)
genClosure_EntryPreeditChanged :: MonadIO m => EntryPreeditChangedCallback -> m (GClosure C_EntryPreeditChangedCallback)
genClosure_EntryPreeditChanged :: EntryInsertAtCursorCallback
-> m (GClosure C_EntryInsertAtCursorCallback)
genClosure_EntryPreeditChanged EntryInsertAtCursorCallback
cb = IO (GClosure C_EntryInsertAtCursorCallback)
-> m (GClosure C_EntryInsertAtCursorCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_EntryInsertAtCursorCallback)
-> m (GClosure C_EntryInsertAtCursorCallback))
-> IO (GClosure C_EntryInsertAtCursorCallback)
-> m (GClosure C_EntryInsertAtCursorCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryInsertAtCursorCallback
cb' = EntryInsertAtCursorCallback -> C_EntryInsertAtCursorCallback
wrap_EntryPreeditChangedCallback EntryInsertAtCursorCallback
cb
C_EntryInsertAtCursorCallback
-> IO (FunPtr C_EntryInsertAtCursorCallback)
mk_EntryPreeditChangedCallback C_EntryInsertAtCursorCallback
cb' IO (FunPtr C_EntryInsertAtCursorCallback)
-> (FunPtr C_EntryInsertAtCursorCallback
-> IO (GClosure C_EntryInsertAtCursorCallback))
-> IO (GClosure C_EntryInsertAtCursorCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_EntryInsertAtCursorCallback
-> IO (GClosure C_EntryInsertAtCursorCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_EntryPreeditChangedCallback ::
EntryPreeditChangedCallback ->
C_EntryPreeditChangedCallback
wrap_EntryPreeditChangedCallback :: EntryInsertAtCursorCallback -> C_EntryInsertAtCursorCallback
wrap_EntryPreeditChangedCallback EntryInsertAtCursorCallback
_cb Ptr ()
_ CString
preedit Ptr ()
_ = do
Text
preedit' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
preedit
EntryInsertAtCursorCallback
_cb Text
preedit'
onEntryPreeditChanged :: (IsEntry a, MonadIO m) => a -> EntryPreeditChangedCallback -> m SignalHandlerId
onEntryPreeditChanged :: a -> EntryInsertAtCursorCallback -> m SignalHandlerId
onEntryPreeditChanged a
obj EntryInsertAtCursorCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryInsertAtCursorCallback
cb' = EntryInsertAtCursorCallback -> C_EntryInsertAtCursorCallback
wrap_EntryPreeditChangedCallback EntryInsertAtCursorCallback
cb
FunPtr C_EntryInsertAtCursorCallback
cb'' <- C_EntryInsertAtCursorCallback
-> IO (FunPtr C_EntryInsertAtCursorCallback)
mk_EntryPreeditChangedCallback C_EntryInsertAtCursorCallback
cb'
a
-> Text
-> FunPtr C_EntryInsertAtCursorCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"preedit-changed" FunPtr C_EntryInsertAtCursorCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterEntryPreeditChanged :: (IsEntry a, MonadIO m) => a -> EntryPreeditChangedCallback -> m SignalHandlerId
afterEntryPreeditChanged :: a -> EntryInsertAtCursorCallback -> m SignalHandlerId
afterEntryPreeditChanged a
obj EntryInsertAtCursorCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryInsertAtCursorCallback
cb' = EntryInsertAtCursorCallback -> C_EntryInsertAtCursorCallback
wrap_EntryPreeditChangedCallback EntryInsertAtCursorCallback
cb
FunPtr C_EntryInsertAtCursorCallback
cb'' <- C_EntryInsertAtCursorCallback
-> IO (FunPtr C_EntryInsertAtCursorCallback)
mk_EntryPreeditChangedCallback C_EntryInsertAtCursorCallback
cb'
a
-> Text
-> FunPtr C_EntryInsertAtCursorCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"preedit-changed" FunPtr C_EntryInsertAtCursorCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data EntryPreeditChangedSignalInfo
instance SignalInfo EntryPreeditChangedSignalInfo where
type HaskellCallbackType EntryPreeditChangedSignalInfo = EntryPreeditChangedCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_EntryPreeditChangedCallback cb
cb'' <- mk_EntryPreeditChangedCallback cb'
connectSignalFunPtr obj "preedit-changed" cb'' connectMode detail
#endif
type EntryToggleOverwriteCallback =
IO ()
noEntryToggleOverwriteCallback :: Maybe EntryToggleOverwriteCallback
noEntryToggleOverwriteCallback :: Maybe (IO ())
noEntryToggleOverwriteCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_EntryToggleOverwriteCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_EntryToggleOverwriteCallback :: C_EntryToggleOverwriteCallback -> IO (FunPtr C_EntryToggleOverwriteCallback)
genClosure_EntryToggleOverwrite :: MonadIO m => EntryToggleOverwriteCallback -> m (GClosure C_EntryToggleOverwriteCallback)
genClosure_EntryToggleOverwrite :: IO () -> m (GClosure C_EntryActivateCallback)
genClosure_EntryToggleOverwrite IO ()
cb = IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback))
-> IO (GClosure C_EntryActivateCallback)
-> m (GClosure C_EntryActivateCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryToggleOverwriteCallback IO ()
cb
C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryToggleOverwriteCallback C_EntryActivateCallback
cb' IO (FunPtr C_EntryActivateCallback)
-> (FunPtr C_EntryActivateCallback
-> IO (GClosure C_EntryActivateCallback))
-> IO (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_EntryActivateCallback
-> IO (GClosure C_EntryActivateCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_EntryToggleOverwriteCallback ::
EntryToggleOverwriteCallback ->
C_EntryToggleOverwriteCallback
wrap_EntryToggleOverwriteCallback :: IO () -> C_EntryActivateCallback
wrap_EntryToggleOverwriteCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onEntryToggleOverwrite :: (IsEntry a, MonadIO m) => a -> EntryToggleOverwriteCallback -> m SignalHandlerId
onEntryToggleOverwrite :: a -> IO () -> m SignalHandlerId
onEntryToggleOverwrite a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryToggleOverwriteCallback IO ()
cb
FunPtr C_EntryActivateCallback
cb'' <- C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryToggleOverwriteCallback C_EntryActivateCallback
cb'
a
-> Text
-> FunPtr C_EntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"toggle-overwrite" FunPtr C_EntryActivateCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterEntryToggleOverwrite :: (IsEntry a, MonadIO m) => a -> EntryToggleOverwriteCallback -> m SignalHandlerId
afterEntryToggleOverwrite :: a -> IO () -> m SignalHandlerId
afterEntryToggleOverwrite a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_EntryActivateCallback
cb' = IO () -> C_EntryActivateCallback
wrap_EntryToggleOverwriteCallback IO ()
cb
FunPtr C_EntryActivateCallback
cb'' <- C_EntryActivateCallback -> IO (FunPtr C_EntryActivateCallback)
mk_EntryToggleOverwriteCallback C_EntryActivateCallback
cb'
a
-> Text
-> FunPtr C_EntryActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"toggle-overwrite" FunPtr C_EntryActivateCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data EntryToggleOverwriteSignalInfo
instance SignalInfo EntryToggleOverwriteSignalInfo where
type HaskellCallbackType EntryToggleOverwriteSignalInfo = EntryToggleOverwriteCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_EntryToggleOverwriteCallback cb
cb'' <- mk_EntryToggleOverwriteCallback cb'
connectSignalFunPtr obj "toggle-overwrite" cb'' connectMode detail
#endif
getEntryActivatesDefault :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryActivatesDefault :: o -> m Bool
getEntryActivatesDefault o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"activates-default"
setEntryActivatesDefault :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryActivatesDefault :: o -> Bool -> m ()
setEntryActivatesDefault o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"activates-default" Bool
val
constructEntryActivatesDefault :: (IsEntry o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructEntryActivatesDefault :: Bool -> m (GValueConstruct o)
constructEntryActivatesDefault Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"activates-default" Bool
val
#if defined(ENABLE_OVERLOADING)
data EntryActivatesDefaultPropertyInfo
instance AttrInfo EntryActivatesDefaultPropertyInfo where
type AttrAllowedOps EntryActivatesDefaultPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint EntryActivatesDefaultPropertyInfo = IsEntry
type AttrSetTypeConstraint EntryActivatesDefaultPropertyInfo = (~) Bool
type AttrTransferTypeConstraint EntryActivatesDefaultPropertyInfo = (~) Bool
type AttrTransferType EntryActivatesDefaultPropertyInfo = Bool
type AttrGetType EntryActivatesDefaultPropertyInfo = Bool
type AttrLabel EntryActivatesDefaultPropertyInfo = "activates-default"
type AttrOrigin EntryActivatesDefaultPropertyInfo = Entry
attrGet = getEntryActivatesDefault
attrSet = setEntryActivatesDefault
attrTransfer _ v = do
return v
attrConstruct = constructEntryActivatesDefault
attrClear = undefined
#endif
getEntryAttributes :: (MonadIO m, IsEntry o) => o -> m (Maybe Pango.AttrList.AttrList)
getEntryAttributes :: o -> m (Maybe AttrList)
getEntryAttributes o
obj = IO (Maybe AttrList) -> m (Maybe AttrList)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe AttrList) -> m (Maybe AttrList))
-> IO (Maybe AttrList) -> m (Maybe AttrList)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr AttrList -> AttrList)
-> IO (Maybe AttrList)
forall a b.
(GObject a, GBoxed b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyBoxed o
obj String
"attributes" ManagedPtr AttrList -> AttrList
Pango.AttrList.AttrList
setEntryAttributes :: (MonadIO m, IsEntry o) => o -> Pango.AttrList.AttrList -> m ()
setEntryAttributes :: o -> AttrList -> m ()
setEntryAttributes o
obj AttrList
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe AttrList -> IO ()
forall a b.
(GObject a, GBoxed b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj String
"attributes" (AttrList -> Maybe AttrList
forall a. a -> Maybe a
Just AttrList
val)
constructEntryAttributes :: (IsEntry o, MIO.MonadIO m) => Pango.AttrList.AttrList -> m (GValueConstruct o)
constructEntryAttributes :: AttrList -> m (GValueConstruct o)
constructEntryAttributes AttrList
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe AttrList -> IO (GValueConstruct o)
forall a o. GBoxed a => String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBoxed String
"attributes" (AttrList -> Maybe AttrList
forall a. a -> Maybe a
P.Just AttrList
val)
#if defined(ENABLE_OVERLOADING)
data EntryAttributesPropertyInfo
instance AttrInfo EntryAttributesPropertyInfo where
type AttrAllowedOps EntryAttributesPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint EntryAttributesPropertyInfo = IsEntry
type AttrSetTypeConstraint EntryAttributesPropertyInfo = (~) Pango.AttrList.AttrList
type AttrTransferTypeConstraint EntryAttributesPropertyInfo = (~) Pango.AttrList.AttrList
type AttrTransferType EntryAttributesPropertyInfo = Pango.AttrList.AttrList
type AttrGetType EntryAttributesPropertyInfo = (Maybe Pango.AttrList.AttrList)
type AttrLabel EntryAttributesPropertyInfo = "attributes"
type AttrOrigin EntryAttributesPropertyInfo = Entry
attrGet = getEntryAttributes
attrSet = setEntryAttributes
attrTransfer _ v = do
return v
attrConstruct = constructEntryAttributes
attrClear = undefined
#endif
getEntryBuffer :: (MonadIO m, IsEntry o) => o -> m Gtk.EntryBuffer.EntryBuffer
getEntryBuffer :: o -> m EntryBuffer
getEntryBuffer o
obj = IO EntryBuffer -> m EntryBuffer
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO EntryBuffer -> m EntryBuffer)
-> IO EntryBuffer -> m EntryBuffer
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe EntryBuffer) -> IO EntryBuffer
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getEntryBuffer" (IO (Maybe EntryBuffer) -> IO EntryBuffer)
-> IO (Maybe EntryBuffer) -> IO EntryBuffer
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr EntryBuffer -> EntryBuffer)
-> IO (Maybe EntryBuffer)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj String
"buffer" ManagedPtr EntryBuffer -> EntryBuffer
Gtk.EntryBuffer.EntryBuffer
setEntryBuffer :: (MonadIO m, IsEntry o, Gtk.EntryBuffer.IsEntryBuffer a) => o -> a -> m ()
setEntryBuffer :: o -> a -> m ()
setEntryBuffer o
obj a
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe a -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"buffer" (a -> Maybe a
forall a. a -> Maybe a
Just a
val)
constructEntryBuffer :: (IsEntry o, MIO.MonadIO m, Gtk.EntryBuffer.IsEntryBuffer a) => a -> m (GValueConstruct o)
constructEntryBuffer :: a -> m (GValueConstruct o)
constructEntryBuffer a
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe a -> IO (GValueConstruct o)
forall a o.
GObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyObject String
"buffer" (a -> Maybe a
forall a. a -> Maybe a
P.Just a
val)
#if defined(ENABLE_OVERLOADING)
data EntryBufferPropertyInfo
instance AttrInfo EntryBufferPropertyInfo where
type AttrAllowedOps EntryBufferPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint EntryBufferPropertyInfo = IsEntry
type AttrSetTypeConstraint EntryBufferPropertyInfo = Gtk.EntryBuffer.IsEntryBuffer
type AttrTransferTypeConstraint EntryBufferPropertyInfo = Gtk.EntryBuffer.IsEntryBuffer
type AttrTransferType EntryBufferPropertyInfo = Gtk.EntryBuffer.EntryBuffer
type AttrGetType EntryBufferPropertyInfo = Gtk.EntryBuffer.EntryBuffer
type AttrLabel EntryBufferPropertyInfo = "buffer"
type AttrOrigin EntryBufferPropertyInfo = Entry
attrGet = getEntryBuffer
attrSet = setEntryBuffer
attrTransfer _ v = do
unsafeCastTo Gtk.EntryBuffer.EntryBuffer v
attrConstruct = constructEntryBuffer
attrClear = undefined
#endif
getEntryCapsLockWarning :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryCapsLockWarning :: o -> m Bool
getEntryCapsLockWarning o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"caps-lock-warning"
setEntryCapsLockWarning :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryCapsLockWarning :: o -> Bool -> m ()
setEntryCapsLockWarning o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"caps-lock-warning" Bool
val
constructEntryCapsLockWarning :: (IsEntry o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructEntryCapsLockWarning :: Bool -> m (GValueConstruct o)
constructEntryCapsLockWarning Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"caps-lock-warning" Bool
val
#if defined(ENABLE_OVERLOADING)
data EntryCapsLockWarningPropertyInfo
instance AttrInfo EntryCapsLockWarningPropertyInfo where
type AttrAllowedOps EntryCapsLockWarningPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint EntryCapsLockWarningPropertyInfo = IsEntry
type AttrSetTypeConstraint EntryCapsLockWarningPropertyInfo = (~) Bool
type AttrTransferTypeConstraint EntryCapsLockWarningPropertyInfo = (~) Bool
type AttrTransferType EntryCapsLockWarningPropertyInfo = Bool
type AttrGetType EntryCapsLockWarningPropertyInfo = Bool
type AttrLabel EntryCapsLockWarningPropertyInfo = "caps-lock-warning"
type AttrOrigin EntryCapsLockWarningPropertyInfo = Entry
attrGet = getEntryCapsLockWarning
attrSet = setEntryCapsLockWarning
attrTransfer _ v = do
return v
attrConstruct = constructEntryCapsLockWarning
attrClear = undefined
#endif
getEntryCompletion :: (MonadIO m, IsEntry o) => o -> m Gtk.EntryCompletion.EntryCompletion
getEntryCompletion :: o -> m EntryCompletion
getEntryCompletion o
obj = IO EntryCompletion -> m EntryCompletion
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO EntryCompletion -> m EntryCompletion)
-> IO EntryCompletion -> m EntryCompletion
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe EntryCompletion) -> IO EntryCompletion
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getEntryCompletion" (IO (Maybe EntryCompletion) -> IO EntryCompletion)
-> IO (Maybe EntryCompletion) -> IO EntryCompletion
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr EntryCompletion -> EntryCompletion)
-> IO (Maybe EntryCompletion)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj String
"completion" ManagedPtr EntryCompletion -> EntryCompletion
Gtk.EntryCompletion.EntryCompletion
setEntryCompletion :: (MonadIO m, IsEntry o, Gtk.EntryCompletion.IsEntryCompletion a) => o -> a -> m ()
setEntryCompletion :: o -> a -> m ()
setEntryCompletion o
obj a
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe a -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"completion" (a -> Maybe a
forall a. a -> Maybe a
Just a
val)
constructEntryCompletion :: (IsEntry o, MIO.MonadIO m, Gtk.EntryCompletion.IsEntryCompletion a) => a -> m (GValueConstruct o)
constructEntryCompletion :: a -> m (GValueConstruct o)
constructEntryCompletion a
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe a -> IO (GValueConstruct o)
forall a o.
GObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyObject String
"completion" (a -> Maybe a
forall a. a -> Maybe a
P.Just a
val)
clearEntryCompletion :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryCompletion :: o -> m ()
clearEntryCompletion o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe EntryCompletion -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"completion" (Maybe EntryCompletion
forall a. Maybe a
Nothing :: Maybe Gtk.EntryCompletion.EntryCompletion)
#if defined(ENABLE_OVERLOADING)
data EntryCompletionPropertyInfo
instance AttrInfo EntryCompletionPropertyInfo where
type AttrAllowedOps EntryCompletionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint EntryCompletionPropertyInfo = IsEntry
type AttrSetTypeConstraint EntryCompletionPropertyInfo = Gtk.EntryCompletion.IsEntryCompletion
type AttrTransferTypeConstraint EntryCompletionPropertyInfo = Gtk.EntryCompletion.IsEntryCompletion
type AttrTransferType EntryCompletionPropertyInfo = Gtk.EntryCompletion.EntryCompletion
type AttrGetType EntryCompletionPropertyInfo = Gtk.EntryCompletion.EntryCompletion
type AttrLabel EntryCompletionPropertyInfo = "completion"
type AttrOrigin EntryCompletionPropertyInfo = Entry
attrGet = getEntryCompletion
attrSet = setEntryCompletion
attrTransfer _ v = do
unsafeCastTo Gtk.EntryCompletion.EntryCompletion v
attrConstruct = constructEntryCompletion
attrClear = clearEntryCompletion
#endif
getEntryCursorPosition :: (MonadIO m, IsEntry o) => o -> m Int32
getEntryCursorPosition :: o -> m Int32
getEntryCursorPosition o
obj = IO Int32 -> m Int32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Int32 -> m Int32) -> IO Int32 -> m Int32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Int32
forall a. GObject a => a -> String -> IO Int32
B.Properties.getObjectPropertyInt32 o
obj String
"cursor-position"
#if defined(ENABLE_OVERLOADING)
data EntryCursorPositionPropertyInfo
instance AttrInfo EntryCursorPositionPropertyInfo where
type AttrAllowedOps EntryCursorPositionPropertyInfo = '[ 'AttrGet]
type AttrBaseTypeConstraint EntryCursorPositionPropertyInfo = IsEntry
type AttrSetTypeConstraint EntryCursorPositionPropertyInfo = (~) ()
type AttrTransferTypeConstraint EntryCursorPositionPropertyInfo = (~) ()
type AttrTransferType EntryCursorPositionPropertyInfo = ()
type AttrGetType EntryCursorPositionPropertyInfo = Int32
type AttrLabel EntryCursorPositionPropertyInfo = "cursor-position"
type AttrOrigin EntryCursorPositionPropertyInfo = Entry
attrGet = getEntryCursorPosition
attrSet = undefined
attrTransfer _ = undefined
attrConstruct = undefined
attrClear = undefined
#endif
getEntryEditable :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryEditable :: o -> m Bool
getEntryEditable o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"editable"
setEntryEditable :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryEditable :: o -> Bool -> m ()
setEntryEditable o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"editable" Bool
val
constructEntryEditable :: (IsEntry o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructEntryEditable :: Bool -> m (GValueConstruct o)
constructEntryEditable Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"editable" Bool
val
#if defined(ENABLE_OVERLOADING)
data EntryEditablePropertyInfo
instance AttrInfo EntryEditablePropertyInfo where
type AttrAllowedOps EntryEditablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint EntryEditablePropertyInfo = IsEntry
type AttrSetTypeConstraint EntryEditablePropertyInfo = (~) Bool
type AttrTransferTypeConstraint EntryEditablePropertyInfo = (~) Bool
type AttrTransferType EntryEditablePropertyInfo = Bool
type AttrGetType EntryEditablePropertyInfo = Bool
type AttrLabel EntryEditablePropertyInfo = "editable"
type AttrOrigin EntryEditablePropertyInfo = Entry
attrGet = getEntryEditable
attrSet = setEntryEditable
attrTransfer _ v = do
return v
attrConstruct = constructEntryEditable
attrClear = undefined
#endif
getEntryEnableEmojiCompletion :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryEnableEmojiCompletion :: o -> m Bool
getEntryEnableEmojiCompletion o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"enable-emoji-completion"
setEntryEnableEmojiCompletion :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryEnableEmojiCompletion :: o -> Bool -> m ()
setEntryEnableEmojiCompletion o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"enable-emoji-completion" Bool
val
constructEntryEnableEmojiCompletion :: (IsEntry o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructEntryEnableEmojiCompletion :: Bool -> m (GValueConstruct o)
constructEntryEnableEmojiCompletion Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"enable-emoji-completion" Bool
val
#if defined(ENABLE_OVERLOADING)
data EntryEnableEmojiCompletionPropertyInfo
instance AttrInfo EntryEnableEmojiCompletionPropertyInfo where
type AttrAllowedOps EntryEnableEmojiCompletionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint EntryEnableEmojiCompletionPropertyInfo = IsEntry
type AttrSetTypeConstraint EntryEnableEmojiCompletionPropertyInfo = (~) Bool
type AttrTransferTypeConstraint EntryEnableEmojiCompletionPropertyInfo = (~) Bool
type AttrTransferType EntryEnableEmojiCompletionPropertyInfo = Bool
type AttrGetType EntryEnableEmojiCompletionPropertyInfo = Bool
type AttrLabel EntryEnableEmojiCompletionPropertyInfo = "enable-emoji-completion"
type AttrOrigin EntryEnableEmojiCompletionPropertyInfo = Entry
attrGet = getEntryEnableEmojiCompletion
attrSet = setEntryEnableEmojiCompletion
attrTransfer _ v = do
return v
attrConstruct = constructEntryEnableEmojiCompletion
attrClear = undefined
#endif
getEntryHasFrame :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryHasFrame :: o -> m Bool
getEntryHasFrame o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"has-frame"
setEntryHasFrame :: (MonadIO m, IsEntry o) => o -> Bool -> m ()
setEntryHasFrame :: o -> Bool -> m ()
setEntryHasFrame o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"has-frame" Bool
val
constructEntryHasFrame :: (IsEntry o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructEntryHasFrame :: Bool -> m (GValueConstruct o)
constructEntryHasFrame Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"has-frame" Bool
val
#if defined(ENABLE_OVERLOADING)
data EntryHasFramePropertyInfo
instance AttrInfo EntryHasFramePropertyInfo where
type AttrAllowedOps EntryHasFramePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint EntryHasFramePropertyInfo = IsEntry
type AttrSetTypeConstraint EntryHasFramePropertyInfo = (~) Bool
type AttrTransferTypeConstraint EntryHasFramePropertyInfo = (~) Bool
type AttrTransferType EntryHasFramePropertyInfo = Bool
type AttrGetType EntryHasFramePropertyInfo = Bool
type AttrLabel EntryHasFramePropertyInfo = "has-frame"
type AttrOrigin EntryHasFramePropertyInfo = Entry
attrGet = getEntryHasFrame
attrSet = setEntryHasFrame
attrTransfer _ v = do
return v
attrConstruct = constructEntryHasFrame
attrClear = undefined
#endif
getEntryImModule :: (MonadIO m, IsEntry o) => o -> m (Maybe T.Text)
getEntryImModule :: o -> m (Maybe Text)
getEntryImModule o
obj = IO (Maybe Text) -> m (Maybe Text)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Text) -> m (Maybe Text))
-> IO (Maybe Text) -> m (Maybe Text)
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj String
"im-module"
setEntryImModule :: (MonadIO m, IsEntry o) => o -> T.Text -> m ()
setEntryImModule :: o -> Text -> m ()
setEntryImModule o
obj Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"im-module" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructEntryImModule :: (IsEntry o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructEntryImModule :: Text -> m (GValueConstruct o)
constructEntryImModule Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"im-module" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
clearEntryImModule :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryImModule :: o -> m ()
clearEntryImModule o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"im-module" (Maybe Text
forall a. Maybe a
Nothing :: Maybe T.Text)
#if defined(ENABLE_OVERLOADING)
data EntryImModulePropertyInfo
instance AttrInfo EntryImModulePropertyInfo where
type AttrAllowedOps EntryImModulePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint EntryImModulePropertyInfo = IsEntry
type AttrSetTypeConstraint EntryImModulePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint EntryImModulePropertyInfo = (~) T.Text
type AttrTransferType EntryImModulePropertyInfo = T.Text
type AttrGetType EntryImModulePropertyInfo = (Maybe T.Text)
type AttrLabel EntryImModulePropertyInfo = "im-module"
type AttrOrigin EntryImModulePropertyInfo = Entry
attrGet = getEntryImModule
attrSet = setEntryImModule
attrTransfer _ v = do
return v
attrConstruct = constructEntryImModule
attrClear = clearEntryImModule
#endif
getEntryInnerBorder :: (MonadIO m, IsEntry o) => o -> m (Maybe Gtk.Border.Border)
getEntryInnerBorder :: o -> m (Maybe Border)
getEntryInnerBorder o
obj = IO (Maybe Border) -> m (Maybe Border)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Border) -> m (Maybe Border))
-> IO (Maybe Border) -> m (Maybe Border)
forall a b. (a -> b) -> a -> b
$ o -> String -> (ManagedPtr Border -> Border) -> IO (Maybe Border)
forall a b.
(GObject a, GBoxed b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyBoxed o
obj String
"inner-border" ManagedPtr Border -> Border
Gtk.Border.Border
setEntryInnerBorder :: (MonadIO m, IsEntry o) => o -> Gtk.Border.Border -> m ()
setEntryInnerBorder :: o -> Border -> m ()
setEntryInnerBorder o
obj Border
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Border -> IO ()
forall a b.
(GObject a, GBoxed b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj String
"inner-border" (Border -> Maybe Border
forall a. a -> Maybe a
Just Border
val)
constructEntryInnerBorder :: (IsEntry o, MIO.MonadIO m) => Gtk.Border.Border -> m (GValueConstruct o)
constructEntryInnerBorder :: Border -> m (GValueConstruct o)
constructEntryInnerBorder Border
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Border -> IO (GValueConstruct o)
forall a o. GBoxed a => String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBoxed String
"inner-border" (Border -> Maybe Border
forall a. a -> Maybe a
P.Just Border
val)
clearEntryInnerBorder :: (MonadIO m, IsEntry o) => o -> m ()
clearEntryInnerBorder :: o -> m ()
clearEntryInnerBorder o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Border -> IO ()
forall a b.
(GObject a, GBoxed b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyBoxed o
obj String
"inner-border" (Maybe Border
forall a. Maybe a
Nothing :: Maybe Gtk.Border.Border)
#if defined(ENABLE_OVERLOADING)
data EntryInnerBorderPropertyInfo
instance AttrInfo EntryInnerBorderPropertyInfo where
type AttrAllowedOps EntryInnerBorderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint EntryInnerBorderPropertyInfo = IsEntry
type AttrSetTypeConstraint EntryInnerBorderPropertyInfo = (~) Gtk.Border.Border
type AttrTransferTypeConstraint EntryInnerBorderPropertyInfo = (~) Gtk.Border.Border
type AttrTransferType EntryInnerBorderPropertyInfo = Gtk.Border.Border
type AttrGetType EntryInnerBorderPropertyInfo = (Maybe Gtk.Border.Border)
type AttrLabel EntryInnerBorderPropertyInfo = "inner-border"
type AttrOrigin EntryInnerBorderPropertyInfo = Entry
attrGet = getEntryInnerBorder
attrSet = setEntryInnerBorder
attrTransfer _ v = do
return v
attrConstruct = constructEntryInnerBorder
attrClear = clearEntryInnerBorder
#endif
getEntryInputHints :: (MonadIO m, IsEntry o) => o -> m [Gtk.Flags.InputHints]
getEntryInputHints :: o -> m [InputHints]
getEntryInputHints o
obj = IO [InputHints] -> m [InputHints]
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO [InputHints] -> m [InputHints])
-> IO [InputHints] -> m [InputHints]
forall a b. (a -> b) -> a -> b
$ o -> String -> IO [InputHints]
forall a b.
(GObject a, IsGFlag b, BoxedFlags b) =>
a -> String -> IO [b]
B.Properties.getObjectPropertyFlags o
obj String
"input-hints"
setEntryInputHints :: (MonadIO m, IsEntry o) => o -> [Gtk.Flags.InputHints] -> m ()
setEntryInputHints :: o -> [InputHints] -> m ()
setEntryInputHints o
obj [InputHints]
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> [InputHints] -> IO ()
forall a b.
(IsGFlag b, BoxedFlags b, GObject a) =>
a -> String -> [b] -> IO ()
B.Properties.setObjectPropertyFlags o
obj String
"input-hints" [InputHints]
val
constructEntryInputHints :: (IsEntry o, MIO.MonadIO m) => [Gtk.Flags.InputHints] -> m (GValueConstruct o)
constructEntryInputHints :: [InputHints] -> m (GValueConstruct o)
constructEntryInputHints [InputHints]
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> [InputHints] -> IO (GValueConstruct o)
forall a o.
(IsGFlag a, BoxedFlags a) =>
String -> [a] -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyFlags String
"input-hints" [InputHints]
val
#if defined(ENABLE_OVERLOADING)
data EntryInputHintsPropertyInfo
instance AttrInfo EntryInputHintsPropertyInfo where
type AttrAllowedOps EntryInputHintsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint EntryInputHintsPropertyInfo = IsEntry
type AttrSetTypeConstraint EntryInputHintsPropertyInfo = (~) [Gtk.Flags.InputHints]
type AttrTransferTypeConstraint EntryInputHintsPropertyInfo = (~) [Gtk.Flags.InputHints]
type AttrTransferType EntryInputHintsPropertyInfo = [Gtk.Flags.InputHints]
type AttrGetType EntryInputHintsPropertyInfo = [Gtk.Flags.InputHints]
type AttrLabel EntryInputHintsPropertyInfo = "input-hints"
type AttrOrigin EntryInputHintsPropertyInfo = Entry
attrGet = getEntryInputHints
attrSet = setEntryInputHints
attrTransfer _ v = do
return v
attrConstruct = constructEntryInputHints
attrClear = undefined
#endif
getEntryInputPurpose :: (MonadIO m, IsEntry o) => o -> m Gtk.Enums.InputPurpose
getEntryInputPurpose :: o -> m InputPurpose
getEntryInputPurpose o
obj = IO InputPurpose -> m InputPurpose
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO InputPurpose -> m InputPurpose)
-> IO InputPurpose -> m InputPurpose
forall a b. (a -> b) -> a -> b
$ o -> String -> IO InputPurpose
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj String
"input-purpose"
setEntryInputPurpose :: (MonadIO m, IsEntry o) => o -> Gtk.Enums.InputPurpose -> m ()
setEntryInputPurpose :: o -> InputPurpose -> m ()
setEntryInputPurpose o
obj InputPurpose
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> InputPurpose -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj String
"input-purpose" InputPurpose
val
constructEntryInputPurpose :: (IsEntry o, MIO.MonadIO m) => Gtk.Enums.InputPurpose -> m (GValueConstruct o)
constructEntryInputPurpose :: InputPurpose -> m (GValueConstruct o)
constructEntryInputPurpose InputPurpose
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> InputPurpose -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum String
"input-purpose" InputPurpose
val
#if defined(ENABLE_OVERLOADING)
data EntryInputPurposePropertyInfo
instance AttrInfo EntryInputPurposePropertyInfo where
type AttrAllowedOps EntryInputPurposePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint EntryInputPurposePropertyInfo = IsEntry
type AttrSetTypeConstraint EntryInputPurposePropertyInfo = (~) Gtk.Enums.InputPurpose
type AttrTransferTypeConstraint EntryInputPurposePropertyInfo = (~) Gtk.Enums.InputPurpose
type AttrTransferType EntryInputPurposePropertyInfo = Gtk.Enums.InputPurpose
type AttrGetType EntryInputPurposePropertyInfo = Gtk.Enums.InputPurpose
type AttrLabel EntryInputPurposePropertyInfo = "input-purpose"
type AttrOrigin EntryInputPurposePropertyInfo = Entry
attrGet = getEntryInputPurpose
attrSet = setEntryInputPurpose
attrTransfer _ v = do
return v
attrConstruct = constructEntryInputPurpose
attrClear = undefined
#endif
getEntryInvisibleChar :: (MonadIO m, IsEntry o) => o -> m Word32
getEntryInvisibleChar :: o -> m Word32
getEntryInvisibleChar o
obj = IO Word32 -> m Word32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Word32
forall a. GObject a => a -> String -> IO Word32
B.Properties.getObjectPropertyUInt32 o
obj String
"invisible-char"
setEntryInvisibleChar :: (MonadIO m, IsEntry o) => o -> Word32 -> m ()
setEntryInvisibleChar :: o -> Word32 -> m ()
setEntryInvisibleChar o
obj Word32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Word32 -> IO ()
forall a. GObject a => a -> String -> Word32 -> IO ()
B.Properties.setObjectPropertyUInt32 o
obj String
"invisible-char" Word32
val
constructEntryInvisibleChar :: (IsEntry o, MIO.MonadIO m) => Word32 -> m (GValueConstruct o)
constructEntryInvisibleChar :: Word32 -> m (GValueConstruct o)
constructEntryInvisibleChar Word32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Word32 -> IO (GValueConstruct o)
forall o. String -> Word32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyUInt32 String
"invisible-char" Word32
val
#if defined(ENABLE_OVERLOADING)
data EntryInvisibleCharPropertyInfo
instance AttrInfo EntryInvisibleCharPropertyInfo where
type AttrAllowedOps EntryInvisibleCharPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint EntryInvisibleCharPropertyInfo = IsEntry
type AttrSetTypeConstraint EntryInvisibleCharPropertyInfo = (~) Word32
type AttrTransferTypeConstraint EntryInvisibleCharPropertyInfo = (~) Word32
type AttrTransferType EntryInvisibleCharPropertyInfo = Word32
type AttrGetType EntryInvisibleCharPropertyInfo = Word32
type AttrLabel EntryInvisibleCharPropertyInfo = "invisible-char"
type AttrOrigin EntryInvisibleCharPropertyInfo = Entry
attrGet = getEntryInvisibleChar
attrSet = setEntryInvisibleChar
attrTransfer _ v = do
return v
attrConstruct = constructEntryInvisibleChar
attrClear = undefined
#endif
getEntryInvisibleCharSet :: (MonadIO m, IsEntry o) => o -> m Bool
getEntryInvisibleCharSet :: o -> m Bool
getEntryInvisibleCharSet o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"invisible-char-set"
setEntryInvisibleCharSet :: (MonadIO m, IsEntry o) => o -> Bool -> m ()