#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gtk.Callbacks
(
AccelGroupActivate ,
C_AccelGroupActivate ,
dynamic_AccelGroupActivate ,
genClosure_AccelGroupActivate ,
mk_AccelGroupActivate ,
noAccelGroupActivate ,
wrap_AccelGroupActivate ,
AccelGroupFindFunc ,
AccelGroupFindFunc_WithClosures ,
C_AccelGroupFindFunc ,
drop_closures_AccelGroupFindFunc ,
dynamic_AccelGroupFindFunc ,
genClosure_AccelGroupFindFunc ,
mk_AccelGroupFindFunc ,
noAccelGroupFindFunc ,
noAccelGroupFindFunc_WithClosures ,
wrap_AccelGroupFindFunc ,
AccelMapForeach ,
C_AccelMapForeach ,
dynamic_AccelMapForeach ,
genClosure_AccelMapForeach ,
mk_AccelMapForeach ,
noAccelMapForeach ,
wrap_AccelMapForeach ,
AssistantPageFunc ,
AssistantPageFunc_WithClosures ,
C_AssistantPageFunc ,
drop_closures_AssistantPageFunc ,
dynamic_AssistantPageFunc ,
genClosure_AssistantPageFunc ,
mk_AssistantPageFunc ,
noAssistantPageFunc ,
noAssistantPageFunc_WithClosures ,
wrap_AssistantPageFunc ,
BuilderConnectFunc ,
BuilderConnectFunc_WithClosures ,
C_BuilderConnectFunc ,
drop_closures_BuilderConnectFunc ,
dynamic_BuilderConnectFunc ,
genClosure_BuilderConnectFunc ,
mk_BuilderConnectFunc ,
noBuilderConnectFunc ,
noBuilderConnectFunc_WithClosures ,
wrap_BuilderConnectFunc ,
C_CalendarDetailFunc ,
CalendarDetailFunc ,
CalendarDetailFunc_WithClosures ,
drop_closures_CalendarDetailFunc ,
dynamic_CalendarDetailFunc ,
genClosure_CalendarDetailFunc ,
mk_CalendarDetailFunc ,
noCalendarDetailFunc ,
noCalendarDetailFunc_WithClosures ,
wrap_CalendarDetailFunc ,
C_Callback ,
Callback ,
Callback_WithClosures ,
drop_closures_Callback ,
dynamic_Callback ,
genClosure_Callback ,
mk_Callback ,
noCallback ,
noCallback_WithClosures ,
wrap_Callback ,
C_CellAllocCallback ,
CellAllocCallback ,
CellAllocCallback_WithClosures ,
drop_closures_CellAllocCallback ,
dynamic_CellAllocCallback ,
genClosure_CellAllocCallback ,
mk_CellAllocCallback ,
noCellAllocCallback ,
noCellAllocCallback_WithClosures ,
wrap_CellAllocCallback ,
C_CellCallback ,
CellCallback ,
CellCallback_WithClosures ,
drop_closures_CellCallback ,
dynamic_CellCallback ,
genClosure_CellCallback ,
mk_CellCallback ,
noCellCallback ,
noCellCallback_WithClosures ,
wrap_CellCallback ,
C_CellLayoutDataFunc ,
CellLayoutDataFunc ,
CellLayoutDataFunc_WithClosures ,
drop_closures_CellLayoutDataFunc ,
dynamic_CellLayoutDataFunc ,
genClosure_CellLayoutDataFunc ,
mk_CellLayoutDataFunc ,
noCellLayoutDataFunc ,
noCellLayoutDataFunc_WithClosures ,
wrap_CellLayoutDataFunc ,
C_ClipboardClearFunc ,
ClipboardClearFunc ,
dynamic_ClipboardClearFunc ,
genClosure_ClipboardClearFunc ,
mk_ClipboardClearFunc ,
noClipboardClearFunc ,
wrap_ClipboardClearFunc ,
C_ClipboardGetFunc ,
ClipboardGetFunc ,
dynamic_ClipboardGetFunc ,
genClosure_ClipboardGetFunc ,
mk_ClipboardGetFunc ,
noClipboardGetFunc ,
wrap_ClipboardGetFunc ,
C_ClipboardImageReceivedFunc ,
ClipboardImageReceivedFunc ,
ClipboardImageReceivedFunc_WithClosures ,
drop_closures_ClipboardImageReceivedFunc,
dynamic_ClipboardImageReceivedFunc ,
genClosure_ClipboardImageReceivedFunc ,
mk_ClipboardImageReceivedFunc ,
noClipboardImageReceivedFunc ,
noClipboardImageReceivedFunc_WithClosures,
wrap_ClipboardImageReceivedFunc ,
C_ClipboardReceivedFunc ,
ClipboardReceivedFunc ,
ClipboardReceivedFunc_WithClosures ,
drop_closures_ClipboardReceivedFunc ,
dynamic_ClipboardReceivedFunc ,
genClosure_ClipboardReceivedFunc ,
mk_ClipboardReceivedFunc ,
noClipboardReceivedFunc ,
noClipboardReceivedFunc_WithClosures ,
wrap_ClipboardReceivedFunc ,
C_ClipboardRichTextReceivedFunc ,
ClipboardRichTextReceivedFunc ,
ClipboardRichTextReceivedFunc_WithClosures,
drop_closures_ClipboardRichTextReceivedFunc,
dynamic_ClipboardRichTextReceivedFunc ,
genClosure_ClipboardRichTextReceivedFunc,
mk_ClipboardRichTextReceivedFunc ,
noClipboardRichTextReceivedFunc ,
noClipboardRichTextReceivedFunc_WithClosures,
wrap_ClipboardRichTextReceivedFunc ,
C_ClipboardTargetsReceivedFunc ,
ClipboardTargetsReceivedFunc ,
ClipboardTargetsReceivedFunc_WithClosures,
drop_closures_ClipboardTargetsReceivedFunc,
dynamic_ClipboardTargetsReceivedFunc ,
genClosure_ClipboardTargetsReceivedFunc ,
mk_ClipboardTargetsReceivedFunc ,
noClipboardTargetsReceivedFunc ,
noClipboardTargetsReceivedFunc_WithClosures,
wrap_ClipboardTargetsReceivedFunc ,
C_ClipboardTextReceivedFunc ,
ClipboardTextReceivedFunc ,
ClipboardTextReceivedFunc_WithClosures ,
drop_closures_ClipboardTextReceivedFunc ,
dynamic_ClipboardTextReceivedFunc ,
genClosure_ClipboardTextReceivedFunc ,
mk_ClipboardTextReceivedFunc ,
noClipboardTextReceivedFunc ,
noClipboardTextReceivedFunc_WithClosures,
wrap_ClipboardTextReceivedFunc ,
C_ClipboardURIReceivedFunc ,
ClipboardURIReceivedFunc ,
ClipboardURIReceivedFunc_WithClosures ,
drop_closures_ClipboardURIReceivedFunc ,
dynamic_ClipboardURIReceivedFunc ,
genClosure_ClipboardURIReceivedFunc ,
mk_ClipboardURIReceivedFunc ,
noClipboardURIReceivedFunc ,
noClipboardURIReceivedFunc_WithClosures ,
wrap_ClipboardURIReceivedFunc ,
C_ColorSelectionChangePaletteFunc ,
ColorSelectionChangePaletteFunc ,
dynamic_ColorSelectionChangePaletteFunc ,
genClosure_ColorSelectionChangePaletteFunc,
mk_ColorSelectionChangePaletteFunc ,
noColorSelectionChangePaletteFunc ,
wrap_ColorSelectionChangePaletteFunc ,
C_ColorSelectionChangePaletteWithScreenFunc,
ColorSelectionChangePaletteWithScreenFunc,
dynamic_ColorSelectionChangePaletteWithScreenFunc,
genClosure_ColorSelectionChangePaletteWithScreenFunc,
mk_ColorSelectionChangePaletteWithScreenFunc,
noColorSelectionChangePaletteWithScreenFunc,
wrap_ColorSelectionChangePaletteWithScreenFunc,
C_ContainerClassAddFieldCallback ,
ContainerClassAddFieldCallback ,
dynamic_ContainerClassAddFieldCallback ,
genClosure_ContainerClassAddFieldCallback,
mk_ContainerClassAddFieldCallback ,
noContainerClassAddFieldCallback ,
wrap_ContainerClassAddFieldCallback ,
C_ContainerClassCheckResizeFieldCallback,
ContainerClassCheckResizeFieldCallback ,
dynamic_ContainerClassCheckResizeFieldCallback,
genClosure_ContainerClassCheckResizeFieldCallback,
mk_ContainerClassCheckResizeFieldCallback,
noContainerClassCheckResizeFieldCallback,
wrap_ContainerClassCheckResizeFieldCallback,
C_ContainerClassChildTypeFieldCallback ,
ContainerClassChildTypeFieldCallback ,
dynamic_ContainerClassChildTypeFieldCallback,
genClosure_ContainerClassChildTypeFieldCallback,
mk_ContainerClassChildTypeFieldCallback ,
noContainerClassChildTypeFieldCallback ,
wrap_ContainerClassChildTypeFieldCallback,
C_ContainerClassCompositeNameFieldCallback,
ContainerClassCompositeNameFieldCallback,
dynamic_ContainerClassCompositeNameFieldCallback,
genClosure_ContainerClassCompositeNameFieldCallback,
mk_ContainerClassCompositeNameFieldCallback,
noContainerClassCompositeNameFieldCallback,
wrap_ContainerClassCompositeNameFieldCallback,
C_ContainerClassForallFieldCallback ,
ContainerClassForallFieldCallback ,
ContainerClassForallFieldCallback_WithClosures,
drop_closures_ContainerClassForallFieldCallback,
dynamic_ContainerClassForallFieldCallback,
genClosure_ContainerClassForallFieldCallback,
mk_ContainerClassForallFieldCallback ,
noContainerClassForallFieldCallback ,
noContainerClassForallFieldCallback_WithClosures,
wrap_ContainerClassForallFieldCallback ,
C_ContainerClassGetChildPropertyFieldCallback,
ContainerClassGetChildPropertyFieldCallback,
dynamic_ContainerClassGetChildPropertyFieldCallback,
genClosure_ContainerClassGetChildPropertyFieldCallback,
mk_ContainerClassGetChildPropertyFieldCallback,
noContainerClassGetChildPropertyFieldCallback,
wrap_ContainerClassGetChildPropertyFieldCallback,
C_ContainerClassGetPathForChildFieldCallback,
ContainerClassGetPathForChildFieldCallback,
dynamic_ContainerClassGetPathForChildFieldCallback,
genClosure_ContainerClassGetPathForChildFieldCallback,
mk_ContainerClassGetPathForChildFieldCallback,
noContainerClassGetPathForChildFieldCallback,
wrap_ContainerClassGetPathForChildFieldCallback,
C_ContainerClassRemoveFieldCallback ,
ContainerClassRemoveFieldCallback ,
dynamic_ContainerClassRemoveFieldCallback,
genClosure_ContainerClassRemoveFieldCallback,
mk_ContainerClassRemoveFieldCallback ,
noContainerClassRemoveFieldCallback ,
wrap_ContainerClassRemoveFieldCallback ,
C_ContainerClassSetChildPropertyFieldCallback,
ContainerClassSetChildPropertyFieldCallback,
dynamic_ContainerClassSetChildPropertyFieldCallback,
genClosure_ContainerClassSetChildPropertyFieldCallback,
mk_ContainerClassSetChildPropertyFieldCallback,
noContainerClassSetChildPropertyFieldCallback,
wrap_ContainerClassSetChildPropertyFieldCallback,
C_ContainerClassSetFocusChildFieldCallback,
ContainerClassSetFocusChildFieldCallback,
dynamic_ContainerClassSetFocusChildFieldCallback,
genClosure_ContainerClassSetFocusChildFieldCallback,
mk_ContainerClassSetFocusChildFieldCallback,
noContainerClassSetFocusChildFieldCallback,
wrap_ContainerClassSetFocusChildFieldCallback,
C_EntryCompletionMatchFunc ,
EntryCompletionMatchFunc ,
EntryCompletionMatchFunc_WithClosures ,
drop_closures_EntryCompletionMatchFunc ,
dynamic_EntryCompletionMatchFunc ,
genClosure_EntryCompletionMatchFunc ,
mk_EntryCompletionMatchFunc ,
noEntryCompletionMatchFunc ,
noEntryCompletionMatchFunc_WithClosures ,
wrap_EntryCompletionMatchFunc ,
C_FileFilterFunc ,
FileFilterFunc ,
FileFilterFunc_WithClosures ,
drop_closures_FileFilterFunc ,
dynamic_FileFilterFunc ,
genClosure_FileFilterFunc ,
mk_FileFilterFunc ,
noFileFilterFunc ,
noFileFilterFunc_WithClosures ,
wrap_FileFilterFunc ,
C_FlowBoxCreateWidgetFunc ,
FlowBoxCreateWidgetFunc ,
FlowBoxCreateWidgetFunc_WithClosures ,
drop_closures_FlowBoxCreateWidgetFunc ,
dynamic_FlowBoxCreateWidgetFunc ,
genClosure_FlowBoxCreateWidgetFunc ,
mk_FlowBoxCreateWidgetFunc ,
noFlowBoxCreateWidgetFunc ,
noFlowBoxCreateWidgetFunc_WithClosures ,
wrap_FlowBoxCreateWidgetFunc ,
C_FlowBoxFilterFunc ,
FlowBoxFilterFunc ,
FlowBoxFilterFunc_WithClosures ,
drop_closures_FlowBoxFilterFunc ,
dynamic_FlowBoxFilterFunc ,
genClosure_FlowBoxFilterFunc ,
mk_FlowBoxFilterFunc ,
noFlowBoxFilterFunc ,
noFlowBoxFilterFunc_WithClosures ,
wrap_FlowBoxFilterFunc ,
C_FlowBoxForeachFunc ,
FlowBoxForeachFunc ,
FlowBoxForeachFunc_WithClosures ,
drop_closures_FlowBoxForeachFunc ,
dynamic_FlowBoxForeachFunc ,
genClosure_FlowBoxForeachFunc ,
mk_FlowBoxForeachFunc ,
noFlowBoxForeachFunc ,
noFlowBoxForeachFunc_WithClosures ,
wrap_FlowBoxForeachFunc ,
C_FlowBoxSortFunc ,
FlowBoxSortFunc ,
FlowBoxSortFunc_WithClosures ,
drop_closures_FlowBoxSortFunc ,
dynamic_FlowBoxSortFunc ,
genClosure_FlowBoxSortFunc ,
mk_FlowBoxSortFunc ,
noFlowBoxSortFunc ,
noFlowBoxSortFunc_WithClosures ,
wrap_FlowBoxSortFunc ,
C_FontFilterFunc ,
FontFilterFunc ,
FontFilterFunc_WithClosures ,
drop_closures_FontFilterFunc ,
dynamic_FontFilterFunc ,
genClosure_FontFilterFunc ,
mk_FontFilterFunc ,
noFontFilterFunc ,
noFontFilterFunc_WithClosures ,
wrap_FontFilterFunc ,
C_IconViewForeachFunc ,
IconViewForeachFunc ,
IconViewForeachFunc_WithClosures ,
drop_closures_IconViewForeachFunc ,
dynamic_IconViewForeachFunc ,
genClosure_IconViewForeachFunc ,
mk_IconViewForeachFunc ,
noIconViewForeachFunc ,
noIconViewForeachFunc_WithClosures ,
wrap_IconViewForeachFunc ,
C_KeySnoopFunc ,
KeySnoopFunc ,
KeySnoopFunc_WithClosures ,
drop_closures_KeySnoopFunc ,
dynamic_KeySnoopFunc ,
genClosure_KeySnoopFunc ,
mk_KeySnoopFunc ,
noKeySnoopFunc ,
noKeySnoopFunc_WithClosures ,
wrap_KeySnoopFunc ,
C_ListBoxCreateWidgetFunc ,
ListBoxCreateWidgetFunc ,
ListBoxCreateWidgetFunc_WithClosures ,
drop_closures_ListBoxCreateWidgetFunc ,
dynamic_ListBoxCreateWidgetFunc ,
genClosure_ListBoxCreateWidgetFunc ,
mk_ListBoxCreateWidgetFunc ,
noListBoxCreateWidgetFunc ,
noListBoxCreateWidgetFunc_WithClosures ,
wrap_ListBoxCreateWidgetFunc ,
C_ListBoxFilterFunc ,
ListBoxFilterFunc ,
ListBoxFilterFunc_WithClosures ,
drop_closures_ListBoxFilterFunc ,
dynamic_ListBoxFilterFunc ,
genClosure_ListBoxFilterFunc ,
mk_ListBoxFilterFunc ,
noListBoxFilterFunc ,
noListBoxFilterFunc_WithClosures ,
wrap_ListBoxFilterFunc ,
C_ListBoxForeachFunc ,
ListBoxForeachFunc ,
ListBoxForeachFunc_WithClosures ,
drop_closures_ListBoxForeachFunc ,
dynamic_ListBoxForeachFunc ,
genClosure_ListBoxForeachFunc ,
mk_ListBoxForeachFunc ,
noListBoxForeachFunc ,
noListBoxForeachFunc_WithClosures ,
wrap_ListBoxForeachFunc ,
C_ListBoxSortFunc ,
ListBoxSortFunc ,
ListBoxSortFunc_WithClosures ,
drop_closures_ListBoxSortFunc ,
dynamic_ListBoxSortFunc ,
genClosure_ListBoxSortFunc ,
mk_ListBoxSortFunc ,
noListBoxSortFunc ,
noListBoxSortFunc_WithClosures ,
wrap_ListBoxSortFunc ,
C_ListBoxUpdateHeaderFunc ,
ListBoxUpdateHeaderFunc ,
ListBoxUpdateHeaderFunc_WithClosures ,
drop_closures_ListBoxUpdateHeaderFunc ,
dynamic_ListBoxUpdateHeaderFunc ,
genClosure_ListBoxUpdateHeaderFunc ,
mk_ListBoxUpdateHeaderFunc ,
noListBoxUpdateHeaderFunc ,
noListBoxUpdateHeaderFunc_WithClosures ,
wrap_ListBoxUpdateHeaderFunc ,
C_MenuDetachFunc ,
MenuDetachFunc ,
dynamic_MenuDetachFunc ,
genClosure_MenuDetachFunc ,
mk_MenuDetachFunc ,
noMenuDetachFunc ,
wrap_MenuDetachFunc ,
C_MenuPositionFunc ,
MenuPositionFunc ,
MenuPositionFunc_WithClosures ,
drop_closures_MenuPositionFunc ,
dynamic_MenuPositionFunc ,
genClosure_MenuPositionFunc ,
mk_MenuPositionFunc ,
noMenuPositionFunc ,
noMenuPositionFunc_WithClosures ,
wrap_MenuPositionFunc ,
C_ModuleDisplayInitFunc ,
ModuleDisplayInitFunc ,
dynamic_ModuleDisplayInitFunc ,
genClosure_ModuleDisplayInitFunc ,
mk_ModuleDisplayInitFunc ,
noModuleDisplayInitFunc ,
wrap_ModuleDisplayInitFunc ,
C_ModuleInitFunc ,
ModuleInitFunc ,
dynamic_ModuleInitFunc ,
genClosure_ModuleInitFunc ,
mk_ModuleInitFunc ,
noModuleInitFunc ,
wrap_ModuleInitFunc ,
C_PageSetupDoneFunc ,
PageSetupDoneFunc ,
PageSetupDoneFunc_WithClosures ,
drop_closures_PageSetupDoneFunc ,
dynamic_PageSetupDoneFunc ,
genClosure_PageSetupDoneFunc ,
mk_PageSetupDoneFunc ,
noPageSetupDoneFunc ,
noPageSetupDoneFunc_WithClosures ,
wrap_PageSetupDoneFunc ,
C_PrintSettingsFunc ,
PrintSettingsFunc ,
PrintSettingsFunc_WithClosures ,
drop_closures_PrintSettingsFunc ,
dynamic_PrintSettingsFunc ,
genClosure_PrintSettingsFunc ,
mk_PrintSettingsFunc ,
noPrintSettingsFunc ,
noPrintSettingsFunc_WithClosures ,
wrap_PrintSettingsFunc ,
C_RcPropertyParser ,
RcPropertyParser ,
dynamic_RcPropertyParser ,
genClosure_RcPropertyParser ,
mk_RcPropertyParser ,
noRcPropertyParser ,
wrap_RcPropertyParser ,
C_RecentFilterFunc ,
RecentFilterFunc ,
RecentFilterFunc_WithClosures ,
drop_closures_RecentFilterFunc ,
dynamic_RecentFilterFunc ,
genClosure_RecentFilterFunc ,
mk_RecentFilterFunc ,
noRecentFilterFunc ,
noRecentFilterFunc_WithClosures ,
wrap_RecentFilterFunc ,
C_RecentSortFunc ,
RecentSortFunc ,
RecentSortFunc_WithClosures ,
drop_closures_RecentSortFunc ,
dynamic_RecentSortFunc ,
genClosure_RecentSortFunc ,
mk_RecentSortFunc ,
noRecentSortFunc ,
noRecentSortFunc_WithClosures ,
wrap_RecentSortFunc ,
C_StylePropertyParser ,
StylePropertyParser ,
dynamic_StylePropertyParser ,
mk_StylePropertyParser ,
noStylePropertyParser ,
C_TextBufferDeserializeFunc ,
TextBufferDeserializeFunc ,
TextBufferDeserializeFunc_WithClosures ,
drop_closures_TextBufferDeserializeFunc ,
dynamic_TextBufferDeserializeFunc ,
mk_TextBufferDeserializeFunc ,
noTextBufferDeserializeFunc ,
noTextBufferDeserializeFunc_WithClosures,
C_TextBufferSerializeFunc ,
TextBufferSerializeFunc ,
TextBufferSerializeFunc_WithClosures ,
drop_closures_TextBufferSerializeFunc ,
dynamic_TextBufferSerializeFunc ,
genClosure_TextBufferSerializeFunc ,
mk_TextBufferSerializeFunc ,
noTextBufferSerializeFunc ,
noTextBufferSerializeFunc_WithClosures ,
wrap_TextBufferSerializeFunc ,
C_TextCharPredicate ,
TextCharPredicate ,
TextCharPredicate_WithClosures ,
drop_closures_TextCharPredicate ,
dynamic_TextCharPredicate ,
genClosure_TextCharPredicate ,
mk_TextCharPredicate ,
noTextCharPredicate ,
noTextCharPredicate_WithClosures ,
wrap_TextCharPredicate ,
C_TextTagTableForeach ,
TextTagTableForeach ,
TextTagTableForeach_WithClosures ,
drop_closures_TextTagTableForeach ,
dynamic_TextTagTableForeach ,
genClosure_TextTagTableForeach ,
mk_TextTagTableForeach ,
noTextTagTableForeach ,
noTextTagTableForeach_WithClosures ,
wrap_TextTagTableForeach ,
C_TickCallback ,
TickCallback ,
TickCallback_WithClosures ,
drop_closures_TickCallback ,
dynamic_TickCallback ,
genClosure_TickCallback ,
mk_TickCallback ,
noTickCallback ,
noTickCallback_WithClosures ,
wrap_TickCallback ,
C_TranslateFunc ,
TranslateFunc ,
TranslateFunc_WithClosures ,
drop_closures_TranslateFunc ,
dynamic_TranslateFunc ,
genClosure_TranslateFunc ,
mk_TranslateFunc ,
noTranslateFunc ,
noTranslateFunc_WithClosures ,
wrap_TranslateFunc ,
C_TreeCellDataFunc ,
TreeCellDataFunc ,
TreeCellDataFunc_WithClosures ,
drop_closures_TreeCellDataFunc ,
dynamic_TreeCellDataFunc ,
genClosure_TreeCellDataFunc ,
mk_TreeCellDataFunc ,
noTreeCellDataFunc ,
noTreeCellDataFunc_WithClosures ,
wrap_TreeCellDataFunc ,
C_TreeDestroyCountFunc ,
TreeDestroyCountFunc ,
TreeDestroyCountFunc_WithClosures ,
drop_closures_TreeDestroyCountFunc ,
dynamic_TreeDestroyCountFunc ,
genClosure_TreeDestroyCountFunc ,
mk_TreeDestroyCountFunc ,
noTreeDestroyCountFunc ,
noTreeDestroyCountFunc_WithClosures ,
wrap_TreeDestroyCountFunc ,
C_TreeIterCompareFunc ,
TreeIterCompareFunc ,
TreeIterCompareFunc_WithClosures ,
drop_closures_TreeIterCompareFunc ,
dynamic_TreeIterCompareFunc ,
genClosure_TreeIterCompareFunc ,
mk_TreeIterCompareFunc ,
noTreeIterCompareFunc ,
noTreeIterCompareFunc_WithClosures ,
wrap_TreeIterCompareFunc ,
C_TreeModelFilterVisibleFunc ,
TreeModelFilterVisibleFunc ,
TreeModelFilterVisibleFunc_WithClosures ,
drop_closures_TreeModelFilterVisibleFunc,
dynamic_TreeModelFilterVisibleFunc ,
genClosure_TreeModelFilterVisibleFunc ,
mk_TreeModelFilterVisibleFunc ,
noTreeModelFilterVisibleFunc ,
noTreeModelFilterVisibleFunc_WithClosures,
wrap_TreeModelFilterVisibleFunc ,
C_TreeModelForeachFunc ,
TreeModelForeachFunc ,
TreeModelForeachFunc_WithClosures ,
drop_closures_TreeModelForeachFunc ,
dynamic_TreeModelForeachFunc ,
genClosure_TreeModelForeachFunc ,
mk_TreeModelForeachFunc ,
noTreeModelForeachFunc ,
noTreeModelForeachFunc_WithClosures ,
wrap_TreeModelForeachFunc ,
C_TreeSelectionForeachFunc ,
TreeSelectionForeachFunc ,
TreeSelectionForeachFunc_WithClosures ,
drop_closures_TreeSelectionForeachFunc ,
dynamic_TreeSelectionForeachFunc ,
genClosure_TreeSelectionForeachFunc ,
mk_TreeSelectionForeachFunc ,
noTreeSelectionForeachFunc ,
noTreeSelectionForeachFunc_WithClosures ,
wrap_TreeSelectionForeachFunc ,
C_TreeSelectionFunc ,
TreeSelectionFunc ,
TreeSelectionFunc_WithClosures ,
drop_closures_TreeSelectionFunc ,
dynamic_TreeSelectionFunc ,
genClosure_TreeSelectionFunc ,
mk_TreeSelectionFunc ,
noTreeSelectionFunc ,
noTreeSelectionFunc_WithClosures ,
wrap_TreeSelectionFunc ,
C_TreeViewColumnDropFunc ,
TreeViewColumnDropFunc ,
TreeViewColumnDropFunc_WithClosures ,
drop_closures_TreeViewColumnDropFunc ,
dynamic_TreeViewColumnDropFunc ,
genClosure_TreeViewColumnDropFunc ,
mk_TreeViewColumnDropFunc ,
noTreeViewColumnDropFunc ,
noTreeViewColumnDropFunc_WithClosures ,
wrap_TreeViewColumnDropFunc ,
C_TreeViewMappingFunc ,
TreeViewMappingFunc ,
TreeViewMappingFunc_WithClosures ,
drop_closures_TreeViewMappingFunc ,
dynamic_TreeViewMappingFunc ,
genClosure_TreeViewMappingFunc ,
mk_TreeViewMappingFunc ,
noTreeViewMappingFunc ,
noTreeViewMappingFunc_WithClosures ,
wrap_TreeViewMappingFunc ,
C_TreeViewRowSeparatorFunc ,
TreeViewRowSeparatorFunc ,
TreeViewRowSeparatorFunc_WithClosures ,
drop_closures_TreeViewRowSeparatorFunc ,
dynamic_TreeViewRowSeparatorFunc ,
genClosure_TreeViewRowSeparatorFunc ,
mk_TreeViewRowSeparatorFunc ,
noTreeViewRowSeparatorFunc ,
noTreeViewRowSeparatorFunc_WithClosures ,
wrap_TreeViewRowSeparatorFunc ,
C_TreeViewSearchEqualFunc ,
TreeViewSearchEqualFunc ,
TreeViewSearchEqualFunc_WithClosures ,
drop_closures_TreeViewSearchEqualFunc ,
dynamic_TreeViewSearchEqualFunc ,
genClosure_TreeViewSearchEqualFunc ,
mk_TreeViewSearchEqualFunc ,
noTreeViewSearchEqualFunc ,
noTreeViewSearchEqualFunc_WithClosures ,
wrap_TreeViewSearchEqualFunc ,
C_TreeViewSearchPositionFunc ,
TreeViewSearchPositionFunc ,
TreeViewSearchPositionFunc_WithClosures ,
drop_closures_TreeViewSearchPositionFunc,
dynamic_TreeViewSearchPositionFunc ,
genClosure_TreeViewSearchPositionFunc ,
mk_TreeViewSearchPositionFunc ,
noTreeViewSearchPositionFunc ,
noTreeViewSearchPositionFunc_WithClosures,
wrap_TreeViewSearchPositionFunc ,
C_WidgetClassAdjustBaselineAllocationFieldCallback,
WidgetClassAdjustBaselineAllocationFieldCallback,
dynamic_WidgetClassAdjustBaselineAllocationFieldCallback,
genClosure_WidgetClassAdjustBaselineAllocationFieldCallback,
mk_WidgetClassAdjustBaselineAllocationFieldCallback,
noWidgetClassAdjustBaselineAllocationFieldCallback,
wrap_WidgetClassAdjustBaselineAllocationFieldCallback,
C_WidgetClassAdjustBaselineRequestFieldCallback,
WidgetClassAdjustBaselineRequestFieldCallback,
dynamic_WidgetClassAdjustBaselineRequestFieldCallback,
genClosure_WidgetClassAdjustBaselineRequestFieldCallback,
mk_WidgetClassAdjustBaselineRequestFieldCallback,
noWidgetClassAdjustBaselineRequestFieldCallback,
wrap_WidgetClassAdjustBaselineRequestFieldCallback,
C_WidgetClassAdjustSizeAllocationFieldCallback,
WidgetClassAdjustSizeAllocationFieldCallback,
dynamic_WidgetClassAdjustSizeAllocationFieldCallback,
genClosure_WidgetClassAdjustSizeAllocationFieldCallback,
mk_WidgetClassAdjustSizeAllocationFieldCallback,
noWidgetClassAdjustSizeAllocationFieldCallback,
wrap_WidgetClassAdjustSizeAllocationFieldCallback,
C_WidgetClassAdjustSizeRequestFieldCallback,
WidgetClassAdjustSizeRequestFieldCallback,
dynamic_WidgetClassAdjustSizeRequestFieldCallback,
genClosure_WidgetClassAdjustSizeRequestFieldCallback,
mk_WidgetClassAdjustSizeRequestFieldCallback,
noWidgetClassAdjustSizeRequestFieldCallback,
wrap_WidgetClassAdjustSizeRequestFieldCallback,
C_WidgetClassButtonPressEventFieldCallback,
WidgetClassButtonPressEventFieldCallback,
dynamic_WidgetClassButtonPressEventFieldCallback,
genClosure_WidgetClassButtonPressEventFieldCallback,
mk_WidgetClassButtonPressEventFieldCallback,
noWidgetClassButtonPressEventFieldCallback,
wrap_WidgetClassButtonPressEventFieldCallback,
C_WidgetClassButtonReleaseEventFieldCallback,
WidgetClassButtonReleaseEventFieldCallback,
dynamic_WidgetClassButtonReleaseEventFieldCallback,
genClosure_WidgetClassButtonReleaseEventFieldCallback,
mk_WidgetClassButtonReleaseEventFieldCallback,
noWidgetClassButtonReleaseEventFieldCallback,
wrap_WidgetClassButtonReleaseEventFieldCallback,
C_WidgetClassCanActivateAccelFieldCallback,
WidgetClassCanActivateAccelFieldCallback,
dynamic_WidgetClassCanActivateAccelFieldCallback,
genClosure_WidgetClassCanActivateAccelFieldCallback,
mk_WidgetClassCanActivateAccelFieldCallback,
noWidgetClassCanActivateAccelFieldCallback,
wrap_WidgetClassCanActivateAccelFieldCallback,
C_WidgetClassChildNotifyFieldCallback ,
WidgetClassChildNotifyFieldCallback ,
dynamic_WidgetClassChildNotifyFieldCallback,
genClosure_WidgetClassChildNotifyFieldCallback,
mk_WidgetClassChildNotifyFieldCallback ,
noWidgetClassChildNotifyFieldCallback ,
wrap_WidgetClassChildNotifyFieldCallback,
C_WidgetClassCompositedChangedFieldCallback,
WidgetClassCompositedChangedFieldCallback,
dynamic_WidgetClassCompositedChangedFieldCallback,
genClosure_WidgetClassCompositedChangedFieldCallback,
mk_WidgetClassCompositedChangedFieldCallback,
noWidgetClassCompositedChangedFieldCallback,
wrap_WidgetClassCompositedChangedFieldCallback,
C_WidgetClassComputeExpandFieldCallback ,
WidgetClassComputeExpandFieldCallback ,
dynamic_WidgetClassComputeExpandFieldCallback,
genClosure_WidgetClassComputeExpandFieldCallback,
mk_WidgetClassComputeExpandFieldCallback,
noWidgetClassComputeExpandFieldCallback ,
wrap_WidgetClassComputeExpandFieldCallback,
C_WidgetClassConfigureEventFieldCallback,
WidgetClassConfigureEventFieldCallback ,
dynamic_WidgetClassConfigureEventFieldCallback,
genClosure_WidgetClassConfigureEventFieldCallback,
mk_WidgetClassConfigureEventFieldCallback,
noWidgetClassConfigureEventFieldCallback,
wrap_WidgetClassConfigureEventFieldCallback,
C_WidgetClassDamageEventFieldCallback ,
WidgetClassDamageEventFieldCallback ,
dynamic_WidgetClassDamageEventFieldCallback,
genClosure_WidgetClassDamageEventFieldCallback,
mk_WidgetClassDamageEventFieldCallback ,
noWidgetClassDamageEventFieldCallback ,
wrap_WidgetClassDamageEventFieldCallback,
C_WidgetClassDeleteEventFieldCallback ,
WidgetClassDeleteEventFieldCallback ,
dynamic_WidgetClassDeleteEventFieldCallback,
genClosure_WidgetClassDeleteEventFieldCallback,
mk_WidgetClassDeleteEventFieldCallback ,
noWidgetClassDeleteEventFieldCallback ,
wrap_WidgetClassDeleteEventFieldCallback,
C_WidgetClassDestroyEventFieldCallback ,
WidgetClassDestroyEventFieldCallback ,
dynamic_WidgetClassDestroyEventFieldCallback,
genClosure_WidgetClassDestroyEventFieldCallback,
mk_WidgetClassDestroyEventFieldCallback ,
noWidgetClassDestroyEventFieldCallback ,
wrap_WidgetClassDestroyEventFieldCallback,
C_WidgetClassDestroyFieldCallback ,
WidgetClassDestroyFieldCallback ,
dynamic_WidgetClassDestroyFieldCallback ,
genClosure_WidgetClassDestroyFieldCallback,
mk_WidgetClassDestroyFieldCallback ,
noWidgetClassDestroyFieldCallback ,
wrap_WidgetClassDestroyFieldCallback ,
C_WidgetClassDirectionChangedFieldCallback,
WidgetClassDirectionChangedFieldCallback,
dynamic_WidgetClassDirectionChangedFieldCallback,
genClosure_WidgetClassDirectionChangedFieldCallback,
mk_WidgetClassDirectionChangedFieldCallback,
noWidgetClassDirectionChangedFieldCallback,
wrap_WidgetClassDirectionChangedFieldCallback,
C_WidgetClassDispatchChildPropertiesChangedFieldCallback,
WidgetClassDispatchChildPropertiesChangedFieldCallback,
dynamic_WidgetClassDispatchChildPropertiesChangedFieldCallback,
genClosure_WidgetClassDispatchChildPropertiesChangedFieldCallback,
mk_WidgetClassDispatchChildPropertiesChangedFieldCallback,
noWidgetClassDispatchChildPropertiesChangedFieldCallback,
wrap_WidgetClassDispatchChildPropertiesChangedFieldCallback,
C_WidgetClassDragBeginFieldCallback ,
WidgetClassDragBeginFieldCallback ,
dynamic_WidgetClassDragBeginFieldCallback,
genClosure_WidgetClassDragBeginFieldCallback,
mk_WidgetClassDragBeginFieldCallback ,
noWidgetClassDragBeginFieldCallback ,
wrap_WidgetClassDragBeginFieldCallback ,
C_WidgetClassDragDataDeleteFieldCallback,
WidgetClassDragDataDeleteFieldCallback ,
dynamic_WidgetClassDragDataDeleteFieldCallback,
genClosure_WidgetClassDragDataDeleteFieldCallback,
mk_WidgetClassDragDataDeleteFieldCallback,
noWidgetClassDragDataDeleteFieldCallback,
wrap_WidgetClassDragDataDeleteFieldCallback,
C_WidgetClassDragDataGetFieldCallback ,
WidgetClassDragDataGetFieldCallback ,
dynamic_WidgetClassDragDataGetFieldCallback,
genClosure_WidgetClassDragDataGetFieldCallback,
mk_WidgetClassDragDataGetFieldCallback ,
noWidgetClassDragDataGetFieldCallback ,
wrap_WidgetClassDragDataGetFieldCallback,
C_WidgetClassDragDataReceivedFieldCallback,
WidgetClassDragDataReceivedFieldCallback,
dynamic_WidgetClassDragDataReceivedFieldCallback,
genClosure_WidgetClassDragDataReceivedFieldCallback,
mk_WidgetClassDragDataReceivedFieldCallback,
noWidgetClassDragDataReceivedFieldCallback,
wrap_WidgetClassDragDataReceivedFieldCallback,
C_WidgetClassDragDropFieldCallback ,
WidgetClassDragDropFieldCallback ,
dynamic_WidgetClassDragDropFieldCallback,
genClosure_WidgetClassDragDropFieldCallback,
mk_WidgetClassDragDropFieldCallback ,
noWidgetClassDragDropFieldCallback ,
wrap_WidgetClassDragDropFieldCallback ,
C_WidgetClassDragEndFieldCallback ,
WidgetClassDragEndFieldCallback ,
dynamic_WidgetClassDragEndFieldCallback ,
genClosure_WidgetClassDragEndFieldCallback,
mk_WidgetClassDragEndFieldCallback ,
noWidgetClassDragEndFieldCallback ,
wrap_WidgetClassDragEndFieldCallback ,
C_WidgetClassDragFailedFieldCallback ,
WidgetClassDragFailedFieldCallback ,
dynamic_WidgetClassDragFailedFieldCallback,
genClosure_WidgetClassDragFailedFieldCallback,
mk_WidgetClassDragFailedFieldCallback ,
noWidgetClassDragFailedFieldCallback ,
wrap_WidgetClassDragFailedFieldCallback ,
C_WidgetClassDragLeaveFieldCallback ,
WidgetClassDragLeaveFieldCallback ,
dynamic_WidgetClassDragLeaveFieldCallback,
genClosure_WidgetClassDragLeaveFieldCallback,
mk_WidgetClassDragLeaveFieldCallback ,
noWidgetClassDragLeaveFieldCallback ,
wrap_WidgetClassDragLeaveFieldCallback ,
C_WidgetClassDragMotionFieldCallback ,
WidgetClassDragMotionFieldCallback ,
dynamic_WidgetClassDragMotionFieldCallback,
genClosure_WidgetClassDragMotionFieldCallback,
mk_WidgetClassDragMotionFieldCallback ,
noWidgetClassDragMotionFieldCallback ,
wrap_WidgetClassDragMotionFieldCallback ,
C_WidgetClassDrawFieldCallback ,
WidgetClassDrawFieldCallback ,
dynamic_WidgetClassDrawFieldCallback ,
genClosure_WidgetClassDrawFieldCallback ,
mk_WidgetClassDrawFieldCallback ,
noWidgetClassDrawFieldCallback ,
wrap_WidgetClassDrawFieldCallback ,
C_WidgetClassEnterNotifyEventFieldCallback,
WidgetClassEnterNotifyEventFieldCallback,
dynamic_WidgetClassEnterNotifyEventFieldCallback,
genClosure_WidgetClassEnterNotifyEventFieldCallback,
mk_WidgetClassEnterNotifyEventFieldCallback,
noWidgetClassEnterNotifyEventFieldCallback,
wrap_WidgetClassEnterNotifyEventFieldCallback,
C_WidgetClassEventFieldCallback ,
WidgetClassEventFieldCallback ,
dynamic_WidgetClassEventFieldCallback ,
genClosure_WidgetClassEventFieldCallback,
mk_WidgetClassEventFieldCallback ,
noWidgetClassEventFieldCallback ,
wrap_WidgetClassEventFieldCallback ,
C_WidgetClassFocusFieldCallback ,
WidgetClassFocusFieldCallback ,
dynamic_WidgetClassFocusFieldCallback ,
genClosure_WidgetClassFocusFieldCallback,
mk_WidgetClassFocusFieldCallback ,
noWidgetClassFocusFieldCallback ,
wrap_WidgetClassFocusFieldCallback ,
C_WidgetClassFocusInEventFieldCallback ,
WidgetClassFocusInEventFieldCallback ,
dynamic_WidgetClassFocusInEventFieldCallback,
genClosure_WidgetClassFocusInEventFieldCallback,
mk_WidgetClassFocusInEventFieldCallback ,
noWidgetClassFocusInEventFieldCallback ,
wrap_WidgetClassFocusInEventFieldCallback,
C_WidgetClassFocusOutEventFieldCallback ,
WidgetClassFocusOutEventFieldCallback ,
dynamic_WidgetClassFocusOutEventFieldCallback,
genClosure_WidgetClassFocusOutEventFieldCallback,
mk_WidgetClassFocusOutEventFieldCallback,
noWidgetClassFocusOutEventFieldCallback ,
wrap_WidgetClassFocusOutEventFieldCallback,
C_WidgetClassGetAccessibleFieldCallback ,
WidgetClassGetAccessibleFieldCallback ,
dynamic_WidgetClassGetAccessibleFieldCallback,
genClosure_WidgetClassGetAccessibleFieldCallback,
mk_WidgetClassGetAccessibleFieldCallback,
noWidgetClassGetAccessibleFieldCallback ,
wrap_WidgetClassGetAccessibleFieldCallback,
C_WidgetClassGetPreferredHeightAndBaselineForWidthFieldCallback,
WidgetClassGetPreferredHeightAndBaselineForWidthFieldCallback,
dynamic_WidgetClassGetPreferredHeightAndBaselineForWidthFieldCallback,
genClosure_WidgetClassGetPreferredHeightAndBaselineForWidthFieldCallback,
mk_WidgetClassGetPreferredHeightAndBaselineForWidthFieldCallback,
noWidgetClassGetPreferredHeightAndBaselineForWidthFieldCallback,
wrap_WidgetClassGetPreferredHeightAndBaselineForWidthFieldCallback,
C_WidgetClassGetPreferredHeightFieldCallback,
WidgetClassGetPreferredHeightFieldCallback,
dynamic_WidgetClassGetPreferredHeightFieldCallback,
genClosure_WidgetClassGetPreferredHeightFieldCallback,
mk_WidgetClassGetPreferredHeightFieldCallback,
noWidgetClassGetPreferredHeightFieldCallback,
wrap_WidgetClassGetPreferredHeightFieldCallback,
C_WidgetClassGetPreferredHeightForWidthFieldCallback,
WidgetClassGetPreferredHeightForWidthFieldCallback,
dynamic_WidgetClassGetPreferredHeightForWidthFieldCallback,
genClosure_WidgetClassGetPreferredHeightForWidthFieldCallback,
mk_WidgetClassGetPreferredHeightForWidthFieldCallback,
noWidgetClassGetPreferredHeightForWidthFieldCallback,
wrap_WidgetClassGetPreferredHeightForWidthFieldCallback,
C_WidgetClassGetPreferredWidthFieldCallback,
WidgetClassGetPreferredWidthFieldCallback,
dynamic_WidgetClassGetPreferredWidthFieldCallback,
genClosure_WidgetClassGetPreferredWidthFieldCallback,
mk_WidgetClassGetPreferredWidthFieldCallback,
noWidgetClassGetPreferredWidthFieldCallback,
wrap_WidgetClassGetPreferredWidthFieldCallback,
C_WidgetClassGetPreferredWidthForHeightFieldCallback,
WidgetClassGetPreferredWidthForHeightFieldCallback,
dynamic_WidgetClassGetPreferredWidthForHeightFieldCallback,
genClosure_WidgetClassGetPreferredWidthForHeightFieldCallback,
mk_WidgetClassGetPreferredWidthForHeightFieldCallback,
noWidgetClassGetPreferredWidthForHeightFieldCallback,
wrap_WidgetClassGetPreferredWidthForHeightFieldCallback,
C_WidgetClassGetRequestModeFieldCallback,
WidgetClassGetRequestModeFieldCallback ,
dynamic_WidgetClassGetRequestModeFieldCallback,
genClosure_WidgetClassGetRequestModeFieldCallback,
mk_WidgetClassGetRequestModeFieldCallback,
noWidgetClassGetRequestModeFieldCallback,
wrap_WidgetClassGetRequestModeFieldCallback,
C_WidgetClassGrabBrokenEventFieldCallback,
WidgetClassGrabBrokenEventFieldCallback ,
dynamic_WidgetClassGrabBrokenEventFieldCallback,
genClosure_WidgetClassGrabBrokenEventFieldCallback,
mk_WidgetClassGrabBrokenEventFieldCallback,
noWidgetClassGrabBrokenEventFieldCallback,
wrap_WidgetClassGrabBrokenEventFieldCallback,
C_WidgetClassGrabFocusFieldCallback ,
WidgetClassGrabFocusFieldCallback ,
dynamic_WidgetClassGrabFocusFieldCallback,
genClosure_WidgetClassGrabFocusFieldCallback,
mk_WidgetClassGrabFocusFieldCallback ,
noWidgetClassGrabFocusFieldCallback ,
wrap_WidgetClassGrabFocusFieldCallback ,
C_WidgetClassGrabNotifyFieldCallback ,
WidgetClassGrabNotifyFieldCallback ,
dynamic_WidgetClassGrabNotifyFieldCallback,
genClosure_WidgetClassGrabNotifyFieldCallback,
mk_WidgetClassGrabNotifyFieldCallback ,
noWidgetClassGrabNotifyFieldCallback ,
wrap_WidgetClassGrabNotifyFieldCallback ,
C_WidgetClassHideFieldCallback ,
WidgetClassHideFieldCallback ,
dynamic_WidgetClassHideFieldCallback ,
genClosure_WidgetClassHideFieldCallback ,
mk_WidgetClassHideFieldCallback ,
noWidgetClassHideFieldCallback ,
wrap_WidgetClassHideFieldCallback ,
C_WidgetClassHierarchyChangedFieldCallback,
WidgetClassHierarchyChangedFieldCallback,
dynamic_WidgetClassHierarchyChangedFieldCallback,
genClosure_WidgetClassHierarchyChangedFieldCallback,
mk_WidgetClassHierarchyChangedFieldCallback,
noWidgetClassHierarchyChangedFieldCallback,
wrap_WidgetClassHierarchyChangedFieldCallback,
C_WidgetClassKeyPressEventFieldCallback ,
WidgetClassKeyPressEventFieldCallback ,
dynamic_WidgetClassKeyPressEventFieldCallback,
genClosure_WidgetClassKeyPressEventFieldCallback,
mk_WidgetClassKeyPressEventFieldCallback,
noWidgetClassKeyPressEventFieldCallback ,
wrap_WidgetClassKeyPressEventFieldCallback,
C_WidgetClassKeyReleaseEventFieldCallback,
WidgetClassKeyReleaseEventFieldCallback ,
dynamic_WidgetClassKeyReleaseEventFieldCallback,
genClosure_WidgetClassKeyReleaseEventFieldCallback,
mk_WidgetClassKeyReleaseEventFieldCallback,
noWidgetClassKeyReleaseEventFieldCallback,
wrap_WidgetClassKeyReleaseEventFieldCallback,
C_WidgetClassKeynavFailedFieldCallback ,
WidgetClassKeynavFailedFieldCallback ,
dynamic_WidgetClassKeynavFailedFieldCallback,
genClosure_WidgetClassKeynavFailedFieldCallback,
mk_WidgetClassKeynavFailedFieldCallback ,
noWidgetClassKeynavFailedFieldCallback ,
wrap_WidgetClassKeynavFailedFieldCallback,
C_WidgetClassLeaveNotifyEventFieldCallback,
WidgetClassLeaveNotifyEventFieldCallback,
dynamic_WidgetClassLeaveNotifyEventFieldCallback,
genClosure_WidgetClassLeaveNotifyEventFieldCallback,
mk_WidgetClassLeaveNotifyEventFieldCallback,
noWidgetClassLeaveNotifyEventFieldCallback,
wrap_WidgetClassLeaveNotifyEventFieldCallback,
C_WidgetClassMapEventFieldCallback ,
WidgetClassMapEventFieldCallback ,
dynamic_WidgetClassMapEventFieldCallback,
genClosure_WidgetClassMapEventFieldCallback,
mk_WidgetClassMapEventFieldCallback ,
noWidgetClassMapEventFieldCallback ,
wrap_WidgetClassMapEventFieldCallback ,
C_WidgetClassMapFieldCallback ,
WidgetClassMapFieldCallback ,
dynamic_WidgetClassMapFieldCallback ,
genClosure_WidgetClassMapFieldCallback ,
mk_WidgetClassMapFieldCallback ,
noWidgetClassMapFieldCallback ,
wrap_WidgetClassMapFieldCallback ,
C_WidgetClassMnemonicActivateFieldCallback,
WidgetClassMnemonicActivateFieldCallback,
dynamic_WidgetClassMnemonicActivateFieldCallback,
genClosure_WidgetClassMnemonicActivateFieldCallback,
mk_WidgetClassMnemonicActivateFieldCallback,
noWidgetClassMnemonicActivateFieldCallback,
wrap_WidgetClassMnemonicActivateFieldCallback,
C_WidgetClassMotionNotifyEventFieldCallback,
WidgetClassMotionNotifyEventFieldCallback,
dynamic_WidgetClassMotionNotifyEventFieldCallback,
genClosure_WidgetClassMotionNotifyEventFieldCallback,
mk_WidgetClassMotionNotifyEventFieldCallback,
noWidgetClassMotionNotifyEventFieldCallback,
wrap_WidgetClassMotionNotifyEventFieldCallback,
C_WidgetClassMoveFocusFieldCallback ,
WidgetClassMoveFocusFieldCallback ,
dynamic_WidgetClassMoveFocusFieldCallback,
genClosure_WidgetClassMoveFocusFieldCallback,
mk_WidgetClassMoveFocusFieldCallback ,
noWidgetClassMoveFocusFieldCallback ,
wrap_WidgetClassMoveFocusFieldCallback ,
C_WidgetClassParentSetFieldCallback ,
WidgetClassParentSetFieldCallback ,
dynamic_WidgetClassParentSetFieldCallback,
genClosure_WidgetClassParentSetFieldCallback,
mk_WidgetClassParentSetFieldCallback ,
noWidgetClassParentSetFieldCallback ,
wrap_WidgetClassParentSetFieldCallback ,
C_WidgetClassPopupMenuFieldCallback ,
WidgetClassPopupMenuFieldCallback ,
dynamic_WidgetClassPopupMenuFieldCallback,
genClosure_WidgetClassPopupMenuFieldCallback,
mk_WidgetClassPopupMenuFieldCallback ,
noWidgetClassPopupMenuFieldCallback ,
wrap_WidgetClassPopupMenuFieldCallback ,
C_WidgetClassPropertyNotifyEventFieldCallback,
WidgetClassPropertyNotifyEventFieldCallback,
dynamic_WidgetClassPropertyNotifyEventFieldCallback,
genClosure_WidgetClassPropertyNotifyEventFieldCallback,
mk_WidgetClassPropertyNotifyEventFieldCallback,
noWidgetClassPropertyNotifyEventFieldCallback,
wrap_WidgetClassPropertyNotifyEventFieldCallback,
C_WidgetClassProximityInEventFieldCallback,
WidgetClassProximityInEventFieldCallback,
dynamic_WidgetClassProximityInEventFieldCallback,
genClosure_WidgetClassProximityInEventFieldCallback,
mk_WidgetClassProximityInEventFieldCallback,
noWidgetClassProximityInEventFieldCallback,
wrap_WidgetClassProximityInEventFieldCallback,
C_WidgetClassProximityOutEventFieldCallback,
WidgetClassProximityOutEventFieldCallback,
dynamic_WidgetClassProximityOutEventFieldCallback,
genClosure_WidgetClassProximityOutEventFieldCallback,
mk_WidgetClassProximityOutEventFieldCallback,
noWidgetClassProximityOutEventFieldCallback,
wrap_WidgetClassProximityOutEventFieldCallback,
C_WidgetClassQueryTooltipFieldCallback ,
WidgetClassQueryTooltipFieldCallback ,
dynamic_WidgetClassQueryTooltipFieldCallback,
genClosure_WidgetClassQueryTooltipFieldCallback,
mk_WidgetClassQueryTooltipFieldCallback ,
noWidgetClassQueryTooltipFieldCallback ,
wrap_WidgetClassQueryTooltipFieldCallback,
C_WidgetClassQueueDrawRegionFieldCallback,
WidgetClassQueueDrawRegionFieldCallback ,
dynamic_WidgetClassQueueDrawRegionFieldCallback,
genClosure_WidgetClassQueueDrawRegionFieldCallback,
mk_WidgetClassQueueDrawRegionFieldCallback,
noWidgetClassQueueDrawRegionFieldCallback,
wrap_WidgetClassQueueDrawRegionFieldCallback,
C_WidgetClassRealizeFieldCallback ,
WidgetClassRealizeFieldCallback ,
dynamic_WidgetClassRealizeFieldCallback ,
genClosure_WidgetClassRealizeFieldCallback,
mk_WidgetClassRealizeFieldCallback ,
noWidgetClassRealizeFieldCallback ,
wrap_WidgetClassRealizeFieldCallback ,
C_WidgetClassScreenChangedFieldCallback ,
WidgetClassScreenChangedFieldCallback ,
dynamic_WidgetClassScreenChangedFieldCallback,
genClosure_WidgetClassScreenChangedFieldCallback,
mk_WidgetClassScreenChangedFieldCallback,
noWidgetClassScreenChangedFieldCallback ,
wrap_WidgetClassScreenChangedFieldCallback,
C_WidgetClassScrollEventFieldCallback ,
WidgetClassScrollEventFieldCallback ,
dynamic_WidgetClassScrollEventFieldCallback,
genClosure_WidgetClassScrollEventFieldCallback,
mk_WidgetClassScrollEventFieldCallback ,
noWidgetClassScrollEventFieldCallback ,
wrap_WidgetClassScrollEventFieldCallback,
C_WidgetClassSelectionClearEventFieldCallback,
WidgetClassSelectionClearEventFieldCallback,
dynamic_WidgetClassSelectionClearEventFieldCallback,
genClosure_WidgetClassSelectionClearEventFieldCallback,
mk_WidgetClassSelectionClearEventFieldCallback,
noWidgetClassSelectionClearEventFieldCallback,
wrap_WidgetClassSelectionClearEventFieldCallback,
C_WidgetClassSelectionGetFieldCallback ,
WidgetClassSelectionGetFieldCallback ,
dynamic_WidgetClassSelectionGetFieldCallback,
genClosure_WidgetClassSelectionGetFieldCallback,
mk_WidgetClassSelectionGetFieldCallback ,
noWidgetClassSelectionGetFieldCallback ,
wrap_WidgetClassSelectionGetFieldCallback,
C_WidgetClassSelectionNotifyEventFieldCallback,
WidgetClassSelectionNotifyEventFieldCallback,
dynamic_WidgetClassSelectionNotifyEventFieldCallback,
genClosure_WidgetClassSelectionNotifyEventFieldCallback,
mk_WidgetClassSelectionNotifyEventFieldCallback,
noWidgetClassSelectionNotifyEventFieldCallback,
wrap_WidgetClassSelectionNotifyEventFieldCallback,
C_WidgetClassSelectionReceivedFieldCallback,
WidgetClassSelectionReceivedFieldCallback,
dynamic_WidgetClassSelectionReceivedFieldCallback,
genClosure_WidgetClassSelectionReceivedFieldCallback,
mk_WidgetClassSelectionReceivedFieldCallback,
noWidgetClassSelectionReceivedFieldCallback,
wrap_WidgetClassSelectionReceivedFieldCallback,
C_WidgetClassSelectionRequestEventFieldCallback,
WidgetClassSelectionRequestEventFieldCallback,
dynamic_WidgetClassSelectionRequestEventFieldCallback,
genClosure_WidgetClassSelectionRequestEventFieldCallback,
mk_WidgetClassSelectionRequestEventFieldCallback,
noWidgetClassSelectionRequestEventFieldCallback,
wrap_WidgetClassSelectionRequestEventFieldCallback,
C_WidgetClassShowAllFieldCallback ,
WidgetClassShowAllFieldCallback ,
dynamic_WidgetClassShowAllFieldCallback ,
genClosure_WidgetClassShowAllFieldCallback,
mk_WidgetClassShowAllFieldCallback ,
noWidgetClassShowAllFieldCallback ,
wrap_WidgetClassShowAllFieldCallback ,
C_WidgetClassShowFieldCallback ,
WidgetClassShowFieldCallback ,
dynamic_WidgetClassShowFieldCallback ,
genClosure_WidgetClassShowFieldCallback ,
mk_WidgetClassShowFieldCallback ,
noWidgetClassShowFieldCallback ,
wrap_WidgetClassShowFieldCallback ,
C_WidgetClassShowHelpFieldCallback ,
WidgetClassShowHelpFieldCallback ,
dynamic_WidgetClassShowHelpFieldCallback,
genClosure_WidgetClassShowHelpFieldCallback,
mk_WidgetClassShowHelpFieldCallback ,
noWidgetClassShowHelpFieldCallback ,
wrap_WidgetClassShowHelpFieldCallback ,
C_WidgetClassSizeAllocateFieldCallback ,
WidgetClassSizeAllocateFieldCallback ,
dynamic_WidgetClassSizeAllocateFieldCallback,
genClosure_WidgetClassSizeAllocateFieldCallback,
mk_WidgetClassSizeAllocateFieldCallback ,
noWidgetClassSizeAllocateFieldCallback ,
wrap_WidgetClassSizeAllocateFieldCallback,
C_WidgetClassStateChangedFieldCallback ,
WidgetClassStateChangedFieldCallback ,
dynamic_WidgetClassStateChangedFieldCallback,
genClosure_WidgetClassStateChangedFieldCallback,
mk_WidgetClassStateChangedFieldCallback ,
noWidgetClassStateChangedFieldCallback ,
wrap_WidgetClassStateChangedFieldCallback,
C_WidgetClassStateFlagsChangedFieldCallback,
WidgetClassStateFlagsChangedFieldCallback,
dynamic_WidgetClassStateFlagsChangedFieldCallback,
genClosure_WidgetClassStateFlagsChangedFieldCallback,
mk_WidgetClassStateFlagsChangedFieldCallback,
noWidgetClassStateFlagsChangedFieldCallback,
wrap_WidgetClassStateFlagsChangedFieldCallback,
C_WidgetClassStyleSetFieldCallback ,
WidgetClassStyleSetFieldCallback ,
dynamic_WidgetClassStyleSetFieldCallback,
genClosure_WidgetClassStyleSetFieldCallback,
mk_WidgetClassStyleSetFieldCallback ,
noWidgetClassStyleSetFieldCallback ,
wrap_WidgetClassStyleSetFieldCallback ,
C_WidgetClassStyleUpdatedFieldCallback ,
WidgetClassStyleUpdatedFieldCallback ,
dynamic_WidgetClassStyleUpdatedFieldCallback,
genClosure_WidgetClassStyleUpdatedFieldCallback,
mk_WidgetClassStyleUpdatedFieldCallback ,
noWidgetClassStyleUpdatedFieldCallback ,
wrap_WidgetClassStyleUpdatedFieldCallback,
C_WidgetClassTouchEventFieldCallback ,
WidgetClassTouchEventFieldCallback ,
dynamic_WidgetClassTouchEventFieldCallback,
genClosure_WidgetClassTouchEventFieldCallback,
mk_WidgetClassTouchEventFieldCallback ,
noWidgetClassTouchEventFieldCallback ,
wrap_WidgetClassTouchEventFieldCallback ,
C_WidgetClassUnmapEventFieldCallback ,
WidgetClassUnmapEventFieldCallback ,
dynamic_WidgetClassUnmapEventFieldCallback,
genClosure_WidgetClassUnmapEventFieldCallback,
mk_WidgetClassUnmapEventFieldCallback ,
noWidgetClassUnmapEventFieldCallback ,
wrap_WidgetClassUnmapEventFieldCallback ,
C_WidgetClassUnmapFieldCallback ,
WidgetClassUnmapFieldCallback ,
dynamic_WidgetClassUnmapFieldCallback ,
genClosure_WidgetClassUnmapFieldCallback,
mk_WidgetClassUnmapFieldCallback ,
noWidgetClassUnmapFieldCallback ,
wrap_WidgetClassUnmapFieldCallback ,
C_WidgetClassUnrealizeFieldCallback ,
WidgetClassUnrealizeFieldCallback ,
dynamic_WidgetClassUnrealizeFieldCallback,
genClosure_WidgetClassUnrealizeFieldCallback,
mk_WidgetClassUnrealizeFieldCallback ,
noWidgetClassUnrealizeFieldCallback ,
wrap_WidgetClassUnrealizeFieldCallback ,
C_WidgetClassVisibilityNotifyEventFieldCallback,
WidgetClassVisibilityNotifyEventFieldCallback,
dynamic_WidgetClassVisibilityNotifyEventFieldCallback,
genClosure_WidgetClassVisibilityNotifyEventFieldCallback,
mk_WidgetClassVisibilityNotifyEventFieldCallback,
noWidgetClassVisibilityNotifyEventFieldCallback,
wrap_WidgetClassVisibilityNotifyEventFieldCallback,
C_WidgetClassWindowStateEventFieldCallback,
WidgetClassWindowStateEventFieldCallback,
dynamic_WidgetClassWindowStateEventFieldCallback,
genClosure_WidgetClassWindowStateEventFieldCallback,
mk_WidgetClassWindowStateEventFieldCallback,
noWidgetClassWindowStateEventFieldCallback,
wrap_WidgetClassWindowStateEventFieldCallback,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.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 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.Objects.Object as Atk.Object
import qualified GI.Cairo.Structs.Context as Cairo.Context
import qualified GI.Cairo.Structs.Region as Cairo.Region
import qualified GI.GLib.Structs.String as GLib.String
import qualified GI.GObject.Flags as GObject.Flags
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gdk.Flags as Gdk.Flags
import qualified GI.Gdk.Objects.Display as Gdk.Display
import qualified GI.Gdk.Objects.DragContext as Gdk.DragContext
import qualified GI.Gdk.Objects.FrameClock as Gdk.FrameClock
import qualified GI.Gdk.Objects.Screen as Gdk.Screen
import qualified GI.Gdk.Structs.Atom as Gdk.Atom
import qualified GI.Gdk.Structs.Color as Gdk.Color
import qualified GI.Gdk.Structs.EventAny as Gdk.EventAny
import qualified GI.Gdk.Structs.EventButton as Gdk.EventButton
import qualified GI.Gdk.Structs.EventConfigure as Gdk.EventConfigure
import qualified GI.Gdk.Structs.EventCrossing as Gdk.EventCrossing
import qualified GI.Gdk.Structs.EventExpose as Gdk.EventExpose
import qualified GI.Gdk.Structs.EventFocus as Gdk.EventFocus
import qualified GI.Gdk.Structs.EventGrabBroken as Gdk.EventGrabBroken
import qualified GI.Gdk.Structs.EventKey as Gdk.EventKey
import qualified GI.Gdk.Structs.EventMotion as Gdk.EventMotion
import qualified GI.Gdk.Structs.EventProperty as Gdk.EventProperty
import qualified GI.Gdk.Structs.EventProximity as Gdk.EventProximity
import qualified GI.Gdk.Structs.EventScroll as Gdk.EventScroll
import qualified GI.Gdk.Structs.EventSelection as Gdk.EventSelection
import qualified GI.Gdk.Structs.EventTouch as Gdk.EventTouch
import qualified GI.Gdk.Structs.EventVisibility as Gdk.EventVisibility
import qualified GI.Gdk.Structs.EventWindowState as Gdk.EventWindowState
import qualified GI.Gdk.Structs.Rectangle as Gdk.Rectangle
import qualified GI.Gdk.Unions.Event as Gdk.Event
import qualified GI.GdkPixbuf.Objects.Pixbuf as GdkPixbuf.Pixbuf
import {-# SOURCE #-} qualified GI.Gtk.Enums as Gtk.Enums
import {-# SOURCE #-} qualified GI.Gtk.Flags as Gtk.Flags
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.CellLayout as Gtk.CellLayout
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.TreeModel as Gtk.TreeModel
import {-# SOURCE #-} qualified GI.Gtk.Objects.AccelGroup as Gtk.AccelGroup
import {-# SOURCE #-} qualified GI.Gtk.Objects.Builder as Gtk.Builder
import {-# SOURCE #-} qualified GI.Gtk.Objects.Calendar as Gtk.Calendar
import {-# SOURCE #-} qualified GI.Gtk.Objects.CellRenderer as Gtk.CellRenderer
import {-# SOURCE #-} qualified GI.Gtk.Objects.Clipboard as Gtk.Clipboard
import {-# SOURCE #-} qualified GI.Gtk.Objects.Container as Gtk.Container
import {-# SOURCE #-} qualified GI.Gtk.Objects.EntryCompletion as Gtk.EntryCompletion
import {-# SOURCE #-} qualified GI.Gtk.Objects.FlowBox as Gtk.FlowBox
import {-# SOURCE #-} qualified GI.Gtk.Objects.FlowBoxChild as Gtk.FlowBoxChild
import {-# SOURCE #-} qualified GI.Gtk.Objects.IconView as Gtk.IconView
import {-# SOURCE #-} qualified GI.Gtk.Objects.ListBox as Gtk.ListBox
import {-# SOURCE #-} qualified GI.Gtk.Objects.ListBoxRow as Gtk.ListBoxRow
import {-# SOURCE #-} qualified GI.Gtk.Objects.Menu as Gtk.Menu
import {-# SOURCE #-} qualified GI.Gtk.Objects.PageSetup as Gtk.PageSetup
import {-# SOURCE #-} qualified GI.Gtk.Objects.Style as Gtk.Style
import {-# SOURCE #-} qualified GI.Gtk.Objects.TextBuffer as Gtk.TextBuffer
import {-# SOURCE #-} qualified GI.Gtk.Objects.TextTag as Gtk.TextTag
import {-# SOURCE #-} qualified GI.Gtk.Objects.Tooltip as Gtk.Tooltip
import {-# SOURCE #-} qualified GI.Gtk.Objects.TreeSelection as Gtk.TreeSelection
import {-# SOURCE #-} qualified GI.Gtk.Objects.TreeView as Gtk.TreeView
import {-# SOURCE #-} qualified GI.Gtk.Objects.TreeViewColumn as Gtk.TreeViewColumn
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
import {-# SOURCE #-} qualified GI.Gtk.Structs.AccelKey as Gtk.AccelKey
import {-# SOURCE #-} qualified GI.Gtk.Structs.FileFilterInfo as Gtk.FileFilterInfo
import {-# SOURCE #-} qualified GI.Gtk.Structs.RecentFilterInfo as Gtk.RecentFilterInfo
import {-# SOURCE #-} qualified GI.Gtk.Structs.RecentInfo as Gtk.RecentInfo
import {-# SOURCE #-} qualified GI.Gtk.Structs.SelectionData as Gtk.SelectionData
import {-# SOURCE #-} qualified GI.Gtk.Structs.TextIter as Gtk.TextIter
import {-# SOURCE #-} qualified GI.Gtk.Structs.TreeIter as Gtk.TreeIter
import {-# SOURCE #-} qualified GI.Gtk.Structs.TreePath as Gtk.TreePath
import {-# SOURCE #-} qualified GI.Gtk.Structs.WidgetPath as Gtk.WidgetPath
import qualified GI.Pango.Objects.FontFace as Pango.FontFace
import qualified GI.Pango.Objects.FontFamily as Pango.FontFamily
type C_WidgetClassWindowStateEventFieldCallback =
Ptr Gtk.Widget.Widget ->
Ptr Gdk.EventWindowState.EventWindowState ->
IO CInt
foreign import ccall "dynamic" __dynamic_C_WidgetClassWindowStateEventFieldCallback :: FunPtr C_WidgetClassWindowStateEventFieldCallback -> C_WidgetClassWindowStateEventFieldCallback
dynamic_WidgetClassWindowStateEventFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassWindowStateEventFieldCallback
-> a
-> Gdk.EventWindowState.EventWindowState
-> m Bool
dynamic_WidgetClassWindowStateEventFieldCallback :: FunPtr C_WidgetClassWindowStateEventFieldCallback
-> a -> EventWindowState -> m Bool
dynamic_WidgetClassWindowStateEventFieldCallback __funPtr :: FunPtr C_WidgetClassWindowStateEventFieldCallback
__funPtr widget :: a
widget event :: EventWindowState
event = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
Ptr EventWindowState
event' <- EventWindowState -> IO (Ptr EventWindowState)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr EventWindowState
event
CInt
result <- (FunPtr C_WidgetClassWindowStateEventFieldCallback
-> C_WidgetClassWindowStateEventFieldCallback
__dynamic_C_WidgetClassWindowStateEventFieldCallback FunPtr C_WidgetClassWindowStateEventFieldCallback
__funPtr) Ptr Widget
widget' Ptr EventWindowState
event'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= 0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
EventWindowState -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr EventWindowState
event
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
foreign import ccall "wrapper"
mk_WidgetClassWindowStateEventFieldCallback :: C_WidgetClassWindowStateEventFieldCallback -> IO (FunPtr C_WidgetClassWindowStateEventFieldCallback)
type WidgetClassWindowStateEventFieldCallback =
Gtk.Widget.Widget
-> Gdk.EventWindowState.EventWindowState
-> IO Bool
noWidgetClassWindowStateEventFieldCallback :: Maybe WidgetClassWindowStateEventFieldCallback
noWidgetClassWindowStateEventFieldCallback :: Maybe WidgetClassWindowStateEventFieldCallback
noWidgetClassWindowStateEventFieldCallback = Maybe WidgetClassWindowStateEventFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassWindowStateEventFieldCallback :: MonadIO m => WidgetClassWindowStateEventFieldCallback -> m (GClosure C_WidgetClassWindowStateEventFieldCallback)
genClosure_WidgetClassWindowStateEventFieldCallback :: WidgetClassWindowStateEventFieldCallback
-> m (GClosure C_WidgetClassWindowStateEventFieldCallback)
genClosure_WidgetClassWindowStateEventFieldCallback cb :: WidgetClassWindowStateEventFieldCallback
cb = IO (GClosure C_WidgetClassWindowStateEventFieldCallback)
-> m (GClosure C_WidgetClassWindowStateEventFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassWindowStateEventFieldCallback)
-> m (GClosure C_WidgetClassWindowStateEventFieldCallback))
-> IO (GClosure C_WidgetClassWindowStateEventFieldCallback)
-> m (GClosure C_WidgetClassWindowStateEventFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassWindowStateEventFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassWindowStateEventFieldCallback))
-> WidgetClassWindowStateEventFieldCallback
-> C_WidgetClassWindowStateEventFieldCallback
wrap_WidgetClassWindowStateEventFieldCallback Maybe (Ptr (FunPtr C_WidgetClassWindowStateEventFieldCallback))
forall a. Maybe a
Nothing WidgetClassWindowStateEventFieldCallback
cb
C_WidgetClassWindowStateEventFieldCallback
-> IO (FunPtr C_WidgetClassWindowStateEventFieldCallback)
mk_WidgetClassWindowStateEventFieldCallback C_WidgetClassWindowStateEventFieldCallback
cb' IO (FunPtr C_WidgetClassWindowStateEventFieldCallback)
-> (FunPtr C_WidgetClassWindowStateEventFieldCallback
-> IO (GClosure C_WidgetClassWindowStateEventFieldCallback))
-> IO (GClosure C_WidgetClassWindowStateEventFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassWindowStateEventFieldCallback
-> IO (GClosure C_WidgetClassWindowStateEventFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassWindowStateEventFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassWindowStateEventFieldCallback)) ->
WidgetClassWindowStateEventFieldCallback ->
C_WidgetClassWindowStateEventFieldCallback
wrap_WidgetClassWindowStateEventFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassWindowStateEventFieldCallback))
-> WidgetClassWindowStateEventFieldCallback
-> C_WidgetClassWindowStateEventFieldCallback
wrap_WidgetClassWindowStateEventFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassWindowStateEventFieldCallback))
funptrptr _cb :: WidgetClassWindowStateEventFieldCallback
_cb widget :: Ptr Widget
widget event :: Ptr EventWindowState
event = 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
EventWindowState
event' <- ((ManagedPtr EventWindowState -> EventWindowState)
-> Ptr EventWindowState -> IO EventWindowState
forall a.
(HasCallStack, WrappedPtr a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
newPtr ManagedPtr EventWindowState -> EventWindowState
Gdk.EventWindowState.EventWindowState) Ptr EventWindowState
event
Bool
result <- WidgetClassWindowStateEventFieldCallback
_cb Widget
widget' EventWindowState
event'
Maybe (Ptr (FunPtr C_WidgetClassWindowStateEventFieldCallback))
-> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassWindowStateEventFieldCallback))
funptrptr
let result' :: CInt
result' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
result
CInt -> IO CInt
forall (m :: * -> *) a. Monad m => a -> m a
return CInt
result'
type C_WidgetClassVisibilityNotifyEventFieldCallback =
Ptr Gtk.Widget.Widget ->
Ptr Gdk.EventVisibility.EventVisibility ->
IO CInt
foreign import ccall "dynamic" __dynamic_C_WidgetClassVisibilityNotifyEventFieldCallback :: FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback -> C_WidgetClassVisibilityNotifyEventFieldCallback
dynamic_WidgetClassVisibilityNotifyEventFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback
-> a
-> Gdk.EventVisibility.EventVisibility
-> m Bool
dynamic_WidgetClassVisibilityNotifyEventFieldCallback :: FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback
-> a -> EventVisibility -> m Bool
dynamic_WidgetClassVisibilityNotifyEventFieldCallback __funPtr :: FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback
__funPtr widget :: a
widget event :: EventVisibility
event = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
Ptr EventVisibility
event' <- EventVisibility -> IO (Ptr EventVisibility)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr EventVisibility
event
CInt
result <- (FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback
-> C_WidgetClassVisibilityNotifyEventFieldCallback
__dynamic_C_WidgetClassVisibilityNotifyEventFieldCallback FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback
__funPtr) Ptr Widget
widget' Ptr EventVisibility
event'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= 0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
EventVisibility -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr EventVisibility
event
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
foreign import ccall "wrapper"
mk_WidgetClassVisibilityNotifyEventFieldCallback :: C_WidgetClassVisibilityNotifyEventFieldCallback -> IO (FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback)
type WidgetClassVisibilityNotifyEventFieldCallback =
Gtk.Widget.Widget
-> Gdk.EventVisibility.EventVisibility
-> IO Bool
noWidgetClassVisibilityNotifyEventFieldCallback :: Maybe WidgetClassVisibilityNotifyEventFieldCallback
noWidgetClassVisibilityNotifyEventFieldCallback :: Maybe WidgetClassVisibilityNotifyEventFieldCallback
noWidgetClassVisibilityNotifyEventFieldCallback = Maybe WidgetClassVisibilityNotifyEventFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassVisibilityNotifyEventFieldCallback :: MonadIO m => WidgetClassVisibilityNotifyEventFieldCallback -> m (GClosure C_WidgetClassVisibilityNotifyEventFieldCallback)
genClosure_WidgetClassVisibilityNotifyEventFieldCallback :: WidgetClassVisibilityNotifyEventFieldCallback
-> m (GClosure C_WidgetClassVisibilityNotifyEventFieldCallback)
genClosure_WidgetClassVisibilityNotifyEventFieldCallback cb :: WidgetClassVisibilityNotifyEventFieldCallback
cb = IO (GClosure C_WidgetClassVisibilityNotifyEventFieldCallback)
-> m (GClosure C_WidgetClassVisibilityNotifyEventFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassVisibilityNotifyEventFieldCallback)
-> m (GClosure C_WidgetClassVisibilityNotifyEventFieldCallback))
-> IO (GClosure C_WidgetClassVisibilityNotifyEventFieldCallback)
-> m (GClosure C_WidgetClassVisibilityNotifyEventFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassVisibilityNotifyEventFieldCallback
cb' = Maybe
(Ptr (FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback))
-> WidgetClassVisibilityNotifyEventFieldCallback
-> C_WidgetClassVisibilityNotifyEventFieldCallback
wrap_WidgetClassVisibilityNotifyEventFieldCallback Maybe
(Ptr (FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback))
forall a. Maybe a
Nothing WidgetClassVisibilityNotifyEventFieldCallback
cb
C_WidgetClassVisibilityNotifyEventFieldCallback
-> IO (FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback)
mk_WidgetClassVisibilityNotifyEventFieldCallback C_WidgetClassVisibilityNotifyEventFieldCallback
cb' IO (FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback)
-> (FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback
-> IO (GClosure C_WidgetClassVisibilityNotifyEventFieldCallback))
-> IO (GClosure C_WidgetClassVisibilityNotifyEventFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback
-> IO (GClosure C_WidgetClassVisibilityNotifyEventFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassVisibilityNotifyEventFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback)) ->
WidgetClassVisibilityNotifyEventFieldCallback ->
C_WidgetClassVisibilityNotifyEventFieldCallback
wrap_WidgetClassVisibilityNotifyEventFieldCallback :: Maybe
(Ptr (FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback))
-> WidgetClassVisibilityNotifyEventFieldCallback
-> C_WidgetClassVisibilityNotifyEventFieldCallback
wrap_WidgetClassVisibilityNotifyEventFieldCallback funptrptr :: Maybe
(Ptr (FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback))
funptrptr _cb :: WidgetClassVisibilityNotifyEventFieldCallback
_cb widget :: Ptr Widget
widget event :: Ptr EventVisibility
event = 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
EventVisibility
event' <- ((ManagedPtr EventVisibility -> EventVisibility)
-> Ptr EventVisibility -> IO EventVisibility
forall a.
(HasCallStack, WrappedPtr a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
newPtr ManagedPtr EventVisibility -> EventVisibility
Gdk.EventVisibility.EventVisibility) Ptr EventVisibility
event
Bool
result <- WidgetClassVisibilityNotifyEventFieldCallback
_cb Widget
widget' EventVisibility
event'
Maybe
(Ptr (FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback))
-> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe
(Ptr (FunPtr C_WidgetClassVisibilityNotifyEventFieldCallback))
funptrptr
let result' :: CInt
result' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
result
CInt -> IO CInt
forall (m :: * -> *) a. Monad m => a -> m a
return CInt
result'
type C_WidgetClassUnrealizeFieldCallback =
Ptr Gtk.Widget.Widget ->
IO ()
foreign import ccall "dynamic" __dynamic_C_WidgetClassUnrealizeFieldCallback :: FunPtr C_WidgetClassUnrealizeFieldCallback -> C_WidgetClassUnrealizeFieldCallback
dynamic_WidgetClassUnrealizeFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassUnrealizeFieldCallback
-> a
-> m ()
dynamic_WidgetClassUnrealizeFieldCallback :: FunPtr C_WidgetClassUnrealizeFieldCallback -> a -> m ()
dynamic_WidgetClassUnrealizeFieldCallback __funPtr :: FunPtr C_WidgetClassUnrealizeFieldCallback
__funPtr widget :: a
widget = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
(FunPtr C_WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
__dynamic_C_WidgetClassUnrealizeFieldCallback FunPtr C_WidgetClassUnrealizeFieldCallback
__funPtr) Ptr Widget
widget'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
foreign import ccall "wrapper"
mk_WidgetClassUnrealizeFieldCallback :: C_WidgetClassUnrealizeFieldCallback -> IO (FunPtr C_WidgetClassUnrealizeFieldCallback)
type WidgetClassUnrealizeFieldCallback =
Gtk.Widget.Widget
-> IO ()
noWidgetClassUnrealizeFieldCallback :: Maybe WidgetClassUnrealizeFieldCallback
noWidgetClassUnrealizeFieldCallback :: Maybe WidgetClassUnrealizeFieldCallback
noWidgetClassUnrealizeFieldCallback = Maybe WidgetClassUnrealizeFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassUnrealizeFieldCallback :: MonadIO m => WidgetClassUnrealizeFieldCallback -> m (GClosure C_WidgetClassUnrealizeFieldCallback)
genClosure_WidgetClassUnrealizeFieldCallback :: WidgetClassUnrealizeFieldCallback
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
genClosure_WidgetClassUnrealizeFieldCallback cb :: WidgetClassUnrealizeFieldCallback
cb = IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback))
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassUnrealizeFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
-> WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
wrap_WidgetClassUnrealizeFieldCallback Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
forall a. Maybe a
Nothing WidgetClassUnrealizeFieldCallback
cb
C_WidgetClassUnrealizeFieldCallback
-> IO (FunPtr C_WidgetClassUnrealizeFieldCallback)
mk_WidgetClassUnrealizeFieldCallback C_WidgetClassUnrealizeFieldCallback
cb' IO (FunPtr C_WidgetClassUnrealizeFieldCallback)
-> (FunPtr C_WidgetClassUnrealizeFieldCallback
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback))
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassUnrealizeFieldCallback
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassUnrealizeFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback)) ->
WidgetClassUnrealizeFieldCallback ->
C_WidgetClassUnrealizeFieldCallback
wrap_WidgetClassUnrealizeFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
-> WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
wrap_WidgetClassUnrealizeFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
funptrptr _cb :: WidgetClassUnrealizeFieldCallback
_cb widget :: Ptr Widget
widget = 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
WidgetClassUnrealizeFieldCallback
_cb Widget
widget'
Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback)) -> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
funptrptr
type C_WidgetClassUnmapFieldCallback =
Ptr Gtk.Widget.Widget ->
IO ()
foreign import ccall "dynamic" __dynamic_C_WidgetClassUnmapFieldCallback :: FunPtr C_WidgetClassUnmapFieldCallback -> C_WidgetClassUnmapFieldCallback
dynamic_WidgetClassUnmapFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassUnmapFieldCallback
-> a
-> m ()
dynamic_WidgetClassUnmapFieldCallback :: FunPtr C_WidgetClassUnrealizeFieldCallback -> a -> m ()
dynamic_WidgetClassUnmapFieldCallback __funPtr :: FunPtr C_WidgetClassUnrealizeFieldCallback
__funPtr widget :: a
widget = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
(FunPtr C_WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
__dynamic_C_WidgetClassUnmapFieldCallback FunPtr C_WidgetClassUnrealizeFieldCallback
__funPtr) Ptr Widget
widget'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
foreign import ccall "wrapper"
mk_WidgetClassUnmapFieldCallback :: C_WidgetClassUnmapFieldCallback -> IO (FunPtr C_WidgetClassUnmapFieldCallback)
type WidgetClassUnmapFieldCallback =
Gtk.Widget.Widget
-> IO ()
noWidgetClassUnmapFieldCallback :: Maybe WidgetClassUnmapFieldCallback
noWidgetClassUnmapFieldCallback :: Maybe WidgetClassUnrealizeFieldCallback
noWidgetClassUnmapFieldCallback = Maybe WidgetClassUnrealizeFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassUnmapFieldCallback :: MonadIO m => WidgetClassUnmapFieldCallback -> m (GClosure C_WidgetClassUnmapFieldCallback)
genClosure_WidgetClassUnmapFieldCallback :: WidgetClassUnrealizeFieldCallback
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
genClosure_WidgetClassUnmapFieldCallback cb :: WidgetClassUnrealizeFieldCallback
cb = IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback))
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassUnrealizeFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
-> WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
wrap_WidgetClassUnmapFieldCallback Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
forall a. Maybe a
Nothing WidgetClassUnrealizeFieldCallback
cb
C_WidgetClassUnrealizeFieldCallback
-> IO (FunPtr C_WidgetClassUnrealizeFieldCallback)
mk_WidgetClassUnmapFieldCallback C_WidgetClassUnrealizeFieldCallback
cb' IO (FunPtr C_WidgetClassUnrealizeFieldCallback)
-> (FunPtr C_WidgetClassUnrealizeFieldCallback
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback))
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassUnrealizeFieldCallback
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassUnmapFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassUnmapFieldCallback)) ->
WidgetClassUnmapFieldCallback ->
C_WidgetClassUnmapFieldCallback
wrap_WidgetClassUnmapFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
-> WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
wrap_WidgetClassUnmapFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
funptrptr _cb :: WidgetClassUnrealizeFieldCallback
_cb widget :: Ptr Widget
widget = 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
WidgetClassUnrealizeFieldCallback
_cb Widget
widget'
Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback)) -> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
funptrptr
type C_WidgetClassUnmapEventFieldCallback =
Ptr Gtk.Widget.Widget ->
Ptr Gdk.EventAny.EventAny ->
IO CInt
foreign import ccall "dynamic" __dynamic_C_WidgetClassUnmapEventFieldCallback :: FunPtr C_WidgetClassUnmapEventFieldCallback -> C_WidgetClassUnmapEventFieldCallback
dynamic_WidgetClassUnmapEventFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassUnmapEventFieldCallback
-> a
-> Gdk.EventAny.EventAny
-> m Bool
dynamic_WidgetClassUnmapEventFieldCallback :: FunPtr C_WidgetClassUnmapEventFieldCallback
-> a -> EventAny -> m Bool
dynamic_WidgetClassUnmapEventFieldCallback __funPtr :: FunPtr C_WidgetClassUnmapEventFieldCallback
__funPtr widget :: a
widget event :: EventAny
event = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
Ptr EventAny
event' <- EventAny -> IO (Ptr EventAny)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr EventAny
event
CInt
result <- (FunPtr C_WidgetClassUnmapEventFieldCallback
-> C_WidgetClassUnmapEventFieldCallback
__dynamic_C_WidgetClassUnmapEventFieldCallback FunPtr C_WidgetClassUnmapEventFieldCallback
__funPtr) Ptr Widget
widget' Ptr EventAny
event'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= 0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
EventAny -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr EventAny
event
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
foreign import ccall "wrapper"
mk_WidgetClassUnmapEventFieldCallback :: C_WidgetClassUnmapEventFieldCallback -> IO (FunPtr C_WidgetClassUnmapEventFieldCallback)
type WidgetClassUnmapEventFieldCallback =
Gtk.Widget.Widget
-> Gdk.EventAny.EventAny
-> IO Bool
noWidgetClassUnmapEventFieldCallback :: Maybe WidgetClassUnmapEventFieldCallback
noWidgetClassUnmapEventFieldCallback :: Maybe WidgetClassUnmapEventFieldCallback
noWidgetClassUnmapEventFieldCallback = Maybe WidgetClassUnmapEventFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassUnmapEventFieldCallback :: MonadIO m => WidgetClassUnmapEventFieldCallback -> m (GClosure C_WidgetClassUnmapEventFieldCallback)
genClosure_WidgetClassUnmapEventFieldCallback :: WidgetClassUnmapEventFieldCallback
-> m (GClosure C_WidgetClassUnmapEventFieldCallback)
genClosure_WidgetClassUnmapEventFieldCallback cb :: WidgetClassUnmapEventFieldCallback
cb = IO (GClosure C_WidgetClassUnmapEventFieldCallback)
-> m (GClosure C_WidgetClassUnmapEventFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassUnmapEventFieldCallback)
-> m (GClosure C_WidgetClassUnmapEventFieldCallback))
-> IO (GClosure C_WidgetClassUnmapEventFieldCallback)
-> m (GClosure C_WidgetClassUnmapEventFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassUnmapEventFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassUnmapEventFieldCallback))
-> WidgetClassUnmapEventFieldCallback
-> C_WidgetClassUnmapEventFieldCallback
wrap_WidgetClassUnmapEventFieldCallback Maybe (Ptr (FunPtr C_WidgetClassUnmapEventFieldCallback))
forall a. Maybe a
Nothing WidgetClassUnmapEventFieldCallback
cb
C_WidgetClassUnmapEventFieldCallback
-> IO (FunPtr C_WidgetClassUnmapEventFieldCallback)
mk_WidgetClassUnmapEventFieldCallback C_WidgetClassUnmapEventFieldCallback
cb' IO (FunPtr C_WidgetClassUnmapEventFieldCallback)
-> (FunPtr C_WidgetClassUnmapEventFieldCallback
-> IO (GClosure C_WidgetClassUnmapEventFieldCallback))
-> IO (GClosure C_WidgetClassUnmapEventFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassUnmapEventFieldCallback
-> IO (GClosure C_WidgetClassUnmapEventFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassUnmapEventFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassUnmapEventFieldCallback)) ->
WidgetClassUnmapEventFieldCallback ->
C_WidgetClassUnmapEventFieldCallback
wrap_WidgetClassUnmapEventFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassUnmapEventFieldCallback))
-> WidgetClassUnmapEventFieldCallback
-> C_WidgetClassUnmapEventFieldCallback
wrap_WidgetClassUnmapEventFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassUnmapEventFieldCallback))
funptrptr _cb :: WidgetClassUnmapEventFieldCallback
_cb widget :: Ptr Widget
widget event :: Ptr EventAny
event = 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
EventAny
event' <- ((ManagedPtr EventAny -> EventAny) -> Ptr EventAny -> IO EventAny
forall a.
(HasCallStack, WrappedPtr a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
newPtr ManagedPtr EventAny -> EventAny
Gdk.EventAny.EventAny) Ptr EventAny
event
Bool
result <- WidgetClassUnmapEventFieldCallback
_cb Widget
widget' EventAny
event'
Maybe (Ptr (FunPtr C_WidgetClassUnmapEventFieldCallback)) -> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassUnmapEventFieldCallback))
funptrptr
let result' :: CInt
result' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
result
CInt -> IO CInt
forall (m :: * -> *) a. Monad m => a -> m a
return CInt
result'
type C_WidgetClassTouchEventFieldCallback =
Ptr Gtk.Widget.Widget ->
Ptr Gdk.EventTouch.EventTouch ->
IO CInt
foreign import ccall "dynamic" __dynamic_C_WidgetClassTouchEventFieldCallback :: FunPtr C_WidgetClassTouchEventFieldCallback -> C_WidgetClassTouchEventFieldCallback
dynamic_WidgetClassTouchEventFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassTouchEventFieldCallback
-> a
-> Gdk.EventTouch.EventTouch
-> m Bool
dynamic_WidgetClassTouchEventFieldCallback :: FunPtr C_WidgetClassTouchEventFieldCallback
-> a -> EventTouch -> m Bool
dynamic_WidgetClassTouchEventFieldCallback __funPtr :: FunPtr C_WidgetClassTouchEventFieldCallback
__funPtr widget :: a
widget event :: EventTouch
event = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
Ptr EventTouch
event' <- EventTouch -> IO (Ptr EventTouch)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr EventTouch
event
CInt
result <- (FunPtr C_WidgetClassTouchEventFieldCallback
-> C_WidgetClassTouchEventFieldCallback
__dynamic_C_WidgetClassTouchEventFieldCallback FunPtr C_WidgetClassTouchEventFieldCallback
__funPtr) Ptr Widget
widget' Ptr EventTouch
event'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= 0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
EventTouch -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr EventTouch
event
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
foreign import ccall "wrapper"
mk_WidgetClassTouchEventFieldCallback :: C_WidgetClassTouchEventFieldCallback -> IO (FunPtr C_WidgetClassTouchEventFieldCallback)
type WidgetClassTouchEventFieldCallback =
Gtk.Widget.Widget
-> Gdk.EventTouch.EventTouch
-> IO Bool
noWidgetClassTouchEventFieldCallback :: Maybe WidgetClassTouchEventFieldCallback
noWidgetClassTouchEventFieldCallback :: Maybe WidgetClassTouchEventFieldCallback
noWidgetClassTouchEventFieldCallback = Maybe WidgetClassTouchEventFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassTouchEventFieldCallback :: MonadIO m => WidgetClassTouchEventFieldCallback -> m (GClosure C_WidgetClassTouchEventFieldCallback)
genClosure_WidgetClassTouchEventFieldCallback :: WidgetClassTouchEventFieldCallback
-> m (GClosure C_WidgetClassTouchEventFieldCallback)
genClosure_WidgetClassTouchEventFieldCallback cb :: WidgetClassTouchEventFieldCallback
cb = IO (GClosure C_WidgetClassTouchEventFieldCallback)
-> m (GClosure C_WidgetClassTouchEventFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassTouchEventFieldCallback)
-> m (GClosure C_WidgetClassTouchEventFieldCallback))
-> IO (GClosure C_WidgetClassTouchEventFieldCallback)
-> m (GClosure C_WidgetClassTouchEventFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassTouchEventFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassTouchEventFieldCallback))
-> WidgetClassTouchEventFieldCallback
-> C_WidgetClassTouchEventFieldCallback
wrap_WidgetClassTouchEventFieldCallback Maybe (Ptr (FunPtr C_WidgetClassTouchEventFieldCallback))
forall a. Maybe a
Nothing WidgetClassTouchEventFieldCallback
cb
C_WidgetClassTouchEventFieldCallback
-> IO (FunPtr C_WidgetClassTouchEventFieldCallback)
mk_WidgetClassTouchEventFieldCallback C_WidgetClassTouchEventFieldCallback
cb' IO (FunPtr C_WidgetClassTouchEventFieldCallback)
-> (FunPtr C_WidgetClassTouchEventFieldCallback
-> IO (GClosure C_WidgetClassTouchEventFieldCallback))
-> IO (GClosure C_WidgetClassTouchEventFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassTouchEventFieldCallback
-> IO (GClosure C_WidgetClassTouchEventFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassTouchEventFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassTouchEventFieldCallback)) ->
WidgetClassTouchEventFieldCallback ->
C_WidgetClassTouchEventFieldCallback
wrap_WidgetClassTouchEventFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassTouchEventFieldCallback))
-> WidgetClassTouchEventFieldCallback
-> C_WidgetClassTouchEventFieldCallback
wrap_WidgetClassTouchEventFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassTouchEventFieldCallback))
funptrptr _cb :: WidgetClassTouchEventFieldCallback
_cb widget :: Ptr Widget
widget event :: Ptr EventTouch
event = 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
EventTouch
event' <- ((ManagedPtr EventTouch -> EventTouch)
-> Ptr EventTouch -> IO EventTouch
forall a.
(HasCallStack, WrappedPtr a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
newPtr ManagedPtr EventTouch -> EventTouch
Gdk.EventTouch.EventTouch) Ptr EventTouch
event
Bool
result <- WidgetClassTouchEventFieldCallback
_cb Widget
widget' EventTouch
event'
Maybe (Ptr (FunPtr C_WidgetClassTouchEventFieldCallback)) -> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassTouchEventFieldCallback))
funptrptr
let result' :: CInt
result' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
result
CInt -> IO CInt
forall (m :: * -> *) a. Monad m => a -> m a
return CInt
result'
type C_WidgetClassStyleUpdatedFieldCallback =
Ptr Gtk.Widget.Widget ->
IO ()
foreign import ccall "dynamic" __dynamic_C_WidgetClassStyleUpdatedFieldCallback :: FunPtr C_WidgetClassStyleUpdatedFieldCallback -> C_WidgetClassStyleUpdatedFieldCallback
dynamic_WidgetClassStyleUpdatedFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassStyleUpdatedFieldCallback
-> a
-> m ()
dynamic_WidgetClassStyleUpdatedFieldCallback :: FunPtr C_WidgetClassUnrealizeFieldCallback -> a -> m ()
dynamic_WidgetClassStyleUpdatedFieldCallback __funPtr :: FunPtr C_WidgetClassUnrealizeFieldCallback
__funPtr widget :: a
widget = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
(FunPtr C_WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
__dynamic_C_WidgetClassStyleUpdatedFieldCallback FunPtr C_WidgetClassUnrealizeFieldCallback
__funPtr) Ptr Widget
widget'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
foreign import ccall "wrapper"
mk_WidgetClassStyleUpdatedFieldCallback :: C_WidgetClassStyleUpdatedFieldCallback -> IO (FunPtr C_WidgetClassStyleUpdatedFieldCallback)
type WidgetClassStyleUpdatedFieldCallback =
Gtk.Widget.Widget
-> IO ()
noWidgetClassStyleUpdatedFieldCallback :: Maybe WidgetClassStyleUpdatedFieldCallback
noWidgetClassStyleUpdatedFieldCallback :: Maybe WidgetClassUnrealizeFieldCallback
noWidgetClassStyleUpdatedFieldCallback = Maybe WidgetClassUnrealizeFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassStyleUpdatedFieldCallback :: MonadIO m => WidgetClassStyleUpdatedFieldCallback -> m (GClosure C_WidgetClassStyleUpdatedFieldCallback)
genClosure_WidgetClassStyleUpdatedFieldCallback :: WidgetClassUnrealizeFieldCallback
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
genClosure_WidgetClassStyleUpdatedFieldCallback cb :: WidgetClassUnrealizeFieldCallback
cb = IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback))
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassUnrealizeFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
-> WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
wrap_WidgetClassStyleUpdatedFieldCallback Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
forall a. Maybe a
Nothing WidgetClassUnrealizeFieldCallback
cb
C_WidgetClassUnrealizeFieldCallback
-> IO (FunPtr C_WidgetClassUnrealizeFieldCallback)
mk_WidgetClassStyleUpdatedFieldCallback C_WidgetClassUnrealizeFieldCallback
cb' IO (FunPtr C_WidgetClassUnrealizeFieldCallback)
-> (FunPtr C_WidgetClassUnrealizeFieldCallback
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback))
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassUnrealizeFieldCallback
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassStyleUpdatedFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassStyleUpdatedFieldCallback)) ->
WidgetClassStyleUpdatedFieldCallback ->
C_WidgetClassStyleUpdatedFieldCallback
wrap_WidgetClassStyleUpdatedFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
-> WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
wrap_WidgetClassStyleUpdatedFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
funptrptr _cb :: WidgetClassUnrealizeFieldCallback
_cb widget :: Ptr Widget
widget = 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
WidgetClassUnrealizeFieldCallback
_cb Widget
widget'
Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback)) -> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
funptrptr
type C_WidgetClassStyleSetFieldCallback =
Ptr Gtk.Widget.Widget ->
Ptr Gtk.Style.Style ->
IO ()
foreign import ccall "dynamic" __dynamic_C_WidgetClassStyleSetFieldCallback :: FunPtr C_WidgetClassStyleSetFieldCallback -> C_WidgetClassStyleSetFieldCallback
dynamic_WidgetClassStyleSetFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a, Gtk.Style.IsStyle b) =>
FunPtr C_WidgetClassStyleSetFieldCallback
-> a
-> b
-> m ()
dynamic_WidgetClassStyleSetFieldCallback :: FunPtr C_WidgetClassStyleSetFieldCallback -> a -> b -> m ()
dynamic_WidgetClassStyleSetFieldCallback __funPtr :: FunPtr C_WidgetClassStyleSetFieldCallback
__funPtr widget :: a
widget previousStyle :: b
previousStyle = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
Ptr Style
previousStyle' <- b -> IO (Ptr Style)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
previousStyle
(FunPtr C_WidgetClassStyleSetFieldCallback
-> C_WidgetClassStyleSetFieldCallback
__dynamic_C_WidgetClassStyleSetFieldCallback FunPtr C_WidgetClassStyleSetFieldCallback
__funPtr) Ptr Widget
widget' Ptr Style
previousStyle'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
previousStyle
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
foreign import ccall "wrapper"
mk_WidgetClassStyleSetFieldCallback :: C_WidgetClassStyleSetFieldCallback -> IO (FunPtr C_WidgetClassStyleSetFieldCallback)
type WidgetClassStyleSetFieldCallback =
Gtk.Widget.Widget
-> Gtk.Style.Style
-> IO ()
noWidgetClassStyleSetFieldCallback :: Maybe WidgetClassStyleSetFieldCallback
noWidgetClassStyleSetFieldCallback :: Maybe WidgetClassStyleSetFieldCallback
noWidgetClassStyleSetFieldCallback = Maybe WidgetClassStyleSetFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassStyleSetFieldCallback :: MonadIO m => WidgetClassStyleSetFieldCallback -> m (GClosure C_WidgetClassStyleSetFieldCallback)
genClosure_WidgetClassStyleSetFieldCallback :: WidgetClassStyleSetFieldCallback
-> m (GClosure C_WidgetClassStyleSetFieldCallback)
genClosure_WidgetClassStyleSetFieldCallback cb :: WidgetClassStyleSetFieldCallback
cb = IO (GClosure C_WidgetClassStyleSetFieldCallback)
-> m (GClosure C_WidgetClassStyleSetFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassStyleSetFieldCallback)
-> m (GClosure C_WidgetClassStyleSetFieldCallback))
-> IO (GClosure C_WidgetClassStyleSetFieldCallback)
-> m (GClosure C_WidgetClassStyleSetFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassStyleSetFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassStyleSetFieldCallback))
-> WidgetClassStyleSetFieldCallback
-> C_WidgetClassStyleSetFieldCallback
wrap_WidgetClassStyleSetFieldCallback Maybe (Ptr (FunPtr C_WidgetClassStyleSetFieldCallback))
forall a. Maybe a
Nothing WidgetClassStyleSetFieldCallback
cb
C_WidgetClassStyleSetFieldCallback
-> IO (FunPtr C_WidgetClassStyleSetFieldCallback)
mk_WidgetClassStyleSetFieldCallback C_WidgetClassStyleSetFieldCallback
cb' IO (FunPtr C_WidgetClassStyleSetFieldCallback)
-> (FunPtr C_WidgetClassStyleSetFieldCallback
-> IO (GClosure C_WidgetClassStyleSetFieldCallback))
-> IO (GClosure C_WidgetClassStyleSetFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassStyleSetFieldCallback
-> IO (GClosure C_WidgetClassStyleSetFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassStyleSetFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassStyleSetFieldCallback)) ->
WidgetClassStyleSetFieldCallback ->
C_WidgetClassStyleSetFieldCallback
wrap_WidgetClassStyleSetFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassStyleSetFieldCallback))
-> WidgetClassStyleSetFieldCallback
-> C_WidgetClassStyleSetFieldCallback
wrap_WidgetClassStyleSetFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassStyleSetFieldCallback))
funptrptr _cb :: WidgetClassStyleSetFieldCallback
_cb widget :: Ptr Widget
widget previousStyle :: Ptr Style
previousStyle = 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
Style
previousStyle' <- ((ManagedPtr Style -> Style) -> Ptr Style -> IO Style
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Style -> Style
Gtk.Style.Style) Ptr Style
previousStyle
WidgetClassStyleSetFieldCallback
_cb Widget
widget' Style
previousStyle'
Maybe (Ptr (FunPtr C_WidgetClassStyleSetFieldCallback)) -> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassStyleSetFieldCallback))
funptrptr
type C_WidgetClassStateFlagsChangedFieldCallback =
Ptr Gtk.Widget.Widget ->
CUInt ->
IO ()
foreign import ccall "dynamic" __dynamic_C_WidgetClassStateFlagsChangedFieldCallback :: FunPtr C_WidgetClassStateFlagsChangedFieldCallback -> C_WidgetClassStateFlagsChangedFieldCallback
dynamic_WidgetClassStateFlagsChangedFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassStateFlagsChangedFieldCallback
-> a
-> [Gtk.Flags.StateFlags]
-> m ()
dynamic_WidgetClassStateFlagsChangedFieldCallback :: FunPtr C_WidgetClassStateFlagsChangedFieldCallback
-> a -> [StateFlags] -> m ()
dynamic_WidgetClassStateFlagsChangedFieldCallback __funPtr :: FunPtr C_WidgetClassStateFlagsChangedFieldCallback
__funPtr widget :: a
widget previousStateFlags :: [StateFlags]
previousStateFlags = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
let previousStateFlags' :: CUInt
previousStateFlags' = [StateFlags] -> CUInt
forall b a. (Num b, IsGFlag a) => [a] -> b
gflagsToWord [StateFlags]
previousStateFlags
(FunPtr C_WidgetClassStateFlagsChangedFieldCallback
-> C_WidgetClassStateFlagsChangedFieldCallback
__dynamic_C_WidgetClassStateFlagsChangedFieldCallback FunPtr C_WidgetClassStateFlagsChangedFieldCallback
__funPtr) Ptr Widget
widget' CUInt
previousStateFlags'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
foreign import ccall "wrapper"
mk_WidgetClassStateFlagsChangedFieldCallback :: C_WidgetClassStateFlagsChangedFieldCallback -> IO (FunPtr C_WidgetClassStateFlagsChangedFieldCallback)
type WidgetClassStateFlagsChangedFieldCallback =
Gtk.Widget.Widget
-> [Gtk.Flags.StateFlags]
-> IO ()
noWidgetClassStateFlagsChangedFieldCallback :: Maybe WidgetClassStateFlagsChangedFieldCallback
noWidgetClassStateFlagsChangedFieldCallback :: Maybe WidgetClassStateFlagsChangedFieldCallback
noWidgetClassStateFlagsChangedFieldCallback = Maybe WidgetClassStateFlagsChangedFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassStateFlagsChangedFieldCallback :: MonadIO m => WidgetClassStateFlagsChangedFieldCallback -> m (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
genClosure_WidgetClassStateFlagsChangedFieldCallback :: WidgetClassStateFlagsChangedFieldCallback
-> m (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
genClosure_WidgetClassStateFlagsChangedFieldCallback cb :: WidgetClassStateFlagsChangedFieldCallback
cb = IO (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
-> m (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
-> m (GClosure C_WidgetClassStateFlagsChangedFieldCallback))
-> IO (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
-> m (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassStateFlagsChangedFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassStateFlagsChangedFieldCallback))
-> WidgetClassStateFlagsChangedFieldCallback
-> C_WidgetClassStateFlagsChangedFieldCallback
wrap_WidgetClassStateFlagsChangedFieldCallback Maybe (Ptr (FunPtr C_WidgetClassStateFlagsChangedFieldCallback))
forall a. Maybe a
Nothing WidgetClassStateFlagsChangedFieldCallback
cb
C_WidgetClassStateFlagsChangedFieldCallback
-> IO (FunPtr C_WidgetClassStateFlagsChangedFieldCallback)
mk_WidgetClassStateFlagsChangedFieldCallback C_WidgetClassStateFlagsChangedFieldCallback
cb' IO (FunPtr C_WidgetClassStateFlagsChangedFieldCallback)
-> (FunPtr C_WidgetClassStateFlagsChangedFieldCallback
-> IO (GClosure C_WidgetClassStateFlagsChangedFieldCallback))
-> IO (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassStateFlagsChangedFieldCallback
-> IO (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassStateFlagsChangedFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassStateFlagsChangedFieldCallback)) ->
WidgetClassStateFlagsChangedFieldCallback ->
C_WidgetClassStateFlagsChangedFieldCallback
wrap_WidgetClassStateFlagsChangedFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassStateFlagsChangedFieldCallback))
-> WidgetClassStateFlagsChangedFieldCallback
-> C_WidgetClassStateFlagsChangedFieldCallback
wrap_WidgetClassStateFlagsChangedFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassStateFlagsChangedFieldCallback))
funptrptr _cb :: WidgetClassStateFlagsChangedFieldCallback
_cb widget :: Ptr Widget
widget previousStateFlags :: CUInt
previousStateFlags = 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
let previousStateFlags' :: [StateFlags]
previousStateFlags' = CUInt -> [StateFlags]
forall a b. (Storable a, Integral a, Bits a, IsGFlag b) => a -> [b]
wordToGFlags CUInt
previousStateFlags
WidgetClassStateFlagsChangedFieldCallback
_cb Widget
widget' [StateFlags]
previousStateFlags'
Maybe (Ptr (FunPtr C_WidgetClassStateFlagsChangedFieldCallback))
-> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassStateFlagsChangedFieldCallback))
funptrptr
type C_WidgetClassStateChangedFieldCallback =
Ptr Gtk.Widget.Widget ->
CUInt ->
IO ()
foreign import ccall "dynamic" __dynamic_C_WidgetClassStateChangedFieldCallback :: FunPtr C_WidgetClassStateChangedFieldCallback -> C_WidgetClassStateChangedFieldCallback
dynamic_WidgetClassStateChangedFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassStateChangedFieldCallback
-> a
-> Gtk.Enums.StateType
-> m ()
dynamic_WidgetClassStateChangedFieldCallback :: FunPtr C_WidgetClassStateFlagsChangedFieldCallback
-> a -> StateType -> m ()
dynamic_WidgetClassStateChangedFieldCallback __funPtr :: FunPtr C_WidgetClassStateFlagsChangedFieldCallback
__funPtr widget :: a
widget previousState :: StateType
previousState = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
let previousState' :: CUInt
previousState' = (Int -> CUInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CUInt) -> (StateType -> Int) -> StateType -> CUInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. StateType -> Int
forall a. Enum a => a -> Int
fromEnum) StateType
previousState
(FunPtr C_WidgetClassStateFlagsChangedFieldCallback
-> C_WidgetClassStateFlagsChangedFieldCallback
__dynamic_C_WidgetClassStateChangedFieldCallback FunPtr C_WidgetClassStateFlagsChangedFieldCallback
__funPtr) Ptr Widget
widget' CUInt
previousState'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
foreign import ccall "wrapper"
mk_WidgetClassStateChangedFieldCallback :: C_WidgetClassStateChangedFieldCallback -> IO (FunPtr C_WidgetClassStateChangedFieldCallback)
type WidgetClassStateChangedFieldCallback =
Gtk.Widget.Widget
-> Gtk.Enums.StateType
-> IO ()
noWidgetClassStateChangedFieldCallback :: Maybe WidgetClassStateChangedFieldCallback
noWidgetClassStateChangedFieldCallback :: Maybe WidgetClassStateChangedFieldCallback
noWidgetClassStateChangedFieldCallback = Maybe WidgetClassStateChangedFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassStateChangedFieldCallback :: MonadIO m => WidgetClassStateChangedFieldCallback -> m (GClosure C_WidgetClassStateChangedFieldCallback)
genClosure_WidgetClassStateChangedFieldCallback :: WidgetClassStateChangedFieldCallback
-> m (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
genClosure_WidgetClassStateChangedFieldCallback cb :: WidgetClassStateChangedFieldCallback
cb = IO (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
-> m (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
-> m (GClosure C_WidgetClassStateFlagsChangedFieldCallback))
-> IO (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
-> m (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassStateFlagsChangedFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassStateFlagsChangedFieldCallback))
-> WidgetClassStateChangedFieldCallback
-> C_WidgetClassStateFlagsChangedFieldCallback
wrap_WidgetClassStateChangedFieldCallback Maybe (Ptr (FunPtr C_WidgetClassStateFlagsChangedFieldCallback))
forall a. Maybe a
Nothing WidgetClassStateChangedFieldCallback
cb
C_WidgetClassStateFlagsChangedFieldCallback
-> IO (FunPtr C_WidgetClassStateFlagsChangedFieldCallback)
mk_WidgetClassStateChangedFieldCallback C_WidgetClassStateFlagsChangedFieldCallback
cb' IO (FunPtr C_WidgetClassStateFlagsChangedFieldCallback)
-> (FunPtr C_WidgetClassStateFlagsChangedFieldCallback
-> IO (GClosure C_WidgetClassStateFlagsChangedFieldCallback))
-> IO (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassStateFlagsChangedFieldCallback
-> IO (GClosure C_WidgetClassStateFlagsChangedFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassStateChangedFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassStateChangedFieldCallback)) ->
WidgetClassStateChangedFieldCallback ->
C_WidgetClassStateChangedFieldCallback
wrap_WidgetClassStateChangedFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassStateFlagsChangedFieldCallback))
-> WidgetClassStateChangedFieldCallback
-> C_WidgetClassStateFlagsChangedFieldCallback
wrap_WidgetClassStateChangedFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassStateFlagsChangedFieldCallback))
funptrptr _cb :: WidgetClassStateChangedFieldCallback
_cb widget :: Ptr Widget
widget previousState :: CUInt
previousState = 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
let previousState' :: StateType
previousState' = (Int -> StateType
forall a. Enum a => Int -> a
toEnum (Int -> StateType) -> (CUInt -> Int) -> CUInt -> StateType
forall b c a. (b -> c) -> (a -> b) -> a -> c
. CUInt -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral) CUInt
previousState
WidgetClassStateChangedFieldCallback
_cb Widget
widget' StateType
previousState'
Maybe (Ptr (FunPtr C_WidgetClassStateFlagsChangedFieldCallback))
-> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassStateFlagsChangedFieldCallback))
funptrptr
type C_WidgetClassSizeAllocateFieldCallback =
Ptr Gtk.Widget.Widget ->
Ptr Gdk.Rectangle.Rectangle ->
IO ()
foreign import ccall "dynamic" __dynamic_C_WidgetClassSizeAllocateFieldCallback :: FunPtr C_WidgetClassSizeAllocateFieldCallback -> C_WidgetClassSizeAllocateFieldCallback
dynamic_WidgetClassSizeAllocateFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassSizeAllocateFieldCallback
-> a
-> Gdk.Rectangle.Rectangle
-> m ()
dynamic_WidgetClassSizeAllocateFieldCallback :: FunPtr C_WidgetClassSizeAllocateFieldCallback
-> a -> Rectangle -> m ()
dynamic_WidgetClassSizeAllocateFieldCallback __funPtr :: FunPtr C_WidgetClassSizeAllocateFieldCallback
__funPtr widget :: a
widget allocation :: Rectangle
allocation = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
Ptr Rectangle
allocation' <- Rectangle -> IO (Ptr Rectangle)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr Rectangle
allocation
(FunPtr C_WidgetClassSizeAllocateFieldCallback
-> C_WidgetClassSizeAllocateFieldCallback
__dynamic_C_WidgetClassSizeAllocateFieldCallback FunPtr C_WidgetClassSizeAllocateFieldCallback
__funPtr) Ptr Widget
widget' Ptr Rectangle
allocation'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
Rectangle -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr Rectangle
allocation
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
foreign import ccall "wrapper"
mk_WidgetClassSizeAllocateFieldCallback :: C_WidgetClassSizeAllocateFieldCallback -> IO (FunPtr C_WidgetClassSizeAllocateFieldCallback)
type WidgetClassSizeAllocateFieldCallback =
Gtk.Widget.Widget
-> Gdk.Rectangle.Rectangle
-> IO ()
noWidgetClassSizeAllocateFieldCallback :: Maybe WidgetClassSizeAllocateFieldCallback
noWidgetClassSizeAllocateFieldCallback :: Maybe WidgetClassSizeAllocateFieldCallback
noWidgetClassSizeAllocateFieldCallback = Maybe WidgetClassSizeAllocateFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassSizeAllocateFieldCallback :: MonadIO m => WidgetClassSizeAllocateFieldCallback -> m (GClosure C_WidgetClassSizeAllocateFieldCallback)
genClosure_WidgetClassSizeAllocateFieldCallback :: WidgetClassSizeAllocateFieldCallback
-> m (GClosure C_WidgetClassSizeAllocateFieldCallback)
genClosure_WidgetClassSizeAllocateFieldCallback cb :: WidgetClassSizeAllocateFieldCallback
cb = IO (GClosure C_WidgetClassSizeAllocateFieldCallback)
-> m (GClosure C_WidgetClassSizeAllocateFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassSizeAllocateFieldCallback)
-> m (GClosure C_WidgetClassSizeAllocateFieldCallback))
-> IO (GClosure C_WidgetClassSizeAllocateFieldCallback)
-> m (GClosure C_WidgetClassSizeAllocateFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassSizeAllocateFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassSizeAllocateFieldCallback))
-> WidgetClassSizeAllocateFieldCallback
-> C_WidgetClassSizeAllocateFieldCallback
wrap_WidgetClassSizeAllocateFieldCallback Maybe (Ptr (FunPtr C_WidgetClassSizeAllocateFieldCallback))
forall a. Maybe a
Nothing WidgetClassSizeAllocateFieldCallback
cb
C_WidgetClassSizeAllocateFieldCallback
-> IO (FunPtr C_WidgetClassSizeAllocateFieldCallback)
mk_WidgetClassSizeAllocateFieldCallback C_WidgetClassSizeAllocateFieldCallback
cb' IO (FunPtr C_WidgetClassSizeAllocateFieldCallback)
-> (FunPtr C_WidgetClassSizeAllocateFieldCallback
-> IO (GClosure C_WidgetClassSizeAllocateFieldCallback))
-> IO (GClosure C_WidgetClassSizeAllocateFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassSizeAllocateFieldCallback
-> IO (GClosure C_WidgetClassSizeAllocateFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassSizeAllocateFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassSizeAllocateFieldCallback)) ->
WidgetClassSizeAllocateFieldCallback ->
C_WidgetClassSizeAllocateFieldCallback
wrap_WidgetClassSizeAllocateFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassSizeAllocateFieldCallback))
-> WidgetClassSizeAllocateFieldCallback
-> C_WidgetClassSizeAllocateFieldCallback
wrap_WidgetClassSizeAllocateFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassSizeAllocateFieldCallback))
funptrptr _cb :: WidgetClassSizeAllocateFieldCallback
_cb widget :: Ptr Widget
widget allocation :: Ptr Rectangle
allocation = 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
(ManagedPtr Rectangle -> Rectangle)
-> Ptr Rectangle -> (Rectangle -> IO ()) -> IO ()
forall a b.
(HasCallStack, ManagedPtrNewtype a) =>
(ManagedPtr a -> a) -> Ptr a -> (a -> IO b) -> IO b
B.ManagedPtr.withTransient ManagedPtr Rectangle -> Rectangle
Gdk.Rectangle.Rectangle Ptr Rectangle
allocation ((Rectangle -> IO ()) -> IO ()) -> (Rectangle -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \allocation' :: Rectangle
allocation' -> do
WidgetClassSizeAllocateFieldCallback
_cb Widget
widget' Rectangle
allocation'
Maybe (Ptr (FunPtr C_WidgetClassSizeAllocateFieldCallback))
-> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassSizeAllocateFieldCallback))
funptrptr
type C_WidgetClassShowHelpFieldCallback =
Ptr Gtk.Widget.Widget ->
CUInt ->
IO CInt
foreign import ccall "dynamic" __dynamic_C_WidgetClassShowHelpFieldCallback :: FunPtr C_WidgetClassShowHelpFieldCallback -> C_WidgetClassShowHelpFieldCallback
dynamic_WidgetClassShowHelpFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassShowHelpFieldCallback
-> a
-> Gtk.Enums.WidgetHelpType
-> m Bool
dynamic_WidgetClassShowHelpFieldCallback :: FunPtr C_WidgetClassShowHelpFieldCallback
-> a -> WidgetHelpType -> m Bool
dynamic_WidgetClassShowHelpFieldCallback __funPtr :: FunPtr C_WidgetClassShowHelpFieldCallback
__funPtr widget :: a
widget helpType :: WidgetHelpType
helpType = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
let helpType' :: CUInt
helpType' = (Int -> CUInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CUInt)
-> (WidgetHelpType -> Int) -> WidgetHelpType -> CUInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. WidgetHelpType -> Int
forall a. Enum a => a -> Int
fromEnum) WidgetHelpType
helpType
CInt
result <- (FunPtr C_WidgetClassShowHelpFieldCallback
-> C_WidgetClassShowHelpFieldCallback
__dynamic_C_WidgetClassShowHelpFieldCallback FunPtr C_WidgetClassShowHelpFieldCallback
__funPtr) Ptr Widget
widget' CUInt
helpType'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= 0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
foreign import ccall "wrapper"
mk_WidgetClassShowHelpFieldCallback :: C_WidgetClassShowHelpFieldCallback -> IO (FunPtr C_WidgetClassShowHelpFieldCallback)
type WidgetClassShowHelpFieldCallback =
Gtk.Widget.Widget
-> Gtk.Enums.WidgetHelpType
-> IO Bool
noWidgetClassShowHelpFieldCallback :: Maybe WidgetClassShowHelpFieldCallback
noWidgetClassShowHelpFieldCallback :: Maybe WidgetClassShowHelpFieldCallback
noWidgetClassShowHelpFieldCallback = Maybe WidgetClassShowHelpFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassShowHelpFieldCallback :: MonadIO m => WidgetClassShowHelpFieldCallback -> m (GClosure C_WidgetClassShowHelpFieldCallback)
genClosure_WidgetClassShowHelpFieldCallback :: WidgetClassShowHelpFieldCallback
-> m (GClosure C_WidgetClassShowHelpFieldCallback)
genClosure_WidgetClassShowHelpFieldCallback cb :: WidgetClassShowHelpFieldCallback
cb = IO (GClosure C_WidgetClassShowHelpFieldCallback)
-> m (GClosure C_WidgetClassShowHelpFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassShowHelpFieldCallback)
-> m (GClosure C_WidgetClassShowHelpFieldCallback))
-> IO (GClosure C_WidgetClassShowHelpFieldCallback)
-> m (GClosure C_WidgetClassShowHelpFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassShowHelpFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassShowHelpFieldCallback))
-> WidgetClassShowHelpFieldCallback
-> C_WidgetClassShowHelpFieldCallback
wrap_WidgetClassShowHelpFieldCallback Maybe (Ptr (FunPtr C_WidgetClassShowHelpFieldCallback))
forall a. Maybe a
Nothing WidgetClassShowHelpFieldCallback
cb
C_WidgetClassShowHelpFieldCallback
-> IO (FunPtr C_WidgetClassShowHelpFieldCallback)
mk_WidgetClassShowHelpFieldCallback C_WidgetClassShowHelpFieldCallback
cb' IO (FunPtr C_WidgetClassShowHelpFieldCallback)
-> (FunPtr C_WidgetClassShowHelpFieldCallback
-> IO (GClosure C_WidgetClassShowHelpFieldCallback))
-> IO (GClosure C_WidgetClassShowHelpFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassShowHelpFieldCallback
-> IO (GClosure C_WidgetClassShowHelpFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassShowHelpFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassShowHelpFieldCallback)) ->
WidgetClassShowHelpFieldCallback ->
C_WidgetClassShowHelpFieldCallback
wrap_WidgetClassShowHelpFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassShowHelpFieldCallback))
-> WidgetClassShowHelpFieldCallback
-> C_WidgetClassShowHelpFieldCallback
wrap_WidgetClassShowHelpFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassShowHelpFieldCallback))
funptrptr _cb :: WidgetClassShowHelpFieldCallback
_cb widget :: Ptr Widget
widget helpType :: CUInt
helpType = 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
let helpType' :: WidgetHelpType
helpType' = (Int -> WidgetHelpType
forall a. Enum a => Int -> a
toEnum (Int -> WidgetHelpType)
-> (CUInt -> Int) -> CUInt -> WidgetHelpType
forall b c a. (b -> c) -> (a -> b) -> a -> c
. CUInt -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral) CUInt
helpType
Bool
result <- WidgetClassShowHelpFieldCallback
_cb Widget
widget' WidgetHelpType
helpType'
Maybe (Ptr (FunPtr C_WidgetClassShowHelpFieldCallback)) -> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassShowHelpFieldCallback))
funptrptr
let result' :: CInt
result' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
result
CInt -> IO CInt
forall (m :: * -> *) a. Monad m => a -> m a
return CInt
result'
type C_WidgetClassShowFieldCallback =
Ptr Gtk.Widget.Widget ->
IO ()
foreign import ccall "dynamic" __dynamic_C_WidgetClassShowFieldCallback :: FunPtr C_WidgetClassShowFieldCallback -> C_WidgetClassShowFieldCallback
dynamic_WidgetClassShowFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassShowFieldCallback
-> a
-> m ()
dynamic_WidgetClassShowFieldCallback :: FunPtr C_WidgetClassUnrealizeFieldCallback -> a -> m ()
dynamic_WidgetClassShowFieldCallback __funPtr :: FunPtr C_WidgetClassUnrealizeFieldCallback
__funPtr widget :: a
widget = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
(FunPtr C_WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
__dynamic_C_WidgetClassShowFieldCallback FunPtr C_WidgetClassUnrealizeFieldCallback
__funPtr) Ptr Widget
widget'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
foreign import ccall "wrapper"
mk_WidgetClassShowFieldCallback :: C_WidgetClassShowFieldCallback -> IO (FunPtr C_WidgetClassShowFieldCallback)
type WidgetClassShowFieldCallback =
Gtk.Widget.Widget
-> IO ()
noWidgetClassShowFieldCallback :: Maybe WidgetClassShowFieldCallback
noWidgetClassShowFieldCallback :: Maybe WidgetClassUnrealizeFieldCallback
noWidgetClassShowFieldCallback = Maybe WidgetClassUnrealizeFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassShowFieldCallback :: MonadIO m => WidgetClassShowFieldCallback -> m (GClosure C_WidgetClassShowFieldCallback)
genClosure_WidgetClassShowFieldCallback :: WidgetClassUnrealizeFieldCallback
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
genClosure_WidgetClassShowFieldCallback cb :: WidgetClassUnrealizeFieldCallback
cb = IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback))
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassUnrealizeFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
-> WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
wrap_WidgetClassShowFieldCallback Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
forall a. Maybe a
Nothing WidgetClassUnrealizeFieldCallback
cb
C_WidgetClassUnrealizeFieldCallback
-> IO (FunPtr C_WidgetClassUnrealizeFieldCallback)
mk_WidgetClassShowFieldCallback C_WidgetClassUnrealizeFieldCallback
cb' IO (FunPtr C_WidgetClassUnrealizeFieldCallback)
-> (FunPtr C_WidgetClassUnrealizeFieldCallback
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback))
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassUnrealizeFieldCallback
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassShowFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassShowFieldCallback)) ->
WidgetClassShowFieldCallback ->
C_WidgetClassShowFieldCallback
wrap_WidgetClassShowFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
-> WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
wrap_WidgetClassShowFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
funptrptr _cb :: WidgetClassUnrealizeFieldCallback
_cb widget :: Ptr Widget
widget = 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
WidgetClassUnrealizeFieldCallback
_cb Widget
widget'
Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback)) -> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
funptrptr
type C_WidgetClassShowAllFieldCallback =
Ptr Gtk.Widget.Widget ->
IO ()
foreign import ccall "dynamic" __dynamic_C_WidgetClassShowAllFieldCallback :: FunPtr C_WidgetClassShowAllFieldCallback -> C_WidgetClassShowAllFieldCallback
dynamic_WidgetClassShowAllFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassShowAllFieldCallback
-> a
-> m ()
dynamic_WidgetClassShowAllFieldCallback :: FunPtr C_WidgetClassUnrealizeFieldCallback -> a -> m ()
dynamic_WidgetClassShowAllFieldCallback __funPtr :: FunPtr C_WidgetClassUnrealizeFieldCallback
__funPtr widget :: a
widget = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
(FunPtr C_WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
__dynamic_C_WidgetClassShowAllFieldCallback FunPtr C_WidgetClassUnrealizeFieldCallback
__funPtr) Ptr Widget
widget'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
foreign import ccall "wrapper"
mk_WidgetClassShowAllFieldCallback :: C_WidgetClassShowAllFieldCallback -> IO (FunPtr C_WidgetClassShowAllFieldCallback)
type WidgetClassShowAllFieldCallback =
Gtk.Widget.Widget
-> IO ()
noWidgetClassShowAllFieldCallback :: Maybe WidgetClassShowAllFieldCallback
noWidgetClassShowAllFieldCallback :: Maybe WidgetClassUnrealizeFieldCallback
noWidgetClassShowAllFieldCallback = Maybe WidgetClassUnrealizeFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassShowAllFieldCallback :: MonadIO m => WidgetClassShowAllFieldCallback -> m (GClosure C_WidgetClassShowAllFieldCallback)
genClosure_WidgetClassShowAllFieldCallback :: WidgetClassUnrealizeFieldCallback
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
genClosure_WidgetClassShowAllFieldCallback cb :: WidgetClassUnrealizeFieldCallback
cb = IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback))
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
-> m (GClosure C_WidgetClassUnrealizeFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassUnrealizeFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
-> WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
wrap_WidgetClassShowAllFieldCallback Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
forall a. Maybe a
Nothing WidgetClassUnrealizeFieldCallback
cb
C_WidgetClassUnrealizeFieldCallback
-> IO (FunPtr C_WidgetClassUnrealizeFieldCallback)
mk_WidgetClassShowAllFieldCallback C_WidgetClassUnrealizeFieldCallback
cb' IO (FunPtr C_WidgetClassUnrealizeFieldCallback)
-> (FunPtr C_WidgetClassUnrealizeFieldCallback
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback))
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassUnrealizeFieldCallback
-> IO (GClosure C_WidgetClassUnrealizeFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassShowAllFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassShowAllFieldCallback)) ->
WidgetClassShowAllFieldCallback ->
C_WidgetClassShowAllFieldCallback
wrap_WidgetClassShowAllFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
-> WidgetClassUnrealizeFieldCallback
-> C_WidgetClassUnrealizeFieldCallback
wrap_WidgetClassShowAllFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
funptrptr _cb :: WidgetClassUnrealizeFieldCallback
_cb widget :: Ptr Widget
widget = 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
WidgetClassUnrealizeFieldCallback
_cb Widget
widget'
Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback)) -> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassUnrealizeFieldCallback))
funptrptr
type C_WidgetClassSelectionRequestEventFieldCallback =
Ptr Gtk.Widget.Widget ->
Ptr Gdk.EventSelection.EventSelection ->
IO CInt
foreign import ccall "dynamic" __dynamic_C_WidgetClassSelectionRequestEventFieldCallback :: FunPtr C_WidgetClassSelectionRequestEventFieldCallback -> C_WidgetClassSelectionRequestEventFieldCallback
dynamic_WidgetClassSelectionRequestEventFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassSelectionRequestEventFieldCallback
-> a
-> Gdk.EventSelection.EventSelection
-> m Bool
dynamic_WidgetClassSelectionRequestEventFieldCallback :: FunPtr C_WidgetClassSelectionRequestEventFieldCallback
-> a -> EventSelection -> m Bool
dynamic_WidgetClassSelectionRequestEventFieldCallback __funPtr :: FunPtr C_WidgetClassSelectionRequestEventFieldCallback
__funPtr widget :: a
widget event :: EventSelection
event = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
Ptr EventSelection
event' <- EventSelection -> IO (Ptr EventSelection)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr EventSelection
event
CInt
result <- (FunPtr C_WidgetClassSelectionRequestEventFieldCallback
-> C_WidgetClassSelectionRequestEventFieldCallback
__dynamic_C_WidgetClassSelectionRequestEventFieldCallback FunPtr C_WidgetClassSelectionRequestEventFieldCallback
__funPtr) Ptr Widget
widget' Ptr EventSelection
event'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= 0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
EventSelection -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr EventSelection
event
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
foreign import ccall "wrapper"
mk_WidgetClassSelectionRequestEventFieldCallback :: C_WidgetClassSelectionRequestEventFieldCallback -> IO (FunPtr C_WidgetClassSelectionRequestEventFieldCallback)
type WidgetClassSelectionRequestEventFieldCallback =
Gtk.Widget.Widget
-> Gdk.EventSelection.EventSelection
-> IO Bool
noWidgetClassSelectionRequestEventFieldCallback :: Maybe WidgetClassSelectionRequestEventFieldCallback
noWidgetClassSelectionRequestEventFieldCallback :: Maybe WidgetClassSelectionRequestEventFieldCallback
noWidgetClassSelectionRequestEventFieldCallback = Maybe WidgetClassSelectionRequestEventFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassSelectionRequestEventFieldCallback :: MonadIO m => WidgetClassSelectionRequestEventFieldCallback -> m (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
genClosure_WidgetClassSelectionRequestEventFieldCallback :: WidgetClassSelectionRequestEventFieldCallback
-> m (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
genClosure_WidgetClassSelectionRequestEventFieldCallback cb :: WidgetClassSelectionRequestEventFieldCallback
cb = IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
-> m (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
-> m (GClosure C_WidgetClassSelectionRequestEventFieldCallback))
-> IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
-> m (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassSelectionRequestEventFieldCallback
cb' = Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
-> WidgetClassSelectionRequestEventFieldCallback
-> C_WidgetClassSelectionRequestEventFieldCallback
wrap_WidgetClassSelectionRequestEventFieldCallback Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
forall a. Maybe a
Nothing WidgetClassSelectionRequestEventFieldCallback
cb
C_WidgetClassSelectionRequestEventFieldCallback
-> IO (FunPtr C_WidgetClassSelectionRequestEventFieldCallback)
mk_WidgetClassSelectionRequestEventFieldCallback C_WidgetClassSelectionRequestEventFieldCallback
cb' IO (FunPtr C_WidgetClassSelectionRequestEventFieldCallback)
-> (FunPtr C_WidgetClassSelectionRequestEventFieldCallback
-> IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback))
-> IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassSelectionRequestEventFieldCallback
-> IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassSelectionRequestEventFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback)) ->
WidgetClassSelectionRequestEventFieldCallback ->
C_WidgetClassSelectionRequestEventFieldCallback
wrap_WidgetClassSelectionRequestEventFieldCallback :: Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
-> WidgetClassSelectionRequestEventFieldCallback
-> C_WidgetClassSelectionRequestEventFieldCallback
wrap_WidgetClassSelectionRequestEventFieldCallback funptrptr :: Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
funptrptr _cb :: WidgetClassSelectionRequestEventFieldCallback
_cb widget :: Ptr Widget
widget event :: Ptr EventSelection
event = 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
EventSelection
event' <- ((ManagedPtr EventSelection -> EventSelection)
-> Ptr EventSelection -> IO EventSelection
forall a.
(HasCallStack, WrappedPtr a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
newPtr ManagedPtr EventSelection -> EventSelection
Gdk.EventSelection.EventSelection) Ptr EventSelection
event
Bool
result <- WidgetClassSelectionRequestEventFieldCallback
_cb Widget
widget' EventSelection
event'
Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
-> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
funptrptr
let result' :: CInt
result' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
result
CInt -> IO CInt
forall (m :: * -> *) a. Monad m => a -> m a
return CInt
result'
type C_WidgetClassSelectionReceivedFieldCallback =
Ptr Gtk.Widget.Widget ->
Ptr Gtk.SelectionData.SelectionData ->
Word32 ->
IO ()
foreign import ccall "dynamic" __dynamic_C_WidgetClassSelectionReceivedFieldCallback :: FunPtr C_WidgetClassSelectionReceivedFieldCallback -> C_WidgetClassSelectionReceivedFieldCallback
dynamic_WidgetClassSelectionReceivedFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassSelectionReceivedFieldCallback
-> a
-> Gtk.SelectionData.SelectionData
-> Word32
-> m ()
dynamic_WidgetClassSelectionReceivedFieldCallback :: FunPtr C_WidgetClassSelectionReceivedFieldCallback
-> a -> SelectionData -> Word32 -> m ()
dynamic_WidgetClassSelectionReceivedFieldCallback __funPtr :: FunPtr C_WidgetClassSelectionReceivedFieldCallback
__funPtr widget :: a
widget selectionData :: SelectionData
selectionData time_ :: Word32
time_ = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
Ptr SelectionData
selectionData' <- SelectionData -> IO (Ptr SelectionData)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr SelectionData
selectionData
(FunPtr C_WidgetClassSelectionReceivedFieldCallback
-> C_WidgetClassSelectionReceivedFieldCallback
__dynamic_C_WidgetClassSelectionReceivedFieldCallback FunPtr C_WidgetClassSelectionReceivedFieldCallback
__funPtr) Ptr Widget
widget' Ptr SelectionData
selectionData' Word32
time_
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
SelectionData -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr SelectionData
selectionData
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
foreign import ccall "wrapper"
mk_WidgetClassSelectionReceivedFieldCallback :: C_WidgetClassSelectionReceivedFieldCallback -> IO (FunPtr C_WidgetClassSelectionReceivedFieldCallback)
type WidgetClassSelectionReceivedFieldCallback =
Gtk.Widget.Widget
-> Gtk.SelectionData.SelectionData
-> Word32
-> IO ()
noWidgetClassSelectionReceivedFieldCallback :: Maybe WidgetClassSelectionReceivedFieldCallback
noWidgetClassSelectionReceivedFieldCallback :: Maybe WidgetClassSelectionReceivedFieldCallback
noWidgetClassSelectionReceivedFieldCallback = Maybe WidgetClassSelectionReceivedFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassSelectionReceivedFieldCallback :: MonadIO m => WidgetClassSelectionReceivedFieldCallback -> m (GClosure C_WidgetClassSelectionReceivedFieldCallback)
genClosure_WidgetClassSelectionReceivedFieldCallback :: WidgetClassSelectionReceivedFieldCallback
-> m (GClosure C_WidgetClassSelectionReceivedFieldCallback)
genClosure_WidgetClassSelectionReceivedFieldCallback cb :: WidgetClassSelectionReceivedFieldCallback
cb = IO (GClosure C_WidgetClassSelectionReceivedFieldCallback)
-> m (GClosure C_WidgetClassSelectionReceivedFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassSelectionReceivedFieldCallback)
-> m (GClosure C_WidgetClassSelectionReceivedFieldCallback))
-> IO (GClosure C_WidgetClassSelectionReceivedFieldCallback)
-> m (GClosure C_WidgetClassSelectionReceivedFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassSelectionReceivedFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassSelectionReceivedFieldCallback))
-> WidgetClassSelectionReceivedFieldCallback
-> C_WidgetClassSelectionReceivedFieldCallback
wrap_WidgetClassSelectionReceivedFieldCallback Maybe (Ptr (FunPtr C_WidgetClassSelectionReceivedFieldCallback))
forall a. Maybe a
Nothing WidgetClassSelectionReceivedFieldCallback
cb
C_WidgetClassSelectionReceivedFieldCallback
-> IO (FunPtr C_WidgetClassSelectionReceivedFieldCallback)
mk_WidgetClassSelectionReceivedFieldCallback C_WidgetClassSelectionReceivedFieldCallback
cb' IO (FunPtr C_WidgetClassSelectionReceivedFieldCallback)
-> (FunPtr C_WidgetClassSelectionReceivedFieldCallback
-> IO (GClosure C_WidgetClassSelectionReceivedFieldCallback))
-> IO (GClosure C_WidgetClassSelectionReceivedFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassSelectionReceivedFieldCallback
-> IO (GClosure C_WidgetClassSelectionReceivedFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassSelectionReceivedFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassSelectionReceivedFieldCallback)) ->
WidgetClassSelectionReceivedFieldCallback ->
C_WidgetClassSelectionReceivedFieldCallback
wrap_WidgetClassSelectionReceivedFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassSelectionReceivedFieldCallback))
-> WidgetClassSelectionReceivedFieldCallback
-> C_WidgetClassSelectionReceivedFieldCallback
wrap_WidgetClassSelectionReceivedFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassSelectionReceivedFieldCallback))
funptrptr _cb :: WidgetClassSelectionReceivedFieldCallback
_cb widget :: Ptr Widget
widget selectionData :: Ptr SelectionData
selectionData time_ :: Word32
time_ = 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
(ManagedPtr SelectionData -> SelectionData)
-> Ptr SelectionData -> (SelectionData -> IO ()) -> IO ()
forall a b.
(HasCallStack, ManagedPtrNewtype a) =>
(ManagedPtr a -> a) -> Ptr a -> (a -> IO b) -> IO b
B.ManagedPtr.withTransient ManagedPtr SelectionData -> SelectionData
Gtk.SelectionData.SelectionData Ptr SelectionData
selectionData ((SelectionData -> IO ()) -> IO ())
-> (SelectionData -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \selectionData' :: SelectionData
selectionData' -> do
WidgetClassSelectionReceivedFieldCallback
_cb Widget
widget' SelectionData
selectionData' Word32
time_
Maybe (Ptr (FunPtr C_WidgetClassSelectionReceivedFieldCallback))
-> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassSelectionReceivedFieldCallback))
funptrptr
type C_WidgetClassSelectionNotifyEventFieldCallback =
Ptr Gtk.Widget.Widget ->
Ptr Gdk.EventSelection.EventSelection ->
IO CInt
foreign import ccall "dynamic" __dynamic_C_WidgetClassSelectionNotifyEventFieldCallback :: FunPtr C_WidgetClassSelectionNotifyEventFieldCallback -> C_WidgetClassSelectionNotifyEventFieldCallback
dynamic_WidgetClassSelectionNotifyEventFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassSelectionNotifyEventFieldCallback
-> a
-> Gdk.EventSelection.EventSelection
-> m Bool
dynamic_WidgetClassSelectionNotifyEventFieldCallback :: FunPtr C_WidgetClassSelectionRequestEventFieldCallback
-> a -> EventSelection -> m Bool
dynamic_WidgetClassSelectionNotifyEventFieldCallback __funPtr :: FunPtr C_WidgetClassSelectionRequestEventFieldCallback
__funPtr widget :: a
widget event :: EventSelection
event = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
Ptr EventSelection
event' <- EventSelection -> IO (Ptr EventSelection)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr EventSelection
event
CInt
result <- (FunPtr C_WidgetClassSelectionRequestEventFieldCallback
-> C_WidgetClassSelectionRequestEventFieldCallback
__dynamic_C_WidgetClassSelectionNotifyEventFieldCallback FunPtr C_WidgetClassSelectionRequestEventFieldCallback
__funPtr) Ptr Widget
widget' Ptr EventSelection
event'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= 0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
EventSelection -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr EventSelection
event
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
foreign import ccall "wrapper"
mk_WidgetClassSelectionNotifyEventFieldCallback :: C_WidgetClassSelectionNotifyEventFieldCallback -> IO (FunPtr C_WidgetClassSelectionNotifyEventFieldCallback)
type WidgetClassSelectionNotifyEventFieldCallback =
Gtk.Widget.Widget
-> Gdk.EventSelection.EventSelection
-> IO Bool
noWidgetClassSelectionNotifyEventFieldCallback :: Maybe WidgetClassSelectionNotifyEventFieldCallback
noWidgetClassSelectionNotifyEventFieldCallback :: Maybe WidgetClassSelectionRequestEventFieldCallback
noWidgetClassSelectionNotifyEventFieldCallback = Maybe WidgetClassSelectionRequestEventFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassSelectionNotifyEventFieldCallback :: MonadIO m => WidgetClassSelectionNotifyEventFieldCallback -> m (GClosure C_WidgetClassSelectionNotifyEventFieldCallback)
genClosure_WidgetClassSelectionNotifyEventFieldCallback :: WidgetClassSelectionRequestEventFieldCallback
-> m (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
genClosure_WidgetClassSelectionNotifyEventFieldCallback cb :: WidgetClassSelectionRequestEventFieldCallback
cb = IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
-> m (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
-> m (GClosure C_WidgetClassSelectionRequestEventFieldCallback))
-> IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
-> m (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassSelectionRequestEventFieldCallback
cb' = Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
-> WidgetClassSelectionRequestEventFieldCallback
-> C_WidgetClassSelectionRequestEventFieldCallback
wrap_WidgetClassSelectionNotifyEventFieldCallback Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
forall a. Maybe a
Nothing WidgetClassSelectionRequestEventFieldCallback
cb
C_WidgetClassSelectionRequestEventFieldCallback
-> IO (FunPtr C_WidgetClassSelectionRequestEventFieldCallback)
mk_WidgetClassSelectionNotifyEventFieldCallback C_WidgetClassSelectionRequestEventFieldCallback
cb' IO (FunPtr C_WidgetClassSelectionRequestEventFieldCallback)
-> (FunPtr C_WidgetClassSelectionRequestEventFieldCallback
-> IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback))
-> IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassSelectionRequestEventFieldCallback
-> IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassSelectionNotifyEventFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassSelectionNotifyEventFieldCallback)) ->
WidgetClassSelectionNotifyEventFieldCallback ->
C_WidgetClassSelectionNotifyEventFieldCallback
wrap_WidgetClassSelectionNotifyEventFieldCallback :: Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
-> WidgetClassSelectionRequestEventFieldCallback
-> C_WidgetClassSelectionRequestEventFieldCallback
wrap_WidgetClassSelectionNotifyEventFieldCallback funptrptr :: Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
funptrptr _cb :: WidgetClassSelectionRequestEventFieldCallback
_cb widget :: Ptr Widget
widget event :: Ptr EventSelection
event = 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
EventSelection
event' <- ((ManagedPtr EventSelection -> EventSelection)
-> Ptr EventSelection -> IO EventSelection
forall a.
(HasCallStack, WrappedPtr a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
newPtr ManagedPtr EventSelection -> EventSelection
Gdk.EventSelection.EventSelection) Ptr EventSelection
event
Bool
result <- WidgetClassSelectionRequestEventFieldCallback
_cb Widget
widget' EventSelection
event'
Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
-> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
funptrptr
let result' :: CInt
result' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
result
CInt -> IO CInt
forall (m :: * -> *) a. Monad m => a -> m a
return CInt
result'
type C_WidgetClassSelectionGetFieldCallback =
Ptr Gtk.Widget.Widget ->
Ptr Gtk.SelectionData.SelectionData ->
Word32 ->
Word32 ->
IO ()
foreign import ccall "dynamic" __dynamic_C_WidgetClassSelectionGetFieldCallback :: FunPtr C_WidgetClassSelectionGetFieldCallback -> C_WidgetClassSelectionGetFieldCallback
dynamic_WidgetClassSelectionGetFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassSelectionGetFieldCallback
-> a
-> Gtk.SelectionData.SelectionData
-> Word32
-> Word32
-> m ()
dynamic_WidgetClassSelectionGetFieldCallback :: FunPtr C_WidgetClassSelectionGetFieldCallback
-> a -> SelectionData -> Word32 -> Word32 -> m ()
dynamic_WidgetClassSelectionGetFieldCallback __funPtr :: FunPtr C_WidgetClassSelectionGetFieldCallback
__funPtr widget :: a
widget selectionData :: SelectionData
selectionData info :: Word32
info time_ :: Word32
time_ = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
Ptr SelectionData
selectionData' <- SelectionData -> IO (Ptr SelectionData)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr SelectionData
selectionData
(FunPtr C_WidgetClassSelectionGetFieldCallback
-> C_WidgetClassSelectionGetFieldCallback
__dynamic_C_WidgetClassSelectionGetFieldCallback FunPtr C_WidgetClassSelectionGetFieldCallback
__funPtr) Ptr Widget
widget' Ptr SelectionData
selectionData' Word32
info Word32
time_
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
SelectionData -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr SelectionData
selectionData
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
foreign import ccall "wrapper"
mk_WidgetClassSelectionGetFieldCallback :: C_WidgetClassSelectionGetFieldCallback -> IO (FunPtr C_WidgetClassSelectionGetFieldCallback)
type WidgetClassSelectionGetFieldCallback =
Gtk.Widget.Widget
-> Gtk.SelectionData.SelectionData
-> Word32
-> Word32
-> IO ()
noWidgetClassSelectionGetFieldCallback :: Maybe WidgetClassSelectionGetFieldCallback
noWidgetClassSelectionGetFieldCallback :: Maybe WidgetClassSelectionGetFieldCallback
noWidgetClassSelectionGetFieldCallback = Maybe WidgetClassSelectionGetFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassSelectionGetFieldCallback :: MonadIO m => WidgetClassSelectionGetFieldCallback -> m (GClosure C_WidgetClassSelectionGetFieldCallback)
genClosure_WidgetClassSelectionGetFieldCallback :: WidgetClassSelectionGetFieldCallback
-> m (GClosure C_WidgetClassSelectionGetFieldCallback)
genClosure_WidgetClassSelectionGetFieldCallback cb :: WidgetClassSelectionGetFieldCallback
cb = IO (GClosure C_WidgetClassSelectionGetFieldCallback)
-> m (GClosure C_WidgetClassSelectionGetFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassSelectionGetFieldCallback)
-> m (GClosure C_WidgetClassSelectionGetFieldCallback))
-> IO (GClosure C_WidgetClassSelectionGetFieldCallback)
-> m (GClosure C_WidgetClassSelectionGetFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassSelectionGetFieldCallback
cb' = Maybe (Ptr (FunPtr C_WidgetClassSelectionGetFieldCallback))
-> WidgetClassSelectionGetFieldCallback
-> C_WidgetClassSelectionGetFieldCallback
wrap_WidgetClassSelectionGetFieldCallback Maybe (Ptr (FunPtr C_WidgetClassSelectionGetFieldCallback))
forall a. Maybe a
Nothing WidgetClassSelectionGetFieldCallback
cb
C_WidgetClassSelectionGetFieldCallback
-> IO (FunPtr C_WidgetClassSelectionGetFieldCallback)
mk_WidgetClassSelectionGetFieldCallback C_WidgetClassSelectionGetFieldCallback
cb' IO (FunPtr C_WidgetClassSelectionGetFieldCallback)
-> (FunPtr C_WidgetClassSelectionGetFieldCallback
-> IO (GClosure C_WidgetClassSelectionGetFieldCallback))
-> IO (GClosure C_WidgetClassSelectionGetFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassSelectionGetFieldCallback
-> IO (GClosure C_WidgetClassSelectionGetFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassSelectionGetFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassSelectionGetFieldCallback)) ->
WidgetClassSelectionGetFieldCallback ->
C_WidgetClassSelectionGetFieldCallback
wrap_WidgetClassSelectionGetFieldCallback :: Maybe (Ptr (FunPtr C_WidgetClassSelectionGetFieldCallback))
-> WidgetClassSelectionGetFieldCallback
-> C_WidgetClassSelectionGetFieldCallback
wrap_WidgetClassSelectionGetFieldCallback funptrptr :: Maybe (Ptr (FunPtr C_WidgetClassSelectionGetFieldCallback))
funptrptr _cb :: WidgetClassSelectionGetFieldCallback
_cb widget :: Ptr Widget
widget selectionData :: Ptr SelectionData
selectionData info :: Word32
info time_ :: Word32
time_ = 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
(ManagedPtr SelectionData -> SelectionData)
-> Ptr SelectionData -> (SelectionData -> IO ()) -> IO ()
forall a b.
(HasCallStack, ManagedPtrNewtype a) =>
(ManagedPtr a -> a) -> Ptr a -> (a -> IO b) -> IO b
B.ManagedPtr.withTransient ManagedPtr SelectionData -> SelectionData
Gtk.SelectionData.SelectionData Ptr SelectionData
selectionData ((SelectionData -> IO ()) -> IO ())
-> (SelectionData -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \selectionData' :: SelectionData
selectionData' -> do
WidgetClassSelectionGetFieldCallback
_cb Widget
widget' SelectionData
selectionData' Word32
info Word32
time_
Maybe (Ptr (FunPtr C_WidgetClassSelectionGetFieldCallback))
-> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe (Ptr (FunPtr C_WidgetClassSelectionGetFieldCallback))
funptrptr
type C_WidgetClassSelectionClearEventFieldCallback =
Ptr Gtk.Widget.Widget ->
Ptr Gdk.EventSelection.EventSelection ->
IO CInt
foreign import ccall "dynamic" __dynamic_C_WidgetClassSelectionClearEventFieldCallback :: FunPtr C_WidgetClassSelectionClearEventFieldCallback -> C_WidgetClassSelectionClearEventFieldCallback
dynamic_WidgetClassSelectionClearEventFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassSelectionClearEventFieldCallback
-> a
-> Gdk.EventSelection.EventSelection
-> m Bool
dynamic_WidgetClassSelectionClearEventFieldCallback :: FunPtr C_WidgetClassSelectionRequestEventFieldCallback
-> a -> EventSelection -> m Bool
dynamic_WidgetClassSelectionClearEventFieldCallback __funPtr :: FunPtr C_WidgetClassSelectionRequestEventFieldCallback
__funPtr widget :: a
widget event :: EventSelection
event = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
Ptr EventSelection
event' <- EventSelection -> IO (Ptr EventSelection)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr EventSelection
event
CInt
result <- (FunPtr C_WidgetClassSelectionRequestEventFieldCallback
-> C_WidgetClassSelectionRequestEventFieldCallback
__dynamic_C_WidgetClassSelectionClearEventFieldCallback FunPtr C_WidgetClassSelectionRequestEventFieldCallback
__funPtr) Ptr Widget
widget' Ptr EventSelection
event'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= 0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
EventSelection -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr EventSelection
event
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
foreign import ccall "wrapper"
mk_WidgetClassSelectionClearEventFieldCallback :: C_WidgetClassSelectionClearEventFieldCallback -> IO (FunPtr C_WidgetClassSelectionClearEventFieldCallback)
type WidgetClassSelectionClearEventFieldCallback =
Gtk.Widget.Widget
-> Gdk.EventSelection.EventSelection
-> IO Bool
noWidgetClassSelectionClearEventFieldCallback :: Maybe WidgetClassSelectionClearEventFieldCallback
noWidgetClassSelectionClearEventFieldCallback :: Maybe WidgetClassSelectionRequestEventFieldCallback
noWidgetClassSelectionClearEventFieldCallback = Maybe WidgetClassSelectionRequestEventFieldCallback
forall a. Maybe a
Nothing
genClosure_WidgetClassSelectionClearEventFieldCallback :: MonadIO m => WidgetClassSelectionClearEventFieldCallback -> m (GClosure C_WidgetClassSelectionClearEventFieldCallback)
genClosure_WidgetClassSelectionClearEventFieldCallback :: WidgetClassSelectionRequestEventFieldCallback
-> m (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
genClosure_WidgetClassSelectionClearEventFieldCallback cb :: WidgetClassSelectionRequestEventFieldCallback
cb = IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
-> m (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
-> m (GClosure C_WidgetClassSelectionRequestEventFieldCallback))
-> IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
-> m (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_WidgetClassSelectionRequestEventFieldCallback
cb' = Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
-> WidgetClassSelectionRequestEventFieldCallback
-> C_WidgetClassSelectionRequestEventFieldCallback
wrap_WidgetClassSelectionClearEventFieldCallback Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
forall a. Maybe a
Nothing WidgetClassSelectionRequestEventFieldCallback
cb
C_WidgetClassSelectionRequestEventFieldCallback
-> IO (FunPtr C_WidgetClassSelectionRequestEventFieldCallback)
mk_WidgetClassSelectionClearEventFieldCallback C_WidgetClassSelectionRequestEventFieldCallback
cb' IO (FunPtr C_WidgetClassSelectionRequestEventFieldCallback)
-> (FunPtr C_WidgetClassSelectionRequestEventFieldCallback
-> IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback))
-> IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_WidgetClassSelectionRequestEventFieldCallback
-> IO (GClosure C_WidgetClassSelectionRequestEventFieldCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_WidgetClassSelectionClearEventFieldCallback ::
Maybe (Ptr (FunPtr C_WidgetClassSelectionClearEventFieldCallback)) ->
WidgetClassSelectionClearEventFieldCallback ->
C_WidgetClassSelectionClearEventFieldCallback
wrap_WidgetClassSelectionClearEventFieldCallback :: Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
-> WidgetClassSelectionRequestEventFieldCallback
-> C_WidgetClassSelectionRequestEventFieldCallback
wrap_WidgetClassSelectionClearEventFieldCallback funptrptr :: Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
funptrptr _cb :: WidgetClassSelectionRequestEventFieldCallback
_cb widget :: Ptr Widget
widget event :: Ptr EventSelection
event = 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
EventSelection
event' <- ((ManagedPtr EventSelection -> EventSelection)
-> Ptr EventSelection -> IO EventSelection
forall a.
(HasCallStack, WrappedPtr a) =>
(ManagedPtr a -> a) -> Ptr a -> IO a
newPtr ManagedPtr EventSelection -> EventSelection
Gdk.EventSelection.EventSelection) Ptr EventSelection
event
Bool
result <- WidgetClassSelectionRequestEventFieldCallback
_cb Widget
widget' EventSelection
event'
Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
-> IO ()
forall a. Maybe (Ptr (FunPtr a)) -> IO ()
maybeReleaseFunPtr Maybe
(Ptr (FunPtr C_WidgetClassSelectionRequestEventFieldCallback))
funptrptr
let result' :: CInt
result' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
result
CInt -> IO CInt
forall (m :: * -> *) a. Monad m => a -> m a
return CInt
result'
type C_WidgetClassScrollEventFieldCallback =
Ptr Gtk.Widget.Widget ->
Ptr Gdk.EventScroll.EventScroll ->
IO CInt
foreign import ccall "dynamic" __dynamic_C_WidgetClassScrollEventFieldCallback :: FunPtr C_WidgetClassScrollEventFieldCallback -> C_WidgetClassScrollEventFieldCallback
dynamic_WidgetClassScrollEventFieldCallback ::
(B.CallStack.HasCallStack, MonadIO m, Gtk.Widget.IsWidget a) =>
FunPtr C_WidgetClassScrollEventFieldCallback
-> a
-> Gdk.EventScroll.EventScroll
-> m Bool
dynamic_WidgetClassScrollEventFieldCallback :: FunPtr C_WidgetClassScrollEventFieldCallback
-> a -> EventScroll -> m Bool
dynamic_WidgetClassScrollEventFieldCallback __funPtr :: FunPtr C_WidgetClassScrollEventFieldCallback
__funPtr widget :: a
widget event :: EventScroll
event = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
Ptr Widget
widget' <- a -> IO (Ptr Widget)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
widget
Ptr EventScroll
event' <- EventScroll -> IO (Ptr EventScroll)
forall a. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr a)
unsafeManagedPtrGetPtr EventScroll
event
CInt
result <- (FunPtr C_WidgetClassScrollEventFieldCallback
-> C_WidgetClassScrollEventFieldCallback
__dynamic_C_WidgetClassScrollEventFieldCallback FunPtr C_WidgetClassScrollEventFieldCallback
__funPtr) Ptr Widget
widget' Ptr EventScroll
event'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= 0) CInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
widget
EventScroll -> IO ()
forall a. Man