{-# 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 ,
#if defined(ENABLE_OVERLOADING)
ResolveFontButtonMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
FontButtonGetModalMethodInfo ,
#endif
fontButtonGetModal ,
#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)
FontButtonSetModalMethodInfo ,
#endif
fontButtonSetModal ,
#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)
FontButtonModalPropertyInfo ,
#endif
constructFontButtonModal ,
#if defined(ENABLE_OVERLOADING)
fontButtonModal ,
#endif
getFontButtonModal ,
setFontButtonModal ,
#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.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.ConstraintTarget as Gtk.ConstraintTarget
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.FontChooser as Gtk.FontChooser
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype FontButton = FontButton (SP.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)
instance SP.ManagedPtrNewtype FontButton where
toManagedPtr :: FontButton -> ManagedPtr FontButton
toManagedPtr (FontButton ManagedPtr FontButton
p) = ManagedPtr FontButton
p
foreign import ccall "gtk_font_button_get_type"
c_gtk_font_button_get_type :: IO B.Types.GType
instance B.Types.TypedObject FontButton where
glibType :: IO GType
glibType = IO GType
c_gtk_font_button_get_type
instance B.Types.GObject FontButton
instance B.GValue.IsGValue FontButton where
toGValue :: FontButton -> IO GValue
toGValue 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 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 (SP.GObject o, O.IsDescendantOf FontButton o) => IsFontButton o
instance (SP.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.ConstraintTarget.ConstraintTarget, 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, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
unsafeCastTo ManagedPtr FontButton -> FontButton
FontButton
#if defined(ENABLE_OVERLOADING)
type family ResolveFontButtonMethod (t :: Symbol) (o :: *) :: * where
ResolveFontButtonMethod "actionSetEnabled" o = Gtk.Widget.WidgetActionSetEnabledMethodInfo
ResolveFontButtonMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveFontButtonMethod "activateAction" o = Gtk.Widget.WidgetActivateActionMethodInfo
ResolveFontButtonMethod "activateDefault" o = Gtk.Widget.WidgetActivateDefaultMethodInfo
ResolveFontButtonMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveFontButtonMethod "addController" o = Gtk.Widget.WidgetAddControllerMethodInfo
ResolveFontButtonMethod "addCssClass" o = Gtk.Widget.WidgetAddCssClassMethodInfo
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 "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 "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveFontButtonMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveFontButtonMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveFontButtonMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveFontButtonMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveFontButtonMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveFontButtonMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveFontButtonMethod "hasCssClass" o = Gtk.Widget.WidgetHasCssClassMethodInfo
ResolveFontButtonMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveFontButtonMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
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 "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 "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveFontButtonMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
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 "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveFontButtonMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveFontButtonMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveFontButtonMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveFontButtonMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveFontButtonMethod "removeController" o = Gtk.Widget.WidgetRemoveControllerMethodInfo
ResolveFontButtonMethod "removeCssClass" o = Gtk.Widget.WidgetRemoveCssClassMethodInfo
ResolveFontButtonMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveFontButtonMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveFontButtonMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveFontButtonMethod "shouldLayout" o = Gtk.Widget.WidgetShouldLayoutMethodInfo
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 "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveFontButtonMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveFontButtonMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
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 "getCssClasses" o = Gtk.Widget.WidgetGetCssClassesMethodInfo
ResolveFontButtonMethod "getCssName" o = Gtk.Widget.WidgetGetCssNameMethodInfo
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 "getFocusable" o = Gtk.Widget.WidgetGetFocusableMethodInfo
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 "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 "getModal" o = FontButtonGetModalMethodInfo
ResolveFontButtonMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveFontButtonMethod "getNative" o = Gtk.Widget.WidgetGetNativeMethodInfo
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 "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 "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveFontButtonMethod "getTitle" o = FontButtonGetTitleMethodInfo
ResolveFontButtonMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveFontButtonMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
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 "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveFontButtonMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveFontButtonMethod "setCanTarget" o = Gtk.Widget.WidgetSetCanTargetMethodInfo
ResolveFontButtonMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveFontButtonMethod "setCssClasses" o = Gtk.Widget.WidgetSetCssClassesMethodInfo
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 "setFocusable" o = Gtk.Widget.WidgetSetFocusableMethodInfo
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 "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 "setModal" o = FontButtonSetModalMethodInfo
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 "setTitle" o = FontButtonSetTitleMethodInfo
ResolveFontButtonMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveFontButtonMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
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 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 IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onFontButtonFontSet :: (IsFontButton a, MonadIO m) => a -> FontButtonFontSetCallback -> m SignalHandlerId
onFontButtonFontSet :: a -> IO () -> m SignalHandlerId
onFontButtonFontSet a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_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 Text
"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 a
obj IO ()
cb = IO SignalHandlerId -> m SignalHandlerId
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_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 Text
"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
getFontButtonModal :: (MonadIO m, IsFontButton o) => o -> m Bool
getFontButtonModal :: o -> m Bool
getFontButtonModal o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"modal"
setFontButtonModal :: (MonadIO m, IsFontButton o) => o -> Bool -> m ()
setFontButtonModal :: o -> Bool -> m ()
setFontButtonModal o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"modal" Bool
val
constructFontButtonModal :: (IsFontButton o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructFontButtonModal :: Bool -> m (GValueConstruct o)
constructFontButtonModal Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"modal" Bool
val
#if defined(ENABLE_OVERLOADING)
data FontButtonModalPropertyInfo
instance AttrInfo FontButtonModalPropertyInfo where
type AttrAllowedOps FontButtonModalPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint FontButtonModalPropertyInfo = IsFontButton
type AttrSetTypeConstraint FontButtonModalPropertyInfo = (~) Bool
type AttrTransferTypeConstraint FontButtonModalPropertyInfo = (~) Bool
type AttrTransferType FontButtonModalPropertyInfo = Bool
type AttrGetType FontButtonModalPropertyInfo = Bool
type AttrLabel FontButtonModalPropertyInfo = "modal"
type AttrOrigin FontButtonModalPropertyInfo = FontButton
attrGet = getFontButtonModal
attrSet = setFontButtonModal
attrTransfer _ v = do
return v
attrConstruct = constructFontButtonModal
attrClear = undefined
#endif
getFontButtonTitle :: (MonadIO m, IsFontButton o) => o -> m T.Text
getFontButtonTitle :: o -> m Text
getFontButtonTitle 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 Text
"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 String
"title"
setFontButtonTitle :: (MonadIO m, IsFontButton o) => o -> T.Text -> m ()
setFontButtonTitle :: o -> Text -> m ()
setFontButtonTitle o
obj Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"title" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructFontButtonTitle :: (IsFontButton o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructFontButtonTitle :: Text -> m (GValueConstruct o)
constructFontButtonTitle Text
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe Text -> IO (GValueConstruct o)
forall o. String -> Maybe Text -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyString String
"title" (Text -> Maybe Text
forall a. a -> Maybe a
P.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 o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"use-font"
setFontButtonUseFont :: (MonadIO m, IsFontButton o) => o -> Bool -> m ()
setFontButtonUseFont :: o -> Bool -> m ()
setFontButtonUseFont o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"use-font" Bool
val
constructFontButtonUseFont :: (IsFontButton o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructFontButtonUseFont :: Bool -> m (GValueConstruct o)
constructFontButtonUseFont Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"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 o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"use-size"
setFontButtonUseSize :: (MonadIO m, IsFontButton o) => o -> Bool -> m ()
setFontButtonUseSize :: o -> Bool -> m ()
setFontButtonUseSize o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"use-size" Bool
val
constructFontButtonUseSize :: (IsFontButton o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructFontButtonUseSize :: Bool -> m (GValueConstruct o)
constructFontButtonUseSize Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"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), '("cssClasses", Gtk.Widget.WidgetCssClassesPropertyInfo), '("cssName", Gtk.Widget.WidgetCssNamePropertyInfo), '("cursor", Gtk.Widget.WidgetCursorPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("focusable", Gtk.Widget.WidgetFocusablePropertyInfo), '("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), '("language", Gtk.FontChooser.FontChooserLanguagePropertyInfo), '("layoutManager", Gtk.Widget.WidgetLayoutManagerPropertyInfo), '("level", Gtk.FontChooser.FontChooserLevelPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("modal", FontButtonModalPropertyInfo), '("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), '("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)
fontButtonModal :: AttrLabelProxy "modal"
fontButtonModal = AttrLabelProxy
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 = ('[ '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("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), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("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 Text
"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 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 Text
"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_modal" gtk_font_button_get_modal ::
Ptr FontButton ->
IO CInt
fontButtonGetModal ::
(B.CallStack.HasCallStack, MonadIO m, IsFontButton a) =>
a
-> m Bool
fontButtonGetModal :: a -> m Bool
fontButtonGetModal 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_modal Ptr FontButton
fontButton'
let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
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 FontButtonGetModalMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsFontButton a) => O.MethodInfo FontButtonGetModalMethodInfo a signature where
overloadedMethod = fontButtonGetModal
#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 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 Text
"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 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
/= CInt
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 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
/= CInt
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_modal" gtk_font_button_set_modal ::
Ptr FontButton ->
CInt ->
IO ()
fontButtonSetModal ::
(B.CallStack.HasCallStack, MonadIO m, IsFontButton a) =>
a
-> Bool
-> m ()
fontButtonSetModal :: a -> Bool -> m ()
fontButtonSetModal a
fontButton Bool
modal = 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 modal' :: CInt
modal' = (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
modal
Ptr FontButton -> CInt -> IO ()
gtk_font_button_set_modal Ptr FontButton
fontButton' CInt
modal'
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 FontButtonSetModalMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsFontButton a) => O.MethodInfo FontButtonSetModalMethodInfo a signature where
overloadedMethod = fontButtonSetModal
#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 a
fontButton 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 a
fontButton 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 a
fontButton 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