module GI.Gtk.Objects.Button
(
Button(..) ,
IsButton ,
toButton ,
noButton ,
ButtonClickedMethodInfo ,
buttonClicked ,
ButtonEnterMethodInfo ,
buttonEnter ,
ButtonGetAlignmentMethodInfo ,
buttonGetAlignment ,
ButtonGetAlwaysShowImageMethodInfo ,
buttonGetAlwaysShowImage ,
ButtonGetEventWindowMethodInfo ,
buttonGetEventWindow ,
ButtonGetFocusOnClickMethodInfo ,
buttonGetFocusOnClick ,
ButtonGetImageMethodInfo ,
buttonGetImage ,
ButtonGetImagePositionMethodInfo ,
buttonGetImagePosition ,
ButtonGetLabelMethodInfo ,
buttonGetLabel ,
ButtonGetReliefMethodInfo ,
buttonGetRelief ,
ButtonGetUseStockMethodInfo ,
buttonGetUseStock ,
ButtonGetUseUnderlineMethodInfo ,
buttonGetUseUnderline ,
ButtonLeaveMethodInfo ,
buttonLeave ,
buttonNew ,
buttonNewFromIconName ,
buttonNewFromStock ,
buttonNewWithLabel ,
buttonNewWithMnemonic ,
ButtonPressedMethodInfo ,
buttonPressed ,
ButtonReleasedMethodInfo ,
buttonReleased ,
ButtonSetAlignmentMethodInfo ,
buttonSetAlignment ,
ButtonSetAlwaysShowImageMethodInfo ,
buttonSetAlwaysShowImage ,
ButtonSetFocusOnClickMethodInfo ,
buttonSetFocusOnClick ,
ButtonSetImageMethodInfo ,
buttonSetImage ,
ButtonSetImagePositionMethodInfo ,
buttonSetImagePosition ,
ButtonSetLabelMethodInfo ,
buttonSetLabel ,
ButtonSetReliefMethodInfo ,
buttonSetRelief ,
ButtonSetUseStockMethodInfo ,
buttonSetUseStock ,
ButtonSetUseUnderlineMethodInfo ,
buttonSetUseUnderline ,
ButtonAlwaysShowImagePropertyInfo ,
buttonAlwaysShowImage ,
constructButtonAlwaysShowImage ,
getButtonAlwaysShowImage ,
setButtonAlwaysShowImage ,
ButtonImagePropertyInfo ,
buttonImage ,
constructButtonImage ,
getButtonImage ,
setButtonImage ,
ButtonImagePositionPropertyInfo ,
buttonImagePosition ,
constructButtonImagePosition ,
getButtonImagePosition ,
setButtonImagePosition ,
ButtonLabelPropertyInfo ,
buttonLabel ,
constructButtonLabel ,
getButtonLabel ,
setButtonLabel ,
ButtonReliefPropertyInfo ,
buttonRelief ,
constructButtonRelief ,
getButtonRelief ,
setButtonRelief ,
ButtonUseStockPropertyInfo ,
buttonUseStock ,
constructButtonUseStock ,
getButtonUseStock ,
setButtonUseStock ,
ButtonUseUnderlinePropertyInfo ,
buttonUseUnderline ,
constructButtonUseUnderline ,
getButtonUseUnderline ,
setButtonUseUnderline ,
ButtonXalignPropertyInfo ,
buttonXalign ,
constructButtonXalign ,
getButtonXalign ,
setButtonXalign ,
ButtonYalignPropertyInfo ,
buttonYalign ,
constructButtonYalign ,
getButtonYalign ,
setButtonYalign ,
ButtonActivateCallback ,
ButtonActivateSignalInfo ,
C_ButtonActivateCallback ,
afterButtonActivate ,
genClosure_ButtonActivate ,
mk_ButtonActivateCallback ,
noButtonActivateCallback ,
onButtonActivate ,
wrap_ButtonActivateCallback ,
ButtonClickedCallback ,
ButtonClickedSignalInfo ,
C_ButtonClickedCallback ,
afterButtonClicked ,
genClosure_ButtonClicked ,
mk_ButtonClickedCallback ,
noButtonClickedCallback ,
onButtonClicked ,
wrap_ButtonClickedCallback ,
ButtonEnterCallback ,
ButtonEnterSignalInfo ,
C_ButtonEnterCallback ,
afterButtonEnter ,
genClosure_ButtonEnter ,
mk_ButtonEnterCallback ,
noButtonEnterCallback ,
onButtonEnter ,
wrap_ButtonEnterCallback ,
ButtonLeaveCallback ,
ButtonLeaveSignalInfo ,
C_ButtonLeaveCallback ,
afterButtonLeave ,
genClosure_ButtonLeave ,
mk_ButtonLeaveCallback ,
noButtonLeaveCallback ,
onButtonLeave ,
wrap_ButtonLeaveCallback ,
ButtonPressedCallback ,
ButtonPressedSignalInfo ,
C_ButtonPressedCallback ,
afterButtonPressed ,
genClosure_ButtonPressed ,
mk_ButtonPressedCallback ,
noButtonPressedCallback ,
onButtonPressed ,
wrap_ButtonPressedCallback ,
ButtonReleasedCallback ,
ButtonReleasedSignalInfo ,
C_ButtonReleasedCallback ,
afterButtonReleased ,
genClosure_ButtonReleased ,
mk_ButtonReleasedCallback ,
noButtonReleasedCallback ,
onButtonReleased ,
wrap_ButtonReleasedCallback ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gdk.Objects.Window as Gdk.Window
import qualified GI.Gtk.Enums as Gtk.Enums
import qualified GI.Gtk.Interfaces.Actionable as Gtk.Actionable
import qualified GI.Gtk.Interfaces.Activatable as Gtk.Activatable
import qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import qualified GI.Gtk.Objects.Bin as Gtk.Bin
import qualified GI.Gtk.Objects.Container as Gtk.Container
import qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype Button = Button (ManagedPtr Button)
foreign import ccall "gtk_button_get_type"
c_gtk_button_get_type :: IO GType
instance GObject Button where
gobjectType _ = c_gtk_button_get_type
class GObject o => IsButton o
#if MIN_VERSION_base(4,9,0)
instance (GObject a, O.UnknownAncestorError Button a) =>
IsButton a
#endif
instance IsButton Button
instance Gtk.Bin.IsBin Button
instance Gtk.Container.IsContainer Button
instance Gtk.Widget.IsWidget Button
instance GObject.Object.IsObject Button
instance Atk.ImplementorIface.IsImplementorIface Button
instance Gtk.Actionable.IsActionable Button
instance Gtk.Activatable.IsActivatable Button
instance Gtk.Buildable.IsBuildable Button
toButton :: IsButton o => o -> IO Button
toButton = unsafeCastTo Button
noButton :: Maybe Button
noButton = Nothing
type family ResolveButtonMethod (t :: Symbol) (o :: *) :: * where
ResolveButtonMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveButtonMethod "add" o = Gtk.Container.ContainerAddMethodInfo
ResolveButtonMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolveButtonMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveButtonMethod "addDeviceEvents" o = Gtk.Widget.WidgetAddDeviceEventsMethodInfo
ResolveButtonMethod "addEvents" o = Gtk.Widget.WidgetAddEventsMethodInfo
ResolveButtonMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveButtonMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveButtonMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveButtonMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveButtonMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolveButtonMethod "checkResize" o = Gtk.Container.ContainerCheckResizeMethodInfo
ResolveButtonMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveButtonMethod "childGetProperty" o = Gtk.Container.ContainerChildGetPropertyMethodInfo
ResolveButtonMethod "childNotify" o = Gtk.Container.ContainerChildNotifyMethodInfo
ResolveButtonMethod "childNotifyByPspec" o = Gtk.Container.ContainerChildNotifyByPspecMethodInfo
ResolveButtonMethod "childSetProperty" o = Gtk.Container.ContainerChildSetPropertyMethodInfo
ResolveButtonMethod "childType" o = Gtk.Container.ContainerChildTypeMethodInfo
ResolveButtonMethod "classPath" o = Gtk.Widget.WidgetClassPathMethodInfo
ResolveButtonMethod "clicked" o = ButtonClickedMethodInfo
ResolveButtonMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveButtonMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveButtonMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveButtonMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveButtonMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveButtonMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveButtonMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveButtonMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolveButtonMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolveButtonMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveButtonMethod "doSetRelatedAction" o = Gtk.Activatable.ActivatableDoSetRelatedActionMethodInfo
ResolveButtonMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolveButtonMethod "dragBeginWithCoordinates" o = Gtk.Widget.WidgetDragBeginWithCoordinatesMethodInfo
ResolveButtonMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveButtonMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolveButtonMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolveButtonMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolveButtonMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolveButtonMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolveButtonMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolveButtonMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolveButtonMethod "dragDestSetProxy" o = Gtk.Widget.WidgetDragDestSetProxyMethodInfo
ResolveButtonMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolveButtonMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolveButtonMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolveButtonMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolveButtonMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolveButtonMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolveButtonMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolveButtonMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolveButtonMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolveButtonMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolveButtonMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolveButtonMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolveButtonMethod "dragSourceSetIconPixbuf" o = Gtk.Widget.WidgetDragSourceSetIconPixbufMethodInfo
ResolveButtonMethod "dragSourceSetIconStock" o = Gtk.Widget.WidgetDragSourceSetIconStockMethodInfo
ResolveButtonMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolveButtonMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolveButtonMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolveButtonMethod "draw" o = Gtk.Widget.WidgetDrawMethodInfo
ResolveButtonMethod "ensureStyle" o = Gtk.Widget.WidgetEnsureStyleMethodInfo
ResolveButtonMethod "enter" o = ButtonEnterMethodInfo
ResolveButtonMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveButtonMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolveButtonMethod "forall" o = Gtk.Container.ContainerForallMethodInfo
ResolveButtonMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveButtonMethod "foreach" o = Gtk.Container.ContainerForeachMethodInfo
ResolveButtonMethod "freezeChildNotify" o = Gtk.Widget.WidgetFreezeChildNotifyMethodInfo
ResolveButtonMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveButtonMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolveButtonMethod "grabDefault" o = Gtk.Widget.WidgetGrabDefaultMethodInfo
ResolveButtonMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveButtonMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolveButtonMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveButtonMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveButtonMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolveButtonMethod "hasRcStyle" o = Gtk.Widget.WidgetHasRcStyleMethodInfo
ResolveButtonMethod "hasScreen" o = Gtk.Widget.WidgetHasScreenMethodInfo
ResolveButtonMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveButtonMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveButtonMethod "hideOnDelete" o = Gtk.Widget.WidgetHideOnDeleteMethodInfo
ResolveButtonMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveButtonMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveButtonMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolveButtonMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveButtonMethod "intersect" o = Gtk.Widget.WidgetIntersectMethodInfo
ResolveButtonMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveButtonMethod "isComposited" o = Gtk.Widget.WidgetIsCompositedMethodInfo
ResolveButtonMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveButtonMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveButtonMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveButtonMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveButtonMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolveButtonMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveButtonMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveButtonMethod "leave" o = ButtonLeaveMethodInfo
ResolveButtonMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolveButtonMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolveButtonMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveButtonMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveButtonMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveButtonMethod "modifyBase" o = Gtk.Widget.WidgetModifyBaseMethodInfo
ResolveButtonMethod "modifyBg" o = Gtk.Widget.WidgetModifyBgMethodInfo
ResolveButtonMethod "modifyCursor" o = Gtk.Widget.WidgetModifyCursorMethodInfo
ResolveButtonMethod "modifyFg" o = Gtk.Widget.WidgetModifyFgMethodInfo
ResolveButtonMethod "modifyFont" o = Gtk.Widget.WidgetModifyFontMethodInfo
ResolveButtonMethod "modifyStyle" o = Gtk.Widget.WidgetModifyStyleMethodInfo
ResolveButtonMethod "modifyText" o = Gtk.Widget.WidgetModifyTextMethodInfo
ResolveButtonMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveButtonMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveButtonMethod "overrideBackgroundColor" o = Gtk.Widget.WidgetOverrideBackgroundColorMethodInfo
ResolveButtonMethod "overrideColor" o = Gtk.Widget.WidgetOverrideColorMethodInfo
ResolveButtonMethod "overrideCursor" o = Gtk.Widget.WidgetOverrideCursorMethodInfo
ResolveButtonMethod "overrideFont" o = Gtk.Widget.WidgetOverrideFontMethodInfo
ResolveButtonMethod "overrideSymbolicColor" o = Gtk.Widget.WidgetOverrideSymbolicColorMethodInfo
ResolveButtonMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveButtonMethod "path" o = Gtk.Widget.WidgetPathMethodInfo
ResolveButtonMethod "pressed" o = ButtonPressedMethodInfo
ResolveButtonMethod "propagateDraw" o = Gtk.Container.ContainerPropagateDrawMethodInfo
ResolveButtonMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveButtonMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolveButtonMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveButtonMethod "queueDrawArea" o = Gtk.Widget.WidgetQueueDrawAreaMethodInfo
ResolveButtonMethod "queueDrawRegion" o = Gtk.Widget.WidgetQueueDrawRegionMethodInfo
ResolveButtonMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveButtonMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolveButtonMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveButtonMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveButtonMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveButtonMethod "regionIntersect" o = Gtk.Widget.WidgetRegionIntersectMethodInfo
ResolveButtonMethod "registerWindow" o = Gtk.Widget.WidgetRegisterWindowMethodInfo
ResolveButtonMethod "released" o = ButtonReleasedMethodInfo
ResolveButtonMethod "remove" o = Gtk.Container.ContainerRemoveMethodInfo
ResolveButtonMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolveButtonMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveButtonMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveButtonMethod "renderIcon" o = Gtk.Widget.WidgetRenderIconMethodInfo
ResolveButtonMethod "renderIconPixbuf" o = Gtk.Widget.WidgetRenderIconPixbufMethodInfo
ResolveButtonMethod "reparent" o = Gtk.Widget.WidgetReparentMethodInfo
ResolveButtonMethod "replaceData" o = GObject.Object.ObjectReplaceDataMethodInfo
ResolveButtonMethod "replaceQdata" o = GObject.Object.ObjectReplaceQdataMethodInfo
ResolveButtonMethod "resetRcStyles" o = Gtk.Widget.WidgetResetRcStylesMethodInfo
ResolveButtonMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolveButtonMethod "resizeChildren" o = Gtk.Container.ContainerResizeChildrenMethodInfo
ResolveButtonMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveButtonMethod "sendExpose" o = Gtk.Widget.WidgetSendExposeMethodInfo
ResolveButtonMethod "sendFocusChange" o = Gtk.Widget.WidgetSendFocusChangeMethodInfo
ResolveButtonMethod "shapeCombineRegion" o = Gtk.Widget.WidgetShapeCombineRegionMethodInfo
ResolveButtonMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveButtonMethod "showAll" o = Gtk.Widget.WidgetShowAllMethodInfo
ResolveButtonMethod "showNow" o = Gtk.Widget.WidgetShowNowMethodInfo
ResolveButtonMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveButtonMethod "sizeAllocateWithBaseline" o = Gtk.Widget.WidgetSizeAllocateWithBaselineMethodInfo
ResolveButtonMethod "sizeRequest" o = Gtk.Widget.WidgetSizeRequestMethodInfo
ResolveButtonMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveButtonMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveButtonMethod "styleAttach" o = Gtk.Widget.WidgetStyleAttachMethodInfo
ResolveButtonMethod "styleGetProperty" o = Gtk.Widget.WidgetStyleGetPropertyMethodInfo
ResolveButtonMethod "syncActionProperties" o = Gtk.Activatable.ActivatableSyncActionPropertiesMethodInfo
ResolveButtonMethod "thawChildNotify" o = Gtk.Widget.WidgetThawChildNotifyMethodInfo
ResolveButtonMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveButtonMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveButtonMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveButtonMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveButtonMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveButtonMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveButtonMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveButtonMethod "unregisterWindow" o = Gtk.Widget.WidgetUnregisterWindowMethodInfo
ResolveButtonMethod "unsetFocusChain" o = Gtk.Container.ContainerUnsetFocusChainMethodInfo
ResolveButtonMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveButtonMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveButtonMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveButtonMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolveButtonMethod "getActionName" o = Gtk.Actionable.ActionableGetActionNameMethodInfo
ResolveButtonMethod "getActionTargetValue" o = Gtk.Actionable.ActionableGetActionTargetValueMethodInfo
ResolveButtonMethod "getAlignment" o = ButtonGetAlignmentMethodInfo
ResolveButtonMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveButtonMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveButtonMethod "getAllocatedSize" o = Gtk.Widget.WidgetGetAllocatedSizeMethodInfo
ResolveButtonMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveButtonMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveButtonMethod "getAlwaysShowImage" o = ButtonGetAlwaysShowImageMethodInfo
ResolveButtonMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveButtonMethod "getAppPaintable" o = Gtk.Widget.WidgetGetAppPaintableMethodInfo
ResolveButtonMethod "getBorderWidth" o = Gtk.Container.ContainerGetBorderWidthMethodInfo
ResolveButtonMethod "getCanDefault" o = Gtk.Widget.WidgetGetCanDefaultMethodInfo
ResolveButtonMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveButtonMethod "getChild" o = Gtk.Bin.BinGetChildMethodInfo
ResolveButtonMethod "getChildRequisition" o = Gtk.Widget.WidgetGetChildRequisitionMethodInfo
ResolveButtonMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveButtonMethod "getChildren" o = Gtk.Container.ContainerGetChildrenMethodInfo
ResolveButtonMethod "getClip" o = Gtk.Widget.WidgetGetClipMethodInfo
ResolveButtonMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveButtonMethod "getCompositeName" o = Gtk.Widget.WidgetGetCompositeNameMethodInfo
ResolveButtonMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveButtonMethod "getDeviceEnabled" o = Gtk.Widget.WidgetGetDeviceEnabledMethodInfo
ResolveButtonMethod "getDeviceEvents" o = Gtk.Widget.WidgetGetDeviceEventsMethodInfo
ResolveButtonMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveButtonMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveButtonMethod "getDoubleBuffered" o = Gtk.Widget.WidgetGetDoubleBufferedMethodInfo
ResolveButtonMethod "getEventWindow" o = ButtonGetEventWindowMethodInfo
ResolveButtonMethod "getEvents" o = Gtk.Widget.WidgetGetEventsMethodInfo
ResolveButtonMethod "getFocusChain" o = Gtk.Container.ContainerGetFocusChainMethodInfo
ResolveButtonMethod "getFocusChild" o = Gtk.Container.ContainerGetFocusChildMethodInfo
ResolveButtonMethod "getFocusHadjustment" o = Gtk.Container.ContainerGetFocusHadjustmentMethodInfo
ResolveButtonMethod "getFocusOnClick" o = ButtonGetFocusOnClickMethodInfo
ResolveButtonMethod "getFocusVadjustment" o = Gtk.Container.ContainerGetFocusVadjustmentMethodInfo
ResolveButtonMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveButtonMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveButtonMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveButtonMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveButtonMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveButtonMethod "getHasWindow" o = Gtk.Widget.WidgetGetHasWindowMethodInfo
ResolveButtonMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveButtonMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveButtonMethod "getImage" o = ButtonGetImageMethodInfo
ResolveButtonMethod "getImagePosition" o = ButtonGetImagePositionMethodInfo
ResolveButtonMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveButtonMethod "getLabel" o = ButtonGetLabelMethodInfo
ResolveButtonMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveButtonMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveButtonMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveButtonMethod "getMarginLeft" o = Gtk.Widget.WidgetGetMarginLeftMethodInfo
ResolveButtonMethod "getMarginRight" o = Gtk.Widget.WidgetGetMarginRightMethodInfo
ResolveButtonMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveButtonMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveButtonMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolveButtonMethod "getModifierStyle" o = Gtk.Widget.WidgetGetModifierStyleMethodInfo
ResolveButtonMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveButtonMethod "getNoShowAll" o = Gtk.Widget.WidgetGetNoShowAllMethodInfo
ResolveButtonMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveButtonMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveButtonMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveButtonMethod "getParentWindow" o = Gtk.Widget.WidgetGetParentWindowMethodInfo
ResolveButtonMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolveButtonMethod "getPathForChild" o = Gtk.Container.ContainerGetPathForChildMethodInfo
ResolveButtonMethod "getPointer" o = Gtk.Widget.WidgetGetPointerMethodInfo
ResolveButtonMethod "getPreferredHeight" o = Gtk.Widget.WidgetGetPreferredHeightMethodInfo
ResolveButtonMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.Widget.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo
ResolveButtonMethod "getPreferredHeightForWidth" o = Gtk.Widget.WidgetGetPreferredHeightForWidthMethodInfo
ResolveButtonMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveButtonMethod "getPreferredWidth" o = Gtk.Widget.WidgetGetPreferredWidthMethodInfo
ResolveButtonMethod "getPreferredWidthForHeight" o = Gtk.Widget.WidgetGetPreferredWidthForHeightMethodInfo
ResolveButtonMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveButtonMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveButtonMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveButtonMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveButtonMethod "getRelatedAction" o = Gtk.Activatable.ActivatableGetRelatedActionMethodInfo
ResolveButtonMethod "getRelief" o = ButtonGetReliefMethodInfo
ResolveButtonMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveButtonMethod "getRequisition" o = Gtk.Widget.WidgetGetRequisitionMethodInfo
ResolveButtonMethod "getResizeMode" o = Gtk.Container.ContainerGetResizeModeMethodInfo
ResolveButtonMethod "getRootWindow" o = Gtk.Widget.WidgetGetRootWindowMethodInfo
ResolveButtonMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveButtonMethod "getScreen" o = Gtk.Widget.WidgetGetScreenMethodInfo
ResolveButtonMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveButtonMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveButtonMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveButtonMethod "getState" o = Gtk.Widget.WidgetGetStateMethodInfo
ResolveButtonMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveButtonMethod "getStyle" o = Gtk.Widget.WidgetGetStyleMethodInfo
ResolveButtonMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveButtonMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveButtonMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveButtonMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveButtonMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveButtonMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolveButtonMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolveButtonMethod "getUseActionAppearance" o = Gtk.Activatable.ActivatableGetUseActionAppearanceMethodInfo
ResolveButtonMethod "getUseStock" o = ButtonGetUseStockMethodInfo
ResolveButtonMethod "getUseUnderline" o = ButtonGetUseUnderlineMethodInfo
ResolveButtonMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveButtonMethod "getValignWithBaseline" o = Gtk.Widget.WidgetGetValignWithBaselineMethodInfo
ResolveButtonMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveButtonMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveButtonMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveButtonMethod "getVisual" o = Gtk.Widget.WidgetGetVisualMethodInfo
ResolveButtonMethod "getWindow" o = Gtk.Widget.WidgetGetWindowMethodInfo
ResolveButtonMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolveButtonMethod "setActionName" o = Gtk.Actionable.ActionableSetActionNameMethodInfo
ResolveButtonMethod "setActionTargetValue" o = Gtk.Actionable.ActionableSetActionTargetValueMethodInfo
ResolveButtonMethod "setAlignment" o = ButtonSetAlignmentMethodInfo
ResolveButtonMethod "setAllocation" o = Gtk.Widget.WidgetSetAllocationMethodInfo
ResolveButtonMethod "setAlwaysShowImage" o = ButtonSetAlwaysShowImageMethodInfo
ResolveButtonMethod "setAppPaintable" o = Gtk.Widget.WidgetSetAppPaintableMethodInfo
ResolveButtonMethod "setBorderWidth" o = Gtk.Container.ContainerSetBorderWidthMethodInfo
ResolveButtonMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveButtonMethod "setCanDefault" o = Gtk.Widget.WidgetSetCanDefaultMethodInfo
ResolveButtonMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveButtonMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveButtonMethod "setClip" o = Gtk.Widget.WidgetSetClipMethodInfo
ResolveButtonMethod "setCompositeName" o = Gtk.Widget.WidgetSetCompositeNameMethodInfo
ResolveButtonMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveButtonMethod "setDetailedActionName" o = Gtk.Actionable.ActionableSetDetailedActionNameMethodInfo
ResolveButtonMethod "setDeviceEnabled" o = Gtk.Widget.WidgetSetDeviceEnabledMethodInfo
ResolveButtonMethod "setDeviceEvents" o = Gtk.Widget.WidgetSetDeviceEventsMethodInfo
ResolveButtonMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveButtonMethod "setDoubleBuffered" o = Gtk.Widget.WidgetSetDoubleBufferedMethodInfo
ResolveButtonMethod "setEvents" o = Gtk.Widget.WidgetSetEventsMethodInfo
ResolveButtonMethod "setFocusChain" o = Gtk.Container.ContainerSetFocusChainMethodInfo
ResolveButtonMethod "setFocusChild" o = Gtk.Container.ContainerSetFocusChildMethodInfo
ResolveButtonMethod "setFocusHadjustment" o = Gtk.Container.ContainerSetFocusHadjustmentMethodInfo
ResolveButtonMethod "setFocusOnClick" o = ButtonSetFocusOnClickMethodInfo
ResolveButtonMethod "setFocusVadjustment" o = Gtk.Container.ContainerSetFocusVadjustmentMethodInfo
ResolveButtonMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveButtonMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveButtonMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveButtonMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveButtonMethod "setHasWindow" o = Gtk.Widget.WidgetSetHasWindowMethodInfo
ResolveButtonMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveButtonMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveButtonMethod "setImage" o = ButtonSetImageMethodInfo
ResolveButtonMethod "setImagePosition" o = ButtonSetImagePositionMethodInfo
ResolveButtonMethod "setLabel" o = ButtonSetLabelMethodInfo
ResolveButtonMethod "setMapped" o = Gtk.Widget.WidgetSetMappedMethodInfo
ResolveButtonMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveButtonMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveButtonMethod "setMarginLeft" o = Gtk.Widget.WidgetSetMarginLeftMethodInfo
ResolveButtonMethod "setMarginRight" o = Gtk.Widget.WidgetSetMarginRightMethodInfo
ResolveButtonMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveButtonMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveButtonMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveButtonMethod "setNoShowAll" o = Gtk.Widget.WidgetSetNoShowAllMethodInfo
ResolveButtonMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveButtonMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveButtonMethod "setParentWindow" o = Gtk.Widget.WidgetSetParentWindowMethodInfo
ResolveButtonMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveButtonMethod "setRealized" o = Gtk.Widget.WidgetSetRealizedMethodInfo
ResolveButtonMethod "setReallocateRedraws" o = Gtk.Container.ContainerSetReallocateRedrawsMethodInfo
ResolveButtonMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveButtonMethod "setRedrawOnAllocate" o = Gtk.Widget.WidgetSetRedrawOnAllocateMethodInfo
ResolveButtonMethod "setRelatedAction" o = Gtk.Activatable.ActivatableSetRelatedActionMethodInfo
ResolveButtonMethod "setRelief" o = ButtonSetReliefMethodInfo
ResolveButtonMethod "setResizeMode" o = Gtk.Container.ContainerSetResizeModeMethodInfo
ResolveButtonMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveButtonMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveButtonMethod "setState" o = Gtk.Widget.WidgetSetStateMethodInfo
ResolveButtonMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveButtonMethod "setStyle" o = Gtk.Widget.WidgetSetStyleMethodInfo
ResolveButtonMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveButtonMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveButtonMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveButtonMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolveButtonMethod "setUseActionAppearance" o = Gtk.Activatable.ActivatableSetUseActionAppearanceMethodInfo
ResolveButtonMethod "setUseStock" o = ButtonSetUseStockMethodInfo
ResolveButtonMethod "setUseUnderline" o = ButtonSetUseUnderlineMethodInfo
ResolveButtonMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveButtonMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveButtonMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveButtonMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveButtonMethod "setVisual" o = Gtk.Widget.WidgetSetVisualMethodInfo
ResolveButtonMethod "setWindow" o = Gtk.Widget.WidgetSetWindowMethodInfo
ResolveButtonMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveButtonMethod t Button, O.MethodInfo info Button p) => O.IsLabelProxy t (Button -> p) where
fromLabelProxy _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveButtonMethod t Button, O.MethodInfo info Button p) => O.IsLabel t (Button -> p) where
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
type ButtonActivateCallback =
IO ()
noButtonActivateCallback :: Maybe ButtonActivateCallback
noButtonActivateCallback = Nothing
type C_ButtonActivateCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_ButtonActivateCallback :: C_ButtonActivateCallback -> IO (FunPtr C_ButtonActivateCallback)
genClosure_ButtonActivate :: ButtonActivateCallback -> IO Closure
genClosure_ButtonActivate cb = do
let cb' = wrap_ButtonActivateCallback cb
mk_ButtonActivateCallback cb' >>= newCClosure
wrap_ButtonActivateCallback ::
ButtonActivateCallback ->
Ptr () ->
Ptr () ->
IO ()
wrap_ButtonActivateCallback _cb _ _ = do
_cb
onButtonActivate :: (GObject a, MonadIO m) => a -> ButtonActivateCallback -> m SignalHandlerId
onButtonActivate obj cb = liftIO $ connectButtonActivate obj cb SignalConnectBefore
afterButtonActivate :: (GObject a, MonadIO m) => a -> ButtonActivateCallback -> m SignalHandlerId
afterButtonActivate obj cb = connectButtonActivate obj cb SignalConnectAfter
connectButtonActivate :: (GObject a, MonadIO m) =>
a -> ButtonActivateCallback -> SignalConnectMode -> m SignalHandlerId
connectButtonActivate obj cb after = liftIO $ do
let cb' = wrap_ButtonActivateCallback cb
cb'' <- mk_ButtonActivateCallback cb'
connectSignalFunPtr obj "activate" cb'' after
type ButtonClickedCallback =
IO ()
noButtonClickedCallback :: Maybe ButtonClickedCallback
noButtonClickedCallback = Nothing
type C_ButtonClickedCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_ButtonClickedCallback :: C_ButtonClickedCallback -> IO (FunPtr C_ButtonClickedCallback)
genClosure_ButtonClicked :: ButtonClickedCallback -> IO Closure
genClosure_ButtonClicked cb = do
let cb' = wrap_ButtonClickedCallback cb
mk_ButtonClickedCallback cb' >>= newCClosure
wrap_ButtonClickedCallback ::
ButtonClickedCallback ->
Ptr () ->
Ptr () ->
IO ()
wrap_ButtonClickedCallback _cb _ _ = do
_cb
onButtonClicked :: (GObject a, MonadIO m) => a -> ButtonClickedCallback -> m SignalHandlerId
onButtonClicked obj cb = liftIO $ connectButtonClicked obj cb SignalConnectBefore
afterButtonClicked :: (GObject a, MonadIO m) => a -> ButtonClickedCallback -> m SignalHandlerId
afterButtonClicked obj cb = connectButtonClicked obj cb SignalConnectAfter
connectButtonClicked :: (GObject a, MonadIO m) =>
a -> ButtonClickedCallback -> SignalConnectMode -> m SignalHandlerId
connectButtonClicked obj cb after = liftIO $ do
let cb' = wrap_ButtonClickedCallback cb
cb'' <- mk_ButtonClickedCallback cb'
connectSignalFunPtr obj "clicked" cb'' after
type ButtonEnterCallback =
IO ()
noButtonEnterCallback :: Maybe ButtonEnterCallback
noButtonEnterCallback = Nothing
type C_ButtonEnterCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_ButtonEnterCallback :: C_ButtonEnterCallback -> IO (FunPtr C_ButtonEnterCallback)
genClosure_ButtonEnter :: ButtonEnterCallback -> IO Closure
genClosure_ButtonEnter cb = do
let cb' = wrap_ButtonEnterCallback cb
mk_ButtonEnterCallback cb' >>= newCClosure
wrap_ButtonEnterCallback ::
ButtonEnterCallback ->
Ptr () ->
Ptr () ->
IO ()
wrap_ButtonEnterCallback _cb _ _ = do
_cb
onButtonEnter :: (GObject a, MonadIO m) => a -> ButtonEnterCallback -> m SignalHandlerId
onButtonEnter obj cb = liftIO $ connectButtonEnter obj cb SignalConnectBefore
afterButtonEnter :: (GObject a, MonadIO m) => a -> ButtonEnterCallback -> m SignalHandlerId
afterButtonEnter obj cb = connectButtonEnter obj cb SignalConnectAfter
connectButtonEnter :: (GObject a, MonadIO m) =>
a -> ButtonEnterCallback -> SignalConnectMode -> m SignalHandlerId
connectButtonEnter obj cb after = liftIO $ do
let cb' = wrap_ButtonEnterCallback cb
cb'' <- mk_ButtonEnterCallback cb'
connectSignalFunPtr obj "enter" cb'' after
type ButtonLeaveCallback =
IO ()
noButtonLeaveCallback :: Maybe ButtonLeaveCallback
noButtonLeaveCallback = Nothing
type C_ButtonLeaveCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_ButtonLeaveCallback :: C_ButtonLeaveCallback -> IO (FunPtr C_ButtonLeaveCallback)
genClosure_ButtonLeave :: ButtonLeaveCallback -> IO Closure
genClosure_ButtonLeave cb = do
let cb' = wrap_ButtonLeaveCallback cb
mk_ButtonLeaveCallback cb' >>= newCClosure
wrap_ButtonLeaveCallback ::
ButtonLeaveCallback ->
Ptr () ->
Ptr () ->
IO ()
wrap_ButtonLeaveCallback _cb _ _ = do
_cb
onButtonLeave :: (GObject a, MonadIO m) => a -> ButtonLeaveCallback -> m SignalHandlerId
onButtonLeave obj cb = liftIO $ connectButtonLeave obj cb SignalConnectBefore
afterButtonLeave :: (GObject a, MonadIO m) => a -> ButtonLeaveCallback -> m SignalHandlerId
afterButtonLeave obj cb = connectButtonLeave obj cb SignalConnectAfter
connectButtonLeave :: (GObject a, MonadIO m) =>
a -> ButtonLeaveCallback -> SignalConnectMode -> m SignalHandlerId
connectButtonLeave obj cb after = liftIO $ do
let cb' = wrap_ButtonLeaveCallback cb
cb'' <- mk_ButtonLeaveCallback cb'
connectSignalFunPtr obj "leave" cb'' after
type ButtonPressedCallback =
IO ()
noButtonPressedCallback :: Maybe ButtonPressedCallback
noButtonPressedCallback = Nothing
type C_ButtonPressedCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_ButtonPressedCallback :: C_ButtonPressedCallback -> IO (FunPtr C_ButtonPressedCallback)
genClosure_ButtonPressed :: ButtonPressedCallback -> IO Closure
genClosure_ButtonPressed cb = do
let cb' = wrap_ButtonPressedCallback cb
mk_ButtonPressedCallback cb' >>= newCClosure
wrap_ButtonPressedCallback ::
ButtonPressedCallback ->
Ptr () ->
Ptr () ->
IO ()
wrap_ButtonPressedCallback _cb _ _ = do
_cb
onButtonPressed :: (GObject a, MonadIO m) => a -> ButtonPressedCallback -> m SignalHandlerId
onButtonPressed obj cb = liftIO $ connectButtonPressed obj cb SignalConnectBefore
afterButtonPressed :: (GObject a, MonadIO m) => a -> ButtonPressedCallback -> m SignalHandlerId
afterButtonPressed obj cb = connectButtonPressed obj cb SignalConnectAfter
connectButtonPressed :: (GObject a, MonadIO m) =>
a -> ButtonPressedCallback -> SignalConnectMode -> m SignalHandlerId
connectButtonPressed obj cb after = liftIO $ do
let cb' = wrap_ButtonPressedCallback cb
cb'' <- mk_ButtonPressedCallback cb'
connectSignalFunPtr obj "pressed" cb'' after
type ButtonReleasedCallback =
IO ()
noButtonReleasedCallback :: Maybe ButtonReleasedCallback
noButtonReleasedCallback = Nothing
type C_ButtonReleasedCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_ButtonReleasedCallback :: C_ButtonReleasedCallback -> IO (FunPtr C_ButtonReleasedCallback)
genClosure_ButtonReleased :: ButtonReleasedCallback -> IO Closure
genClosure_ButtonReleased cb = do
let cb' = wrap_ButtonReleasedCallback cb
mk_ButtonReleasedCallback cb' >>= newCClosure
wrap_ButtonReleasedCallback ::
ButtonReleasedCallback ->
Ptr () ->
Ptr () ->
IO ()
wrap_ButtonReleasedCallback _cb _ _ = do
_cb
onButtonReleased :: (GObject a, MonadIO m) => a -> ButtonReleasedCallback -> m SignalHandlerId
onButtonReleased obj cb = liftIO $ connectButtonReleased obj cb SignalConnectBefore
afterButtonReleased :: (GObject a, MonadIO m) => a -> ButtonReleasedCallback -> m SignalHandlerId
afterButtonReleased obj cb = connectButtonReleased obj cb SignalConnectAfter
connectButtonReleased :: (GObject a, MonadIO m) =>
a -> ButtonReleasedCallback -> SignalConnectMode -> m SignalHandlerId
connectButtonReleased obj cb after = liftIO $ do
let cb' = wrap_ButtonReleasedCallback cb
cb'' <- mk_ButtonReleasedCallback cb'
connectSignalFunPtr obj "released" cb'' after
getButtonAlwaysShowImage :: (MonadIO m, IsButton o) => o -> m Bool
getButtonAlwaysShowImage obj = liftIO $ getObjectPropertyBool obj "always-show-image"
setButtonAlwaysShowImage :: (MonadIO m, IsButton o) => o -> Bool -> m ()
setButtonAlwaysShowImage obj val = liftIO $ setObjectPropertyBool obj "always-show-image" val
constructButtonAlwaysShowImage :: (IsButton o) => Bool -> IO (GValueConstruct o)
constructButtonAlwaysShowImage val = constructObjectPropertyBool "always-show-image" val
data ButtonAlwaysShowImagePropertyInfo
instance AttrInfo ButtonAlwaysShowImagePropertyInfo where
type AttrAllowedOps ButtonAlwaysShowImagePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint ButtonAlwaysShowImagePropertyInfo = (~) Bool
type AttrBaseTypeConstraint ButtonAlwaysShowImagePropertyInfo = IsButton
type AttrGetType ButtonAlwaysShowImagePropertyInfo = Bool
type AttrLabel ButtonAlwaysShowImagePropertyInfo = "always-show-image"
type AttrOrigin ButtonAlwaysShowImagePropertyInfo = Button
attrGet _ = getButtonAlwaysShowImage
attrSet _ = setButtonAlwaysShowImage
attrConstruct _ = constructButtonAlwaysShowImage
attrClear _ = undefined
getButtonImage :: (MonadIO m, IsButton o) => o -> m (Maybe Gtk.Widget.Widget)
getButtonImage obj = liftIO $ getObjectPropertyObject obj "image" Gtk.Widget.Widget
setButtonImage :: (MonadIO m, IsButton o, Gtk.Widget.IsWidget a) => o -> a -> m ()
setButtonImage obj val = liftIO $ setObjectPropertyObject obj "image" (Just val)
constructButtonImage :: (IsButton o, Gtk.Widget.IsWidget a) => a -> IO (GValueConstruct o)
constructButtonImage val = constructObjectPropertyObject "image" (Just val)
data ButtonImagePropertyInfo
instance AttrInfo ButtonImagePropertyInfo where
type AttrAllowedOps ButtonImagePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint ButtonImagePropertyInfo = Gtk.Widget.IsWidget
type AttrBaseTypeConstraint ButtonImagePropertyInfo = IsButton
type AttrGetType ButtonImagePropertyInfo = (Maybe Gtk.Widget.Widget)
type AttrLabel ButtonImagePropertyInfo = "image"
type AttrOrigin ButtonImagePropertyInfo = Button
attrGet _ = getButtonImage
attrSet _ = setButtonImage
attrConstruct _ = constructButtonImage
attrClear _ = undefined
getButtonImagePosition :: (MonadIO m, IsButton o) => o -> m Gtk.Enums.PositionType
getButtonImagePosition obj = liftIO $ getObjectPropertyEnum obj "image-position"
setButtonImagePosition :: (MonadIO m, IsButton o) => o -> Gtk.Enums.PositionType -> m ()
setButtonImagePosition obj val = liftIO $ setObjectPropertyEnum obj "image-position" val
constructButtonImagePosition :: (IsButton o) => Gtk.Enums.PositionType -> IO (GValueConstruct o)
constructButtonImagePosition val = constructObjectPropertyEnum "image-position" val
data ButtonImagePositionPropertyInfo
instance AttrInfo ButtonImagePositionPropertyInfo where
type AttrAllowedOps ButtonImagePositionPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint ButtonImagePositionPropertyInfo = (~) Gtk.Enums.PositionType
type AttrBaseTypeConstraint ButtonImagePositionPropertyInfo = IsButton
type AttrGetType ButtonImagePositionPropertyInfo = Gtk.Enums.PositionType
type AttrLabel ButtonImagePositionPropertyInfo = "image-position"
type AttrOrigin ButtonImagePositionPropertyInfo = Button
attrGet _ = getButtonImagePosition
attrSet _ = setButtonImagePosition
attrConstruct _ = constructButtonImagePosition
attrClear _ = undefined
getButtonLabel :: (MonadIO m, IsButton o) => o -> m T.Text
getButtonLabel obj = liftIO $ checkUnexpectedNothing "getButtonLabel" $ getObjectPropertyString obj "label"
setButtonLabel :: (MonadIO m, IsButton o) => o -> T.Text -> m ()
setButtonLabel obj val = liftIO $ setObjectPropertyString obj "label" (Just val)
constructButtonLabel :: (IsButton o) => T.Text -> IO (GValueConstruct o)
constructButtonLabel val = constructObjectPropertyString "label" (Just val)
data ButtonLabelPropertyInfo
instance AttrInfo ButtonLabelPropertyInfo where
type AttrAllowedOps ButtonLabelPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint ButtonLabelPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint ButtonLabelPropertyInfo = IsButton
type AttrGetType ButtonLabelPropertyInfo = T.Text
type AttrLabel ButtonLabelPropertyInfo = "label"
type AttrOrigin ButtonLabelPropertyInfo = Button
attrGet _ = getButtonLabel
attrSet _ = setButtonLabel
attrConstruct _ = constructButtonLabel
attrClear _ = undefined
getButtonRelief :: (MonadIO m, IsButton o) => o -> m Gtk.Enums.ReliefStyle
getButtonRelief obj = liftIO $ getObjectPropertyEnum obj "relief"
setButtonRelief :: (MonadIO m, IsButton o) => o -> Gtk.Enums.ReliefStyle -> m ()
setButtonRelief obj val = liftIO $ setObjectPropertyEnum obj "relief" val
constructButtonRelief :: (IsButton o) => Gtk.Enums.ReliefStyle -> IO (GValueConstruct o)
constructButtonRelief val = constructObjectPropertyEnum "relief" val
data ButtonReliefPropertyInfo
instance AttrInfo ButtonReliefPropertyInfo where
type AttrAllowedOps ButtonReliefPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint ButtonReliefPropertyInfo = (~) Gtk.Enums.ReliefStyle
type AttrBaseTypeConstraint ButtonReliefPropertyInfo = IsButton
type AttrGetType ButtonReliefPropertyInfo = Gtk.Enums.ReliefStyle
type AttrLabel ButtonReliefPropertyInfo = "relief"
type AttrOrigin ButtonReliefPropertyInfo = Button
attrGet _ = getButtonRelief
attrSet _ = setButtonRelief
attrConstruct _ = constructButtonRelief
attrClear _ = undefined
getButtonUseStock :: (MonadIO m, IsButton o) => o -> m Bool
getButtonUseStock obj = liftIO $ getObjectPropertyBool obj "use-stock"
setButtonUseStock :: (MonadIO m, IsButton o) => o -> Bool -> m ()
setButtonUseStock obj val = liftIO $ setObjectPropertyBool obj "use-stock" val
constructButtonUseStock :: (IsButton o) => Bool -> IO (GValueConstruct o)
constructButtonUseStock val = constructObjectPropertyBool "use-stock" val
data ButtonUseStockPropertyInfo
instance AttrInfo ButtonUseStockPropertyInfo where
type AttrAllowedOps ButtonUseStockPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint ButtonUseStockPropertyInfo = (~) Bool
type AttrBaseTypeConstraint ButtonUseStockPropertyInfo = IsButton
type AttrGetType ButtonUseStockPropertyInfo = Bool
type AttrLabel ButtonUseStockPropertyInfo = "use-stock"
type AttrOrigin ButtonUseStockPropertyInfo = Button
attrGet _ = getButtonUseStock
attrSet _ = setButtonUseStock
attrConstruct _ = constructButtonUseStock
attrClear _ = undefined
getButtonUseUnderline :: (MonadIO m, IsButton o) => o -> m Bool
getButtonUseUnderline obj = liftIO $ getObjectPropertyBool obj "use-underline"
setButtonUseUnderline :: (MonadIO m, IsButton o) => o -> Bool -> m ()
setButtonUseUnderline obj val = liftIO $ setObjectPropertyBool obj "use-underline" val
constructButtonUseUnderline :: (IsButton o) => Bool -> IO (GValueConstruct o)
constructButtonUseUnderline val = constructObjectPropertyBool "use-underline" val
data ButtonUseUnderlinePropertyInfo
instance AttrInfo ButtonUseUnderlinePropertyInfo where
type AttrAllowedOps ButtonUseUnderlinePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint ButtonUseUnderlinePropertyInfo = (~) Bool
type AttrBaseTypeConstraint ButtonUseUnderlinePropertyInfo = IsButton
type AttrGetType ButtonUseUnderlinePropertyInfo = Bool
type AttrLabel ButtonUseUnderlinePropertyInfo = "use-underline"
type AttrOrigin ButtonUseUnderlinePropertyInfo = Button
attrGet _ = getButtonUseUnderline
attrSet _ = setButtonUseUnderline
attrConstruct _ = constructButtonUseUnderline
attrClear _ = undefined
getButtonXalign :: (MonadIO m, IsButton o) => o -> m Float
getButtonXalign obj = liftIO $ getObjectPropertyFloat obj "xalign"
setButtonXalign :: (MonadIO m, IsButton o) => o -> Float -> m ()
setButtonXalign obj val = liftIO $ setObjectPropertyFloat obj "xalign" val
constructButtonXalign :: (IsButton o) => Float -> IO (GValueConstruct o)
constructButtonXalign val = constructObjectPropertyFloat "xalign" val
data ButtonXalignPropertyInfo
instance AttrInfo ButtonXalignPropertyInfo where
type AttrAllowedOps ButtonXalignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint ButtonXalignPropertyInfo = (~) Float
type AttrBaseTypeConstraint ButtonXalignPropertyInfo = IsButton
type AttrGetType ButtonXalignPropertyInfo = Float
type AttrLabel ButtonXalignPropertyInfo = "xalign"
type AttrOrigin ButtonXalignPropertyInfo = Button
attrGet _ = getButtonXalign
attrSet _ = setButtonXalign
attrConstruct _ = constructButtonXalign
attrClear _ = undefined
getButtonYalign :: (MonadIO m, IsButton o) => o -> m Float
getButtonYalign obj = liftIO $ getObjectPropertyFloat obj "yalign"
setButtonYalign :: (MonadIO m, IsButton o) => o -> Float -> m ()
setButtonYalign obj val = liftIO $ setObjectPropertyFloat obj "yalign" val
constructButtonYalign :: (IsButton o) => Float -> IO (GValueConstruct o)
constructButtonYalign val = constructObjectPropertyFloat "yalign" val
data ButtonYalignPropertyInfo
instance AttrInfo ButtonYalignPropertyInfo where
type AttrAllowedOps ButtonYalignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint ButtonYalignPropertyInfo = (~) Float
type AttrBaseTypeConstraint ButtonYalignPropertyInfo = IsButton
type AttrGetType ButtonYalignPropertyInfo = Float
type AttrLabel ButtonYalignPropertyInfo = "yalign"
type AttrOrigin ButtonYalignPropertyInfo = Button
attrGet _ = getButtonYalign
attrSet _ = setButtonYalign
attrConstruct _ = constructButtonYalign
attrClear _ = undefined
instance O.HasAttributeList Button
type instance O.AttributeList Button = ButtonAttributeList
type ButtonAttributeList = ('[ '("actionName", Gtk.Actionable.ActionableActionNamePropertyInfo), '("actionTarget", Gtk.Actionable.ActionableActionTargetPropertyInfo), '("alwaysShowImage", ButtonAlwaysShowImagePropertyInfo), '("appPaintable", Gtk.Widget.WidgetAppPaintablePropertyInfo), '("borderWidth", Gtk.Container.ContainerBorderWidthPropertyInfo), '("canDefault", Gtk.Widget.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("child", Gtk.Container.ContainerChildPropertyInfo), '("compositeChild", Gtk.Widget.WidgetCompositeChildPropertyInfo), '("doubleBuffered", Gtk.Widget.WidgetDoubleBufferedPropertyInfo), '("events", Gtk.Widget.WidgetEventsPropertyInfo), '("expand", Gtk.Widget.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("image", ButtonImagePropertyInfo), '("imagePosition", ButtonImagePositionPropertyInfo), '("isFocus", Gtk.Widget.WidgetIsFocusPropertyInfo), '("label", ButtonLabelPropertyInfo), '("margin", Gtk.Widget.WidgetMarginPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.Widget.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.Widget.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("noShowAll", Gtk.Widget.WidgetNoShowAllPropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("relatedAction", Gtk.Activatable.ActivatableRelatedActionPropertyInfo), '("relief", ButtonReliefPropertyInfo), '("resizeMode", Gtk.Container.ContainerResizeModePropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("style", Gtk.Widget.WidgetStylePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("useActionAppearance", Gtk.Activatable.ActivatableUseActionAppearancePropertyInfo), '("useStock", ButtonUseStockPropertyInfo), '("useUnderline", ButtonUseUnderlinePropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("window", Gtk.Widget.WidgetWindowPropertyInfo), '("xalign", ButtonXalignPropertyInfo), '("yalign", ButtonYalignPropertyInfo)] :: [(Symbol, *)])
buttonAlwaysShowImage :: AttrLabelProxy "alwaysShowImage"
buttonAlwaysShowImage = AttrLabelProxy
buttonImage :: AttrLabelProxy "image"
buttonImage = AttrLabelProxy
buttonImagePosition :: AttrLabelProxy "imagePosition"
buttonImagePosition = AttrLabelProxy
buttonLabel :: AttrLabelProxy "label"
buttonLabel = AttrLabelProxy
buttonRelief :: AttrLabelProxy "relief"
buttonRelief = AttrLabelProxy
buttonUseStock :: AttrLabelProxy "useStock"
buttonUseStock = AttrLabelProxy
buttonUseUnderline :: AttrLabelProxy "useUnderline"
buttonUseUnderline = AttrLabelProxy
buttonXalign :: AttrLabelProxy "xalign"
buttonXalign = AttrLabelProxy
buttonYalign :: AttrLabelProxy "yalign"
buttonYalign = AttrLabelProxy
data ButtonActivateSignalInfo
instance SignalInfo ButtonActivateSignalInfo where
type HaskellCallbackType ButtonActivateSignalInfo = ButtonActivateCallback
connectSignal _ = connectButtonActivate
data ButtonClickedSignalInfo
instance SignalInfo ButtonClickedSignalInfo where
type HaskellCallbackType ButtonClickedSignalInfo = ButtonClickedCallback
connectSignal _ = connectButtonClicked
data ButtonEnterSignalInfo
instance SignalInfo ButtonEnterSignalInfo where
type HaskellCallbackType ButtonEnterSignalInfo = ButtonEnterCallback
connectSignal _ = connectButtonEnter
data ButtonLeaveSignalInfo
instance SignalInfo ButtonLeaveSignalInfo where
type HaskellCallbackType ButtonLeaveSignalInfo = ButtonLeaveCallback
connectSignal _ = connectButtonLeave
data ButtonPressedSignalInfo
instance SignalInfo ButtonPressedSignalInfo where
type HaskellCallbackType ButtonPressedSignalInfo = ButtonPressedCallback
connectSignal _ = connectButtonPressed
data ButtonReleasedSignalInfo
instance SignalInfo ButtonReleasedSignalInfo where
type HaskellCallbackType ButtonReleasedSignalInfo = ButtonReleasedCallback
connectSignal _ = connectButtonReleased
type instance O.SignalList Button = ButtonSignalList
type ButtonSignalList = ('[ '("accelClosuresChanged", Gtk.Widget.WidgetAccelClosuresChangedSignalInfo), '("activate", ButtonActivateSignalInfo), '("add", Gtk.Container.ContainerAddSignalInfo), '("buttonPressEvent", Gtk.Widget.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.Widget.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.Widget.WidgetCanActivateAccelSignalInfo), '("checkResize", Gtk.Container.ContainerCheckResizeSignalInfo), '("childNotify", Gtk.Widget.WidgetChildNotifySignalInfo), '("clicked", ButtonClickedSignalInfo), '("compositedChanged", Gtk.Widget.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.Widget.WidgetConfigureEventSignalInfo), '("damageEvent", Gtk.Widget.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.Widget.WidgetDeleteEventSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("destroyEvent", Gtk.Widget.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("dragBegin", Gtk.Widget.WidgetDragBeginSignalInfo), '("dragDataDelete", Gtk.Widget.WidgetDragDataDeleteSignalInfo), '("dragDataGet", Gtk.Widget.WidgetDragDataGetSignalInfo), '("dragDataReceived", Gtk.Widget.WidgetDragDataReceivedSignalInfo), '("dragDrop", Gtk.Widget.WidgetDragDropSignalInfo), '("dragEnd", Gtk.Widget.WidgetDragEndSignalInfo), '("dragFailed", Gtk.Widget.WidgetDragFailedSignalInfo), '("dragLeave", Gtk.Widget.WidgetDragLeaveSignalInfo), '("dragMotion", Gtk.Widget.WidgetDragMotionSignalInfo), '("draw", Gtk.Widget.WidgetDrawSignalInfo), '("enter", ButtonEnterSignalInfo), '("enterNotifyEvent", Gtk.Widget.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.Widget.WidgetEventSignalInfo), '("eventAfter", Gtk.Widget.WidgetEventAfterSignalInfo), '("focus", Gtk.Widget.WidgetFocusSignalInfo), '("focusInEvent", Gtk.Widget.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.Widget.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.Widget.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.Widget.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.Widget.WidgetGrabNotifySignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.Widget.WidgetHierarchyChangedSignalInfo), '("keyPressEvent", Gtk.Widget.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.Widget.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("leave", ButtonLeaveSignalInfo), '("leaveNotifyEvent", Gtk.Widget.WidgetLeaveNotifyEventSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mapEvent", Gtk.Widget.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.Widget.WidgetMotionNotifyEventSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("parentSet", Gtk.Widget.WidgetParentSetSignalInfo), '("popupMenu", Gtk.Widget.WidgetPopupMenuSignalInfo), '("pressed", ButtonPressedSignalInfo), '("propertyNotifyEvent", Gtk.Widget.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.Widget.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.Widget.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("released", ButtonReleasedSignalInfo), '("remove", Gtk.Container.ContainerRemoveSignalInfo), '("screenChanged", Gtk.Widget.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.Widget.WidgetScrollEventSignalInfo), '("selectionClearEvent", Gtk.Widget.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.Widget.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.Widget.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.Widget.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.Widget.WidgetSelectionRequestEventSignalInfo), '("setFocusChild", Gtk.Container.ContainerSetFocusChildSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("showHelp", Gtk.Widget.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.Widget.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.Widget.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.Widget.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.Widget.WidgetStyleUpdatedSignalInfo), '("touchEvent", Gtk.Widget.WidgetTouchEventSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.Widget.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.Widget.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.Widget.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])
foreign import ccall "gtk_button_new" gtk_button_new ::
IO (Ptr Button)
buttonNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m Button
buttonNew = liftIO $ do
result <- gtk_button_new
checkUnexpectedReturnNULL "buttonNew" result
result' <- (newObject Button) result
return result'
foreign import ccall "gtk_button_new_from_icon_name" gtk_button_new_from_icon_name ::
CString ->
Int32 ->
IO (Ptr Button)
buttonNewFromIconName ::
(B.CallStack.HasCallStack, MonadIO m) =>
T.Text
-> Int32
-> m Button
buttonNewFromIconName iconName size = liftIO $ do
iconName' <- textToCString iconName
result <- gtk_button_new_from_icon_name iconName' size
checkUnexpectedReturnNULL "buttonNewFromIconName" result
result' <- (newObject Button) result
freeMem iconName'
return result'
foreign import ccall "gtk_button_new_from_stock" gtk_button_new_from_stock ::
CString ->
IO (Ptr Button)
buttonNewFromStock ::
(B.CallStack.HasCallStack, MonadIO m) =>
T.Text
-> m Button
buttonNewFromStock stockId = liftIO $ do
stockId' <- textToCString stockId
result <- gtk_button_new_from_stock stockId'
checkUnexpectedReturnNULL "buttonNewFromStock" result
result' <- (newObject Button) result
freeMem stockId'
return result'
foreign import ccall "gtk_button_new_with_label" gtk_button_new_with_label ::
CString ->
IO (Ptr Button)
buttonNewWithLabel ::
(B.CallStack.HasCallStack, MonadIO m) =>
T.Text
-> m Button
buttonNewWithLabel label = liftIO $ do
label' <- textToCString label
result <- gtk_button_new_with_label label'
checkUnexpectedReturnNULL "buttonNewWithLabel" result
result' <- (newObject Button) result
freeMem label'
return result'
foreign import ccall "gtk_button_new_with_mnemonic" gtk_button_new_with_mnemonic ::
CString ->
IO (Ptr Button)
buttonNewWithMnemonic ::
(B.CallStack.HasCallStack, MonadIO m) =>
T.Text
-> m Button
buttonNewWithMnemonic label = liftIO $ do
label' <- textToCString label
result <- gtk_button_new_with_mnemonic label'
checkUnexpectedReturnNULL "buttonNewWithMnemonic" result
result' <- (newObject Button) result
freeMem label'
return result'
foreign import ccall "gtk_button_clicked" gtk_button_clicked ::
Ptr Button ->
IO ()
buttonClicked ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m ()
buttonClicked button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
gtk_button_clicked button'
touchManagedPtr button
return ()
data ButtonClickedMethodInfo
instance (signature ~ (m ()), MonadIO m, IsButton a) => O.MethodInfo ButtonClickedMethodInfo a signature where
overloadedMethod _ = buttonClicked
foreign import ccall "gtk_button_enter" gtk_button_enter ::
Ptr Button ->
IO ()
buttonEnter ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m ()
buttonEnter button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
gtk_button_enter button'
touchManagedPtr button
return ()
data ButtonEnterMethodInfo
instance (signature ~ (m ()), MonadIO m, IsButton a) => O.MethodInfo ButtonEnterMethodInfo a signature where
overloadedMethod _ = buttonEnter
foreign import ccall "gtk_button_get_alignment" gtk_button_get_alignment ::
Ptr Button ->
Ptr CFloat ->
Ptr CFloat ->
IO ()
buttonGetAlignment ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m (Float,Float)
buttonGetAlignment button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
xalign <- allocMem :: IO (Ptr CFloat)
yalign <- allocMem :: IO (Ptr CFloat)
gtk_button_get_alignment button' xalign yalign
xalign' <- peek xalign
let xalign'' = realToFrac xalign'
yalign' <- peek yalign
let yalign'' = realToFrac yalign'
touchManagedPtr button
freeMem xalign
freeMem yalign
return (xalign'', yalign'')
data ButtonGetAlignmentMethodInfo
instance (signature ~ (m (Float,Float)), MonadIO m, IsButton a) => O.MethodInfo ButtonGetAlignmentMethodInfo a signature where
overloadedMethod _ = buttonGetAlignment
foreign import ccall "gtk_button_get_always_show_image" gtk_button_get_always_show_image ::
Ptr Button ->
IO CInt
buttonGetAlwaysShowImage ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m Bool
buttonGetAlwaysShowImage button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
result <- gtk_button_get_always_show_image button'
let result' = (/= 0) result
touchManagedPtr button
return result'
data ButtonGetAlwaysShowImageMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsButton a) => O.MethodInfo ButtonGetAlwaysShowImageMethodInfo a signature where
overloadedMethod _ = buttonGetAlwaysShowImage
foreign import ccall "gtk_button_get_event_window" gtk_button_get_event_window ::
Ptr Button ->
IO (Ptr Gdk.Window.Window)
buttonGetEventWindow ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m Gdk.Window.Window
buttonGetEventWindow button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
result <- gtk_button_get_event_window button'
checkUnexpectedReturnNULL "buttonGetEventWindow" result
result' <- (newObject Gdk.Window.Window) result
touchManagedPtr button
return result'
data ButtonGetEventWindowMethodInfo
instance (signature ~ (m Gdk.Window.Window), MonadIO m, IsButton a) => O.MethodInfo ButtonGetEventWindowMethodInfo a signature where
overloadedMethod _ = buttonGetEventWindow
foreign import ccall "gtk_button_get_focus_on_click" gtk_button_get_focus_on_click ::
Ptr Button ->
IO CInt
buttonGetFocusOnClick ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m Bool
buttonGetFocusOnClick button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
result <- gtk_button_get_focus_on_click button'
let result' = (/= 0) result
touchManagedPtr button
return result'
data ButtonGetFocusOnClickMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsButton a) => O.MethodInfo ButtonGetFocusOnClickMethodInfo a signature where
overloadedMethod _ = buttonGetFocusOnClick
foreign import ccall "gtk_button_get_image" gtk_button_get_image ::
Ptr Button ->
IO (Ptr Gtk.Widget.Widget)
buttonGetImage ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m (Maybe Gtk.Widget.Widget)
buttonGetImage button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
result <- gtk_button_get_image button'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject Gtk.Widget.Widget) result'
return result''
touchManagedPtr button
return maybeResult
data ButtonGetImageMethodInfo
instance (signature ~ (m (Maybe Gtk.Widget.Widget)), MonadIO m, IsButton a) => O.MethodInfo ButtonGetImageMethodInfo a signature where
overloadedMethod _ = buttonGetImage
foreign import ccall "gtk_button_get_image_position" gtk_button_get_image_position ::
Ptr Button ->
IO CUInt
buttonGetImagePosition ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m Gtk.Enums.PositionType
buttonGetImagePosition button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
result <- gtk_button_get_image_position button'
let result' = (toEnum . fromIntegral) result
touchManagedPtr button
return result'
data ButtonGetImagePositionMethodInfo
instance (signature ~ (m Gtk.Enums.PositionType), MonadIO m, IsButton a) => O.MethodInfo ButtonGetImagePositionMethodInfo a signature where
overloadedMethod _ = buttonGetImagePosition
foreign import ccall "gtk_button_get_label" gtk_button_get_label ::
Ptr Button ->
IO CString
buttonGetLabel ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m T.Text
buttonGetLabel button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
result <- gtk_button_get_label button'
checkUnexpectedReturnNULL "buttonGetLabel" result
result' <- cstringToText result
touchManagedPtr button
return result'
data ButtonGetLabelMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsButton a) => O.MethodInfo ButtonGetLabelMethodInfo a signature where
overloadedMethod _ = buttonGetLabel
foreign import ccall "gtk_button_get_relief" gtk_button_get_relief ::
Ptr Button ->
IO CUInt
buttonGetRelief ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m Gtk.Enums.ReliefStyle
buttonGetRelief button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
result <- gtk_button_get_relief button'
let result' = (toEnum . fromIntegral) result
touchManagedPtr button
return result'
data ButtonGetReliefMethodInfo
instance (signature ~ (m Gtk.Enums.ReliefStyle), MonadIO m, IsButton a) => O.MethodInfo ButtonGetReliefMethodInfo a signature where
overloadedMethod _ = buttonGetRelief
foreign import ccall "gtk_button_get_use_stock" gtk_button_get_use_stock ::
Ptr Button ->
IO CInt
buttonGetUseStock ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m Bool
buttonGetUseStock button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
result <- gtk_button_get_use_stock button'
let result' = (/= 0) result
touchManagedPtr button
return result'
data ButtonGetUseStockMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsButton a) => O.MethodInfo ButtonGetUseStockMethodInfo a signature where
overloadedMethod _ = buttonGetUseStock
foreign import ccall "gtk_button_get_use_underline" gtk_button_get_use_underline ::
Ptr Button ->
IO CInt
buttonGetUseUnderline ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m Bool
buttonGetUseUnderline button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
result <- gtk_button_get_use_underline button'
let result' = (/= 0) result
touchManagedPtr button
return result'
data ButtonGetUseUnderlineMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsButton a) => O.MethodInfo ButtonGetUseUnderlineMethodInfo a signature where
overloadedMethod _ = buttonGetUseUnderline
foreign import ccall "gtk_button_leave" gtk_button_leave ::
Ptr Button ->
IO ()
buttonLeave ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m ()
buttonLeave button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
gtk_button_leave button'
touchManagedPtr button
return ()
data ButtonLeaveMethodInfo
instance (signature ~ (m ()), MonadIO m, IsButton a) => O.MethodInfo ButtonLeaveMethodInfo a signature where
overloadedMethod _ = buttonLeave
foreign import ccall "gtk_button_pressed" gtk_button_pressed ::
Ptr Button ->
IO ()
buttonPressed ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m ()
buttonPressed button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
gtk_button_pressed button'
touchManagedPtr button
return ()
data ButtonPressedMethodInfo
instance (signature ~ (m ()), MonadIO m, IsButton a) => O.MethodInfo ButtonPressedMethodInfo a signature where
overloadedMethod _ = buttonPressed
foreign import ccall "gtk_button_released" gtk_button_released ::
Ptr Button ->
IO ()
buttonReleased ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> m ()
buttonReleased button = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
gtk_button_released button'
touchManagedPtr button
return ()
data ButtonReleasedMethodInfo
instance (signature ~ (m ()), MonadIO m, IsButton a) => O.MethodInfo ButtonReleasedMethodInfo a signature where
overloadedMethod _ = buttonReleased
foreign import ccall "gtk_button_set_alignment" gtk_button_set_alignment ::
Ptr Button ->
CFloat ->
CFloat ->
IO ()
buttonSetAlignment ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> Float
-> Float
-> m ()
buttonSetAlignment button xalign yalign = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
let xalign' = realToFrac xalign
let yalign' = realToFrac yalign
gtk_button_set_alignment button' xalign' yalign'
touchManagedPtr button
return ()
data ButtonSetAlignmentMethodInfo
instance (signature ~ (Float -> Float -> m ()), MonadIO m, IsButton a) => O.MethodInfo ButtonSetAlignmentMethodInfo a signature where
overloadedMethod _ = buttonSetAlignment
foreign import ccall "gtk_button_set_always_show_image" gtk_button_set_always_show_image ::
Ptr Button ->
CInt ->
IO ()
buttonSetAlwaysShowImage ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> Bool
-> m ()
buttonSetAlwaysShowImage button alwaysShow = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
let alwaysShow' = (fromIntegral . fromEnum) alwaysShow
gtk_button_set_always_show_image button' alwaysShow'
touchManagedPtr button
return ()
data ButtonSetAlwaysShowImageMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsButton a) => O.MethodInfo ButtonSetAlwaysShowImageMethodInfo a signature where
overloadedMethod _ = buttonSetAlwaysShowImage
foreign import ccall "gtk_button_set_focus_on_click" gtk_button_set_focus_on_click ::
Ptr Button ->
CInt ->
IO ()
buttonSetFocusOnClick ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> Bool
-> m ()
buttonSetFocusOnClick button focusOnClick = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
let focusOnClick' = (fromIntegral . fromEnum) focusOnClick
gtk_button_set_focus_on_click button' focusOnClick'
touchManagedPtr button
return ()
data ButtonSetFocusOnClickMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsButton a) => O.MethodInfo ButtonSetFocusOnClickMethodInfo a signature where
overloadedMethod _ = buttonSetFocusOnClick
foreign import ccall "gtk_button_set_image" gtk_button_set_image ::
Ptr Button ->
Ptr Gtk.Widget.Widget ->
IO ()
buttonSetImage ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m ()
buttonSetImage button image = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
image' <- unsafeManagedPtrCastPtr image
gtk_button_set_image button' image'
touchManagedPtr button
touchManagedPtr image
return ()
data ButtonSetImageMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsButton a, Gtk.Widget.IsWidget b) => O.MethodInfo ButtonSetImageMethodInfo a signature where
overloadedMethod _ = buttonSetImage
foreign import ccall "gtk_button_set_image_position" gtk_button_set_image_position ::
Ptr Button ->
CUInt ->
IO ()
buttonSetImagePosition ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> Gtk.Enums.PositionType
-> m ()
buttonSetImagePosition button position = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
let position' = (fromIntegral . fromEnum) position
gtk_button_set_image_position button' position'
touchManagedPtr button
return ()
data ButtonSetImagePositionMethodInfo
instance (signature ~ (Gtk.Enums.PositionType -> m ()), MonadIO m, IsButton a) => O.MethodInfo ButtonSetImagePositionMethodInfo a signature where
overloadedMethod _ = buttonSetImagePosition
foreign import ccall "gtk_button_set_label" gtk_button_set_label ::
Ptr Button ->
CString ->
IO ()
buttonSetLabel ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> T.Text
-> m ()
buttonSetLabel button label = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
label' <- textToCString label
gtk_button_set_label button' label'
touchManagedPtr button
freeMem label'
return ()
data ButtonSetLabelMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsButton a) => O.MethodInfo ButtonSetLabelMethodInfo a signature where
overloadedMethod _ = buttonSetLabel
foreign import ccall "gtk_button_set_relief" gtk_button_set_relief ::
Ptr Button ->
CUInt ->
IO ()
buttonSetRelief ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> Gtk.Enums.ReliefStyle
-> m ()
buttonSetRelief button relief = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
let relief' = (fromIntegral . fromEnum) relief
gtk_button_set_relief button' relief'
touchManagedPtr button
return ()
data ButtonSetReliefMethodInfo
instance (signature ~ (Gtk.Enums.ReliefStyle -> m ()), MonadIO m, IsButton a) => O.MethodInfo ButtonSetReliefMethodInfo a signature where
overloadedMethod _ = buttonSetRelief
foreign import ccall "gtk_button_set_use_stock" gtk_button_set_use_stock ::
Ptr Button ->
CInt ->
IO ()
buttonSetUseStock ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> Bool
-> m ()
buttonSetUseStock button useStock = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
let useStock' = (fromIntegral . fromEnum) useStock
gtk_button_set_use_stock button' useStock'
touchManagedPtr button
return ()
data ButtonSetUseStockMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsButton a) => O.MethodInfo ButtonSetUseStockMethodInfo a signature where
overloadedMethod _ = buttonSetUseStock
foreign import ccall "gtk_button_set_use_underline" gtk_button_set_use_underline ::
Ptr Button ->
CInt ->
IO ()
buttonSetUseUnderline ::
(B.CallStack.HasCallStack, MonadIO m, IsButton a) =>
a
-> Bool
-> m ()
buttonSetUseUnderline button useUnderline = liftIO $ do
button' <- unsafeManagedPtrCastPtr button
let useUnderline' = (fromIntegral . fromEnum) useUnderline
gtk_button_set_use_underline button' useUnderline'
touchManagedPtr button
return ()
data ButtonSetUseUnderlineMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsButton a) => O.MethodInfo ButtonSetUseUnderlineMethodInfo a signature where
overloadedMethod _ = buttonSetUseUnderline