{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gtk.Objects.FontButton
(
FontButton(..) ,
IsFontButton ,
toFontButton ,
noFontButton ,
#if defined(ENABLE_OVERLOADING)
ResolveFontButtonMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
FontButtonGetTitleMethodInfo ,
#endif
fontButtonGetTitle ,
#if defined(ENABLE_OVERLOADING)
FontButtonGetUseFontMethodInfo ,
#endif
fontButtonGetUseFont ,
#if defined(ENABLE_OVERLOADING)
FontButtonGetUseSizeMethodInfo ,
#endif
fontButtonGetUseSize ,
fontButtonNew ,
fontButtonNewWithFont ,
#if defined(ENABLE_OVERLOADING)
FontButtonSetTitleMethodInfo ,
#endif
fontButtonSetTitle ,
#if defined(ENABLE_OVERLOADING)
FontButtonSetUseFontMethodInfo ,
#endif
fontButtonSetUseFont ,
#if defined(ENABLE_OVERLOADING)
FontButtonSetUseSizeMethodInfo ,
#endif
fontButtonSetUseSize ,
#if defined(ENABLE_OVERLOADING)
FontButtonTitlePropertyInfo ,
#endif
constructFontButtonTitle ,
#if defined(ENABLE_OVERLOADING)
fontButtonTitle ,
#endif
getFontButtonTitle ,
setFontButtonTitle ,
#if defined(ENABLE_OVERLOADING)
FontButtonUseFontPropertyInfo ,
#endif
constructFontButtonUseFont ,
#if defined(ENABLE_OVERLOADING)
fontButtonUseFont ,
#endif
getFontButtonUseFont ,
setFontButtonUseFont ,
#if defined(ENABLE_OVERLOADING)
FontButtonUseSizePropertyInfo ,
#endif
constructFontButtonUseSize ,
#if defined(ENABLE_OVERLOADING)
fontButtonUseSize ,
#endif
getFontButtonUseSize ,
setFontButtonUseSize ,
C_FontButtonFontSetCallback ,
FontButtonFontSetCallback ,
#if defined(ENABLE_OVERLOADING)
FontButtonFontSetSignalInfo ,
#endif
afterFontButtonFontSet ,
genClosure_FontButtonFontSet ,
mk_FontButtonFontSetCallback ,
noFontButtonFontSetCallback ,
onFontButtonFontSet ,
wrap_FontButtonFontSetCallback ,
) 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.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.FontChooser as Gtk.FontChooser
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype FontButton = FontButton (ManagedPtr FontButton)
deriving (FontButton -> FontButton -> Bool
(FontButton -> FontButton -> Bool)
-> (FontButton -> FontButton -> Bool) -> Eq FontButton
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: FontButton -> FontButton -> Bool
$c/= :: FontButton -> FontButton -> Bool
== :: FontButton -> FontButton -> Bool
$c== :: FontButton -> FontButton -> Bool
Eq)
foreign import ccall "gtk_font_button_get_type"
c_gtk_font_button_get_type :: IO GType
instance GObject FontButton where
gobjectType :: IO GType
gobjectType = IO GType
c_gtk_font_button_get_type
instance B.GValue.IsGValue FontButton where
toGValue :: FontButton -> IO GValue
toGValue o :: FontButton
o = do
GType
gtype <- IO GType
c_gtk_font_button_get_type
FontButton -> (Ptr FontButton -> IO GValue) -> IO GValue
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr FontButton
o (GType
-> (GValue -> Ptr FontButton -> IO ())
-> Ptr FontButton
-> IO GValue
forall a. GType -> (GValue -> a -> IO ()) -> a -> IO GValue
B.GValue.buildGValue GType
gtype GValue -> Ptr FontButton -> IO ()
forall a. GObject a => GValue -> Ptr a -> IO ()
B.GValue.set_object)
fromGValue :: GValue -> IO FontButton
fromGValue gv :: GValue
gv = do
Ptr FontButton
ptr <- GValue -> IO (Ptr FontButton)
forall b. GObject b => GValue -> IO (Ptr b)
B.GValue.get_object GValue
gv :: IO (Ptr FontButton)
(ManagedPtr FontButton -> FontButton)
-> Ptr FontButton -> IO FontButton
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr FontButton -> FontButton
FontButton Ptr FontButton
ptr
class (GObject o, O.IsDescendantOf FontButton o) => IsFontButton o
instance (GObject o, O.IsDescendantOf FontButton o) => IsFontButton o
instance O.HasParentTypes FontButton
type instance O.ParentTypes FontButton = '[Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable, Gtk.FontChooser.FontChooser]
toFontButton :: (MonadIO m, IsFontButton o) => o -> m FontButton
toFontButton :: o -> m FontButton
toFontButton = IO FontButton -> m FontButton
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO FontButton -> m FontButton)
-> (o -> IO FontButton) -> o -> m FontButton
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr FontButton -> FontButton) -> o -> IO FontButton
forall o o'.
(HasCallStack, GObject o, GObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
unsafeCastTo ManagedPtr FontButton -> FontButton
FontButton
noFontButton :: Maybe FontButton
noFontButton :: Maybe FontButton
noFontButton = Maybe FontButton
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveFontButtonMethod (t :: Symbol) (o :: *) :: * where
ResolveFontButtonMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveFontButtonMethod "activateAction" o = Gtk.Widget.WidgetActivateActionMethodInfo
ResolveFontButtonMethod "activateDefault" o = Gtk.Widget.WidgetActivateDefaultMethodInfo
ResolveFontButtonMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolveFontButtonMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveFontButtonMethod "addController" o = Gtk.Widget.WidgetAddControllerMethodInfo
ResolveFontButtonMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveFontButtonMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveFontButtonMethod "allocate" o = Gtk.Widget.WidgetAllocateMethodInfo
ResolveFontButtonMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveFontButtonMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveFontButtonMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolveFontButtonMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveFontButtonMethod "computeBounds" o = Gtk.Widget.WidgetComputeBoundsMethodInfo
ResolveFontButtonMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveFontButtonMethod "computePoint" o = Gtk.Widget.WidgetComputePointMethodInfo
ResolveFontButtonMethod "computeTransform" o = Gtk.Widget.WidgetComputeTransformMethodInfo
ResolveFontButtonMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveFontButtonMethod "contains" o = Gtk.Widget.WidgetContainsMethodInfo
ResolveFontButtonMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveFontButtonMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveFontButtonMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveFontButtonMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveFontButtonMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveFontButtonMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolveFontButtonMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolveFontButtonMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveFontButtonMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolveFontButtonMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveFontButtonMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolveFontButtonMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolveFontButtonMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolveFontButtonMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolveFontButtonMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolveFontButtonMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolveFontButtonMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolveFontButtonMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolveFontButtonMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolveFontButtonMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolveFontButtonMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolveFontButtonMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolveFontButtonMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolveFontButtonMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolveFontButtonMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolveFontButtonMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolveFontButtonMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolveFontButtonMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolveFontButtonMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolveFontButtonMethod "dragSourceSetIconPaintable" o = Gtk.Widget.WidgetDragSourceSetIconPaintableMethodInfo
ResolveFontButtonMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolveFontButtonMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolveFontButtonMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolveFontButtonMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveFontButtonMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolveFontButtonMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveFontButtonMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveFontButtonMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveFontButtonMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolveFontButtonMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveFontButtonMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolveFontButtonMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveFontButtonMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveFontButtonMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolveFontButtonMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveFontButtonMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveFontButtonMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveFontButtonMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveFontButtonMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolveFontButtonMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveFontButtonMethod "insertAfter" o = Gtk.Widget.WidgetInsertAfterMethodInfo
ResolveFontButtonMethod "insertBefore" o = Gtk.Widget.WidgetInsertBeforeMethodInfo
ResolveFontButtonMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveFontButtonMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveFontButtonMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveFontButtonMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveFontButtonMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveFontButtonMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolveFontButtonMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveFontButtonMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveFontButtonMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolveFontButtonMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolveFontButtonMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveFontButtonMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveFontButtonMethod "measure" o = Gtk.Widget.WidgetMeasureMethodInfo
ResolveFontButtonMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveFontButtonMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveFontButtonMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveFontButtonMethod "observeChildren" o = Gtk.Widget.WidgetObserveChildrenMethodInfo
ResolveFontButtonMethod "observeControllers" o = Gtk.Widget.WidgetObserveControllersMethodInfo
ResolveFontButtonMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveFontButtonMethod "pick" o = Gtk.Widget.WidgetPickMethodInfo
ResolveFontButtonMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveFontButtonMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolveFontButtonMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveFontButtonMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveFontButtonMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolveFontButtonMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveFontButtonMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveFontButtonMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveFontButtonMethod "registerSurface" o = Gtk.Widget.WidgetRegisterSurfaceMethodInfo
ResolveFontButtonMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolveFontButtonMethod "removeController" o = Gtk.Widget.WidgetRemoveControllerMethodInfo
ResolveFontButtonMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveFontButtonMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveFontButtonMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolveFontButtonMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveFontButtonMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveFontButtonMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveFontButtonMethod "snapshotChild" o = Gtk.Widget.WidgetSnapshotChildMethodInfo
ResolveFontButtonMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveFontButtonMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveFontButtonMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveFontButtonMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveFontButtonMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveFontButtonMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveFontButtonMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveFontButtonMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveFontButtonMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveFontButtonMethod "unregisterSurface" o = Gtk.Widget.WidgetUnregisterSurfaceMethodInfo
ResolveFontButtonMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveFontButtonMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveFontButtonMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveFontButtonMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolveFontButtonMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveFontButtonMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveFontButtonMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveFontButtonMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveFontButtonMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveFontButtonMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveFontButtonMethod "getCanTarget" o = Gtk.Widget.WidgetGetCanTargetMethodInfo
ResolveFontButtonMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveFontButtonMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveFontButtonMethod "getCursor" o = Gtk.Widget.WidgetGetCursorMethodInfo
ResolveFontButtonMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveFontButtonMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveFontButtonMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveFontButtonMethod "getFirstChild" o = Gtk.Widget.WidgetGetFirstChildMethodInfo
ResolveFontButtonMethod "getFocusChild" o = Gtk.Widget.WidgetGetFocusChildMethodInfo
ResolveFontButtonMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveFontButtonMethod "getFont" o = Gtk.FontChooser.FontChooserGetFontMethodInfo
ResolveFontButtonMethod "getFontDesc" o = Gtk.FontChooser.FontChooserGetFontDescMethodInfo
ResolveFontButtonMethod "getFontFace" o = Gtk.FontChooser.FontChooserGetFontFaceMethodInfo
ResolveFontButtonMethod "getFontFamily" o = Gtk.FontChooser.FontChooserGetFontFamilyMethodInfo
ResolveFontButtonMethod "getFontFeatures" o = Gtk.FontChooser.FontChooserGetFontFeaturesMethodInfo
ResolveFontButtonMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveFontButtonMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveFontButtonMethod "getFontSize" o = Gtk.FontChooser.FontChooserGetFontSizeMethodInfo
ResolveFontButtonMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveFontButtonMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveFontButtonMethod "getHasSurface" o = Gtk.Widget.WidgetGetHasSurfaceMethodInfo
ResolveFontButtonMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveFontButtonMethod "getHeight" o = Gtk.Widget.WidgetGetHeightMethodInfo
ResolveFontButtonMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveFontButtonMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveFontButtonMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveFontButtonMethod "getLanguage" o = Gtk.FontChooser.FontChooserGetLanguageMethodInfo
ResolveFontButtonMethod "getLastChild" o = Gtk.Widget.WidgetGetLastChildMethodInfo
ResolveFontButtonMethod "getLayoutManager" o = Gtk.Widget.WidgetGetLayoutManagerMethodInfo
ResolveFontButtonMethod "getLevel" o = Gtk.FontChooser.FontChooserGetLevelMethodInfo
ResolveFontButtonMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveFontButtonMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveFontButtonMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveFontButtonMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveFontButtonMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveFontButtonMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolveFontButtonMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveFontButtonMethod "getNextSibling" o = Gtk.Widget.WidgetGetNextSiblingMethodInfo
ResolveFontButtonMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveFontButtonMethod "getOverflow" o = Gtk.Widget.WidgetGetOverflowMethodInfo
ResolveFontButtonMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveFontButtonMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveFontButtonMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolveFontButtonMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveFontButtonMethod "getPrevSibling" o = Gtk.Widget.WidgetGetPrevSiblingMethodInfo
ResolveFontButtonMethod "getPreviewText" o = Gtk.FontChooser.FontChooserGetPreviewTextMethodInfo
ResolveFontButtonMethod "getPrimaryClipboard" o = Gtk.Widget.WidgetGetPrimaryClipboardMethodInfo
ResolveFontButtonMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveFontButtonMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveFontButtonMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveFontButtonMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveFontButtonMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveFontButtonMethod "getRoot" o = Gtk.Widget.WidgetGetRootMethodInfo
ResolveFontButtonMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveFontButtonMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveFontButtonMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveFontButtonMethod "getShowPreviewEntry" o = Gtk.FontChooser.FontChooserGetShowPreviewEntryMethodInfo
ResolveFontButtonMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveFontButtonMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveFontButtonMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveFontButtonMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveFontButtonMethod "getSurface" o = Gtk.Widget.WidgetGetSurfaceMethodInfo
ResolveFontButtonMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveFontButtonMethod "getTitle" o = FontButtonGetTitleMethodInfo
ResolveFontButtonMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveFontButtonMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveFontButtonMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolveFontButtonMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolveFontButtonMethod "getUseFont" o = FontButtonGetUseFontMethodInfo
ResolveFontButtonMethod "getUseSize" o = FontButtonGetUseSizeMethodInfo
ResolveFontButtonMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveFontButtonMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveFontButtonMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveFontButtonMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveFontButtonMethod "getWidth" o = Gtk.Widget.WidgetGetWidthMethodInfo
ResolveFontButtonMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolveFontButtonMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveFontButtonMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveFontButtonMethod "setCanTarget" o = Gtk.Widget.WidgetSetCanTargetMethodInfo
ResolveFontButtonMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveFontButtonMethod "setCursor" o = Gtk.Widget.WidgetSetCursorMethodInfo
ResolveFontButtonMethod "setCursorFromName" o = Gtk.Widget.WidgetSetCursorFromNameMethodInfo
ResolveFontButtonMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveFontButtonMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveFontButtonMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveFontButtonMethod "setFilterFunc" o = Gtk.FontChooser.FontChooserSetFilterFuncMethodInfo
ResolveFontButtonMethod "setFocusChild" o = Gtk.Widget.WidgetSetFocusChildMethodInfo
ResolveFontButtonMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveFontButtonMethod "setFont" o = Gtk.FontChooser.FontChooserSetFontMethodInfo
ResolveFontButtonMethod "setFontDesc" o = Gtk.FontChooser.FontChooserSetFontDescMethodInfo
ResolveFontButtonMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveFontButtonMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveFontButtonMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveFontButtonMethod "setHasSurface" o = Gtk.Widget.WidgetSetHasSurfaceMethodInfo
ResolveFontButtonMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveFontButtonMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveFontButtonMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveFontButtonMethod "setLanguage" o = Gtk.FontChooser.FontChooserSetLanguageMethodInfo
ResolveFontButtonMethod "setLayoutManager" o = Gtk.Widget.WidgetSetLayoutManagerMethodInfo
ResolveFontButtonMethod "setLevel" o = Gtk.FontChooser.FontChooserSetLevelMethodInfo
ResolveFontButtonMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveFontButtonMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveFontButtonMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveFontButtonMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveFontButtonMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveFontButtonMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveFontButtonMethod "setOverflow" o = Gtk.Widget.WidgetSetOverflowMethodInfo
ResolveFontButtonMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveFontButtonMethod "setPreviewText" o = Gtk.FontChooser.FontChooserSetPreviewTextMethodInfo
ResolveFontButtonMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveFontButtonMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveFontButtonMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveFontButtonMethod "setShowPreviewEntry" o = Gtk.FontChooser.FontChooserSetShowPreviewEntryMethodInfo
ResolveFontButtonMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveFontButtonMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveFontButtonMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveFontButtonMethod "setSurface" o = Gtk.Widget.WidgetSetSurfaceMethodInfo
ResolveFontButtonMethod "setTitle" o = FontButtonSetTitleMethodInfo
ResolveFontButtonMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveFontButtonMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveFontButtonMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolveFontButtonMethod "setUseFont" o = FontButtonSetUseFontMethodInfo
ResolveFontButtonMethod "setUseSize" o = FontButtonSetUseSizeMethodInfo
ResolveFontButtonMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveFontButtonMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveFontButtonMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveFontButtonMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveFontButtonMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveFontButtonMethod t FontButton, O.MethodInfo info FontButton p) => OL.IsLabel t (FontButton -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#endif
type FontButtonFontSetCallback =
IO ()
noFontButtonFontSetCallback :: Maybe FontButtonFontSetCallback
noFontButtonFontSetCallback :: Maybe (IO ())
noFontButtonFontSetCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_FontButtonFontSetCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_FontButtonFontSetCallback :: C_FontButtonFontSetCallback -> IO (FunPtr C_FontButtonFontSetCallback)
genClosure_FontButtonFontSet :: MonadIO m => FontButtonFontSetCallback -> m (GClosure C_FontButtonFontSetCallback)
genClosure_FontButtonFontSet :: IO () -> m (GClosure C_FontButtonFontSetCallback)
genClosure_FontButtonFontSet cb :: IO ()
cb = IO (GClosure C_FontButtonFontSetCallback)
-> m (GClosure C_FontButtonFontSetCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_FontButtonFontSetCallback)
-> m (GClosure C_FontButtonFontSetCallback))
-> IO (GClosure C_FontButtonFontSetCallback)
-> m (GClosure C_FontButtonFontSetCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_FontButtonFontSetCallback
cb' = IO () -> C_FontButtonFontSetCallback
wrap_FontButtonFontSetCallback IO ()
cb
C_FontButtonFontSetCallback
-> IO (FunPtr C_FontButtonFontSetCallback)
mk_FontButtonFontSetCallback C_FontButtonFontSetCallback
cb' IO (FunPtr C_FontButtonFontSetCallback)
-> (FunPtr C_FontButtonFontSetCallback
-> IO (GClosure C_FontButtonFontSetCallback))
-> IO (GClosure C_FontButtonFontSetCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_FontButtonFontSetCallback
-> IO (GClosure C_FontButtonFontSetCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_FontButtonFontSetCallback ::
FontButtonFontSetCallback ->
C_FontButtonFontSetCallback
wrap_FontButtonFontSetCallback :: IO () -> C_FontButtonFontSetCallback
wrap_FontButtonFontSetCallback _cb :: IO ()
_cb _ _ = do
IO ()
_cb
onFontButtonFontSet :: (IsFontButton a, MonadIO m) => a -> FontButtonFontSetCallback -> m SignalHandlerId
onFontButtonFontSet :: a -> IO () -> m SignalHandlerId
onFontButtonFontSet obj :: a
obj cb :: IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_FontButtonFontSetCallback
cb' = IO () -> C_FontButtonFontSetCallback
wrap_FontButtonFontSetCallback IO ()
cb
FunPtr C_FontButtonFontSetCallback
cb'' <- C_FontButtonFontSetCallback
-> IO (FunPtr C_FontButtonFontSetCallback)
mk_FontButtonFontSetCallback C_FontButtonFontSetCallback
cb'
a
-> Text
-> FunPtr C_FontButtonFontSetCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "font-set" FunPtr C_FontButtonFontSetCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterFontButtonFontSet :: (IsFontButton a, MonadIO m) => a -> FontButtonFontSetCallback -> m SignalHandlerId
afterFontButtonFontSet :: a -> IO () -> m SignalHandlerId
afterFontButtonFontSet obj :: a
obj cb :: IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_FontButtonFontSetCallback
cb' = IO () -> C_FontButtonFontSetCallback
wrap_FontButtonFontSetCallback IO ()
cb
FunPtr C_FontButtonFontSetCallback
cb'' <- C_FontButtonFontSetCallback
-> IO (FunPtr C_FontButtonFontSetCallback)
mk_FontButtonFontSetCallback C_FontButtonFontSetCallback
cb'
a
-> Text
-> FunPtr C_FontButtonFontSetCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj "font-set" FunPtr C_FontButtonFontSetCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data FontButtonFontSetSignalInfo
instance SignalInfo FontButtonFontSetSignalInfo where
type HaskellCallbackType FontButtonFontSetSignalInfo = FontButtonFontSetCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_FontButtonFontSetCallback cb
cb'' <- mk_FontButtonFontSetCallback cb'
connectSignalFunPtr obj "font-set" cb'' connectMode detail
#endif
getFontButtonTitle :: (MonadIO m, IsFontButton o) => o -> m T.Text
getFontButtonTitle :: o -> m Text
getFontButtonTitle obj :: o
obj = IO Text -> m Text
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe Text) -> IO Text
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing "getFontButtonTitle" (IO (Maybe Text) -> IO Text) -> IO (Maybe Text) -> IO Text
forall a b. (a -> b) -> a -> b
$ o -> String -> IO (Maybe Text)
forall a. GObject a => a -> String -> IO (Maybe Text)
B.Properties.getObjectPropertyString o
obj "title"
setFontButtonTitle :: (MonadIO m, IsFontButton o) => o -> T.Text -> m ()
setFontButtonTitle :: o -> Text -> m ()
setFontButtonTitle obj :: o
obj val :: Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj "title" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructFontButtonTitle :: (IsFontButton o) => T.Text -> IO (GValueConstruct o)
constructFontButtonTitle :: Text -> IO (GValueConstruct o)
constructFontButtonTitle val :: Text
val = String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString "title" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
#if defined(ENABLE_OVERLOADING)
data FontButtonTitlePropertyInfo
instance AttrInfo FontButtonTitlePropertyInfo where
type AttrAllowedOps FontButtonTitlePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint FontButtonTitlePropertyInfo = IsFontButton
type AttrSetTypeConstraint FontButtonTitlePropertyInfo = (~) T.Text
type AttrTransferTypeConstraint FontButtonTitlePropertyInfo = (~) T.Text
type AttrTransferType FontButtonTitlePropertyInfo = T.Text
type AttrGetType FontButtonTitlePropertyInfo = T.Text
type AttrLabel FontButtonTitlePropertyInfo = "title"
type AttrOrigin FontButtonTitlePropertyInfo = FontButton
attrGet = getFontButtonTitle
attrSet = setFontButtonTitle
attrTransfer _ v = do
return v
attrConstruct = constructFontButtonTitle
attrClear = undefined
#endif
getFontButtonUseFont :: (MonadIO m, IsFontButton o) => o -> m Bool
getFontButtonUseFont :: o -> m Bool
getFontButtonUseFont obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "use-font"
setFontButtonUseFont :: (MonadIO m, IsFontButton o) => o -> Bool -> m ()
setFontButtonUseFont :: o -> Bool -> m ()
setFontButtonUseFont obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "use-font" Bool
val
constructFontButtonUseFont :: (IsFontButton o) => Bool -> IO (GValueConstruct o)
constructFontButtonUseFont :: Bool -> IO (GValueConstruct o)
constructFontButtonUseFont val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "use-font" Bool
val
#if defined(ENABLE_OVERLOADING)
data FontButtonUseFontPropertyInfo
instance AttrInfo FontButtonUseFontPropertyInfo where
type AttrAllowedOps FontButtonUseFontPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint FontButtonUseFontPropertyInfo = IsFontButton
type AttrSetTypeConstraint FontButtonUseFontPropertyInfo = (~) Bool
type AttrTransferTypeConstraint FontButtonUseFontPropertyInfo = (~) Bool
type AttrTransferType FontButtonUseFontPropertyInfo = Bool
type AttrGetType FontButtonUseFontPropertyInfo = Bool
type AttrLabel FontButtonUseFontPropertyInfo = "use-font"
type AttrOrigin FontButtonUseFontPropertyInfo = FontButton
attrGet = getFontButtonUseFont
attrSet = setFontButtonUseFont
attrTransfer _ v = do
return v
attrConstruct = constructFontButtonUseFont
attrClear = undefined
#endif
getFontButtonUseSize :: (MonadIO m, IsFontButton o) => o -> m Bool
getFontButtonUseSize :: o -> m Bool
getFontButtonUseSize obj :: o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj "use-size"
setFontButtonUseSize :: (MonadIO m, IsFontButton o) => o -> Bool -> m ()
setFontButtonUseSize :: o -> Bool -> m ()
setFontButtonUseSize obj :: o
obj val :: Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj "use-size" Bool
val
constructFontButtonUseSize :: (IsFontButton o) => Bool -> IO (GValueConstruct o)
constructFontButtonUseSize :: Bool -> IO (GValueConstruct o)
constructFontButtonUseSize val :: Bool
val = String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool "use-size" Bool
val
#if defined(ENABLE_OVERLOADING)
data FontButtonUseSizePropertyInfo
instance AttrInfo FontButtonUseSizePropertyInfo where
type AttrAllowedOps FontButtonUseSizePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint FontButtonUseSizePropertyInfo = IsFontButton
type AttrSetTypeConstraint FontButtonUseSizePropertyInfo = (~) Bool
type AttrTransferTypeConstraint FontButtonUseSizePropertyInfo = (~) Bool
type AttrTransferType FontButtonUseSizePropertyInfo = Bool
type AttrGetType FontButtonUseSizePropertyInfo = Bool
type AttrLabel FontButtonUseSizePropertyInfo = "use-size"
type AttrOrigin FontButtonUseSizePropertyInfo = FontButton
attrGet = getFontButtonUseSize
attrSet = setFontButtonUseSize
attrTransfer _ v = do
return v
attrConstruct = constructFontButtonUseSize
attrClear = undefined
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList FontButton
type instance O.AttributeList FontButton = FontButtonAttributeList
type FontButtonAttributeList = ('[ '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("canTarget", Gtk.Widget.WidgetCanTargetPropertyInfo), '("cssName", Gtk.Widget.WidgetCssNamePropertyInfo), '("cursor", Gtk.Widget.WidgetCursorPropertyInfo), '("expand", Gtk.Widget.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("font", Gtk.FontChooser.FontChooserFontPropertyInfo), '("fontDesc", Gtk.FontChooser.FontChooserFontDescPropertyInfo), '("fontFeatures", Gtk.FontChooser.FontChooserFontFeaturesPropertyInfo), '("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), '("isFocus", Gtk.Widget.WidgetIsFocusPropertyInfo), '("language", Gtk.FontChooser.FontChooserLanguagePropertyInfo), '("layoutManager", Gtk.Widget.WidgetLayoutManagerPropertyInfo), '("level", Gtk.FontChooser.FontChooserLevelPropertyInfo), '("margin", Gtk.Widget.WidgetMarginPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("overflow", Gtk.Widget.WidgetOverflowPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("previewText", Gtk.FontChooser.FontChooserPreviewTextPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("root", Gtk.Widget.WidgetRootPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("showPreviewEntry", Gtk.FontChooser.FontChooserShowPreviewEntryPropertyInfo), '("surface", Gtk.Widget.WidgetSurfacePropertyInfo), '("title", FontButtonTitlePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("useFont", FontButtonUseFontPropertyInfo), '("useSize", FontButtonUseSizePropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
fontButtonTitle :: AttrLabelProxy "title"
fontButtonTitle = AttrLabelProxy
fontButtonUseFont :: AttrLabelProxy "useFont"
fontButtonUseFont = AttrLabelProxy
fontButtonUseSize :: AttrLabelProxy "useSize"
fontButtonUseSize = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList FontButton = FontButtonSignalList
type FontButtonSignalList = ('[ '("accelClosuresChanged", Gtk.Widget.WidgetAccelClosuresChangedSignalInfo), '("canActivateAccel", Gtk.Widget.WidgetCanActivateAccelSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("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), '("fontActivated", Gtk.FontChooser.FontChooserFontActivatedSignalInfo), '("fontSet", FontButtonFontSetSignalInfo), '("grabNotify", Gtk.Widget.WidgetGrabNotifySignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("popupMenu", Gtk.Widget.WidgetPopupMenuSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("sizeAllocate", Gtk.Widget.WidgetSizeAllocateSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("styleUpdated", Gtk.Widget.WidgetStyleUpdatedSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "gtk_font_button_new" gtk_font_button_new ::
IO (Ptr FontButton)
fontButtonNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m FontButton
fontButtonNew :: m FontButton
fontButtonNew = IO FontButton -> m FontButton
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO FontButton -> m FontButton) -> IO FontButton -> m FontButton
forall a b. (a -> b) -> a -> b
$ do
Ptr FontButton
result <- IO (Ptr FontButton)
gtk_font_button_new
Text -> Ptr FontButton -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "fontButtonNew" Ptr FontButton
result
FontButton
result' <- ((ManagedPtr FontButton -> FontButton)
-> Ptr FontButton -> IO FontButton
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr FontButton -> FontButton
FontButton) Ptr FontButton
result
FontButton -> IO FontButton
forall (m :: * -> *) a. Monad m => a -> m a
return FontButton
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "gtk_font_button_new_with_font" gtk_font_button_new_with_font ::
CString ->
IO (Ptr FontButton)
fontButtonNewWithFont ::
(B.CallStack.HasCallStack, MonadIO m) =>
T.Text
-> m FontButton
fontButtonNewWithFont :: Text -> m FontButton
fontButtonNewWithFont fontname :: Text
fontname = IO FontButton -> m FontButton
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO FontButton -> m FontButton) -> IO FontButton -> m FontButton
forall a b. (a -> b) -> a -> b
$ do
CString
fontname' <- Text -> IO CString
textToCString Text
fontname
Ptr FontButton
result <- CString -> IO (Ptr FontButton)
gtk_font_button_new_with_font CString
fontname'
Text -> Ptr FontButton -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "fontButtonNewWithFont" Ptr FontButton
result
FontButton
result' <- ((ManagedPtr FontButton -> FontButton)
-> Ptr FontButton -> IO FontButton
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr FontButton -> FontButton
FontButton) Ptr FontButton
result
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
fontname'
FontButton -> IO FontButton
forall (m :: * -> *) a. Monad m => a -> m a
return FontButton
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "gtk_font_button_get_title" gtk_font_button_get_title ::
Ptr FontButton ->
IO CString
fontButtonGetTitle ::
(B.CallStack.HasCallStack, MonadIO m, IsFontButton a) =>
a
-> m T.Text
fontButtonGetTitle :: a -> m Text
fontButtonGetTitle fontButton :: a
fontButton = IO Text -> m Text
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Text -> m Text) -> IO Text -> m Text
forall a b. (a -> b) -> a -> b
$ do
Ptr FontButton
fontButton' <- a -> IO (Ptr FontButton)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
fontButton
CString
result <- Ptr FontButton -> IO CString
gtk_font_button_get_title Ptr FontButton
fontButton'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "fontButtonGetTitle" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
fontButton
Text -> IO Text
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data FontButtonGetTitleMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsFontButton a) => O.MethodInfo FontButtonGetTitleMethodInfo a signature where
overloadedMethod = fontButtonGetTitle
#endif
foreign import ccall "gtk_font_button_get_use_font" gtk_font_button_get_use_font ::
Ptr FontButton ->
IO CInt
fontButtonGetUseFont ::
(B.CallStack.HasCallStack, MonadIO m, IsFontButton a) =>
a
-> m Bool
fontButtonGetUseFont :: a -> m Bool
fontButtonGetUseFont fontButton :: a
fontButton = 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 FontButton
fontButton' <- a -> IO (Ptr FontButton)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
fontButton
CInt
result <- Ptr FontButton -> IO CInt
gtk_font_button_get_use_font Ptr FontButton
fontButton'
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
fontButton
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data FontButtonGetUseFontMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsFontButton a) => O.MethodInfo FontButtonGetUseFontMethodInfo a signature where
overloadedMethod = fontButtonGetUseFont
#endif
foreign import ccall "gtk_font_button_get_use_size" gtk_font_button_get_use_size ::
Ptr FontButton ->
IO CInt
fontButtonGetUseSize ::
(B.CallStack.HasCallStack, MonadIO m, IsFontButton a) =>
a
-> m Bool
fontButtonGetUseSize :: a -> m Bool
fontButtonGetUseSize fontButton :: a
fontButton = 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 FontButton
fontButton' <- a -> IO (Ptr FontButton)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
fontButton
CInt
result <- Ptr FontButton -> IO CInt
gtk_font_button_get_use_size Ptr FontButton
fontButton'
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
fontButton
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data FontButtonGetUseSizeMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsFontButton a) => O.MethodInfo FontButtonGetUseSizeMethodInfo a signature where
overloadedMethod = fontButtonGetUseSize
#endif
foreign import ccall "gtk_font_button_set_title" gtk_font_button_set_title ::
Ptr FontButton ->
CString ->
IO ()
fontButtonSetTitle ::
(B.CallStack.HasCallStack, MonadIO m, IsFontButton a) =>
a
-> T.Text
-> m ()
fontButtonSetTitle :: a -> Text -> m ()
fontButtonSetTitle fontButton :: a
fontButton title :: Text
title = 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 FontButton
fontButton' <- a -> IO (Ptr FontButton)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
fontButton
CString
title' <- Text -> IO CString
textToCString Text
title
Ptr FontButton -> CString -> IO ()
gtk_font_button_set_title Ptr FontButton
fontButton' CString
title'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
fontButton
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
title'
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data FontButtonSetTitleMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsFontButton a) => O.MethodInfo FontButtonSetTitleMethodInfo a signature where
overloadedMethod = fontButtonSetTitle
#endif
foreign import ccall "gtk_font_button_set_use_font" gtk_font_button_set_use_font ::
Ptr FontButton ->
CInt ->
IO ()
fontButtonSetUseFont ::
(B.CallStack.HasCallStack, MonadIO m, IsFontButton a) =>
a
-> Bool
-> m ()
fontButtonSetUseFont :: a -> Bool -> m ()
fontButtonSetUseFont fontButton :: a
fontButton useFont :: Bool
useFont = 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 FontButton
fontButton' <- a -> IO (Ptr FontButton)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
fontButton
let useFont' :: CInt
useFont' = (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
useFont
Ptr FontButton -> CInt -> IO ()
gtk_font_button_set_use_font Ptr FontButton
fontButton' CInt
useFont'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
fontButton
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data FontButtonSetUseFontMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsFontButton a) => O.MethodInfo FontButtonSetUseFontMethodInfo a signature where
overloadedMethod = fontButtonSetUseFont
#endif
foreign import ccall "gtk_font_button_set_use_size" gtk_font_button_set_use_size ::
Ptr FontButton ->
CInt ->
IO ()
fontButtonSetUseSize ::
(B.CallStack.HasCallStack, MonadIO m, IsFontButton a) =>
a
-> Bool
-> m ()
fontButtonSetUseSize :: a -> Bool -> m ()
fontButtonSetUseSize fontButton :: a
fontButton useSize :: Bool
useSize = 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 FontButton
fontButton' <- a -> IO (Ptr FontButton)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
fontButton
let useSize' :: CInt
useSize' = (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
useSize
Ptr FontButton -> CInt -> IO ()
gtk_font_button_set_use_size Ptr FontButton
fontButton' CInt
useSize'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
fontButton
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data FontButtonSetUseSizeMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsFontButton a) => O.MethodInfo FontButtonSetUseSizeMethodInfo a signature where
overloadedMethod = fontButtonSetUseSize
#endif