{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Handy.Objects.Dialer
(
Dialer(..) ,
IsDialer ,
toDialer ,
#if defined(ENABLE_OVERLOADING)
ResolveDialerMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
DialerClearNumberMethodInfo ,
#endif
dialerClearNumber ,
#if defined(ENABLE_OVERLOADING)
DialerGetNumberMethodInfo ,
#endif
dialerGetNumber ,
#if defined(ENABLE_OVERLOADING)
DialerGetReliefMethodInfo ,
#endif
dialerGetRelief ,
#if defined(ENABLE_OVERLOADING)
DialerGetShowActionButtonsMethodInfo ,
#endif
dialerGetShowActionButtons ,
dialerNew ,
#if defined(ENABLE_OVERLOADING)
DialerSetNumberMethodInfo ,
#endif
dialerSetNumber ,
#if defined(ENABLE_OVERLOADING)
DialerSetReliefMethodInfo ,
#endif
dialerSetRelief ,
#if defined(ENABLE_OVERLOADING)
DialerSetShowActionButtonsMethodInfo ,
#endif
dialerSetShowActionButtons ,
#if defined(ENABLE_OVERLOADING)
DialerColumnSpacingPropertyInfo ,
#endif
constructDialerColumnSpacing ,
#if defined(ENABLE_OVERLOADING)
dialerColumnSpacing ,
#endif
getDialerColumnSpacing ,
setDialerColumnSpacing ,
#if defined(ENABLE_OVERLOADING)
DialerNumberPropertyInfo ,
#endif
constructDialerNumber ,
#if defined(ENABLE_OVERLOADING)
dialerNumber ,
#endif
getDialerNumber ,
setDialerNumber ,
#if defined(ENABLE_OVERLOADING)
DialerReliefPropertyInfo ,
#endif
constructDialerRelief ,
#if defined(ENABLE_OVERLOADING)
dialerRelief ,
#endif
getDialerRelief ,
setDialerRelief ,
#if defined(ENABLE_OVERLOADING)
DialerRowSpacingPropertyInfo ,
#endif
constructDialerRowSpacing ,
#if defined(ENABLE_OVERLOADING)
dialerRowSpacing ,
#endif
getDialerRowSpacing ,
setDialerRowSpacing ,
#if defined(ENABLE_OVERLOADING)
DialerShowActionButtonsPropertyInfo ,
#endif
constructDialerShowActionButtons ,
#if defined(ENABLE_OVERLOADING)
dialerShowActionButtons ,
#endif
getDialerShowActionButtons ,
setDialerShowActionButtons ,
C_DialerDeletedCallback ,
DialerDeletedCallback ,
#if defined(ENABLE_OVERLOADING)
DialerDeletedSignalInfo ,
#endif
afterDialerDeleted ,
genClosure_DialerDeleted ,
mk_DialerDeletedCallback ,
noDialerDeletedCallback ,
onDialerDeleted ,
wrap_DialerDeletedCallback ,
C_DialerSubmittedCallback ,
DialerSubmittedCallback ,
#if defined(ENABLE_OVERLOADING)
DialerSubmittedSignalInfo ,
#endif
afterDialerSubmitted ,
genClosure_DialerSubmitted ,
mk_DialerSubmittedCallback ,
noDialerSubmittedCallback ,
onDialerSubmitted ,
wrap_DialerSubmittedCallback ,
C_DialerSymbolClickedCallback ,
DialerSymbolClickedCallback ,
#if defined(ENABLE_OVERLOADING)
DialerSymbolClickedSignalInfo ,
#endif
afterDialerSymbolClicked ,
genClosure_DialerSymbolClicked ,
mk_DialerSymbolClickedCallback ,
noDialerSymbolClickedCallback ,
onDialerSymbolClicked ,
wrap_DialerSymbolClickedCallback ,
) 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 GHC.Records as R
import qualified GI.Atk.Interfaces.ImplementorIface as Atk.ImplementorIface
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gtk.Enums as Gtk.Enums
import qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import qualified GI.Gtk.Objects.Bin as Gtk.Bin
import qualified GI.Gtk.Objects.Container as Gtk.Container
import qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype Dialer = Dialer (SP.ManagedPtr Dialer)
deriving (Dialer -> Dialer -> Bool
(Dialer -> Dialer -> Bool)
-> (Dialer -> Dialer -> Bool) -> Eq Dialer
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: Dialer -> Dialer -> Bool
$c/= :: Dialer -> Dialer -> Bool
== :: Dialer -> Dialer -> Bool
$c== :: Dialer -> Dialer -> Bool
Eq)
instance SP.ManagedPtrNewtype Dialer where
toManagedPtr :: Dialer -> ManagedPtr Dialer
toManagedPtr (Dialer ManagedPtr Dialer
p) = ManagedPtr Dialer
p
foreign import ccall "hdy_dialer_get_type"
c_hdy_dialer_get_type :: IO B.Types.GType
instance B.Types.TypedObject Dialer where
glibType :: IO GType
glibType = IO GType
c_hdy_dialer_get_type
instance B.Types.GObject Dialer
class (SP.GObject o, O.IsDescendantOf Dialer o) => IsDialer o
instance (SP.GObject o, O.IsDescendantOf Dialer o) => IsDialer o
instance O.HasParentTypes Dialer
type instance O.ParentTypes Dialer = '[Gtk.Bin.Bin, Gtk.Container.Container, Gtk.Widget.Widget, GObject.Object.Object, Atk.ImplementorIface.ImplementorIface, Gtk.Buildable.Buildable]
toDialer :: (MIO.MonadIO m, IsDialer o) => o -> m Dialer
toDialer :: forall (m :: * -> *) o. (MonadIO m, IsDialer o) => o -> m Dialer
toDialer = IO Dialer -> m Dialer
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Dialer -> m Dialer) -> (o -> IO Dialer) -> o -> m Dialer
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr Dialer -> Dialer) -> o -> IO Dialer
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr Dialer -> Dialer
Dialer
instance B.GValue.IsGValue (Maybe Dialer) where
gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_hdy_dialer_get_type
gvalueSet_ :: Ptr GValue -> Maybe Dialer -> IO ()
gvalueSet_ Ptr GValue
gv Maybe Dialer
P.Nothing = Ptr GValue -> Ptr Dialer -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr Dialer
forall a. Ptr a
FP.nullPtr :: FP.Ptr Dialer)
gvalueSet_ Ptr GValue
gv (P.Just Dialer
obj) = Dialer -> (Ptr Dialer -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr Dialer
obj (Ptr GValue -> Ptr Dialer -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
gvalueGet_ :: Ptr GValue -> IO (Maybe Dialer)
gvalueGet_ Ptr GValue
gv = do
Ptr Dialer
ptr <- Ptr GValue -> IO (Ptr Dialer)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr Dialer)
if Ptr Dialer
ptr Ptr Dialer -> Ptr Dialer -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr Dialer
forall a. Ptr a
FP.nullPtr
then Dialer -> Maybe Dialer
forall a. a -> Maybe a
P.Just (Dialer -> Maybe Dialer) -> IO Dialer -> IO (Maybe Dialer)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr Dialer -> Dialer) -> Ptr Dialer -> IO Dialer
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr Dialer -> Dialer
Dialer Ptr Dialer
ptr
else Maybe Dialer -> IO (Maybe Dialer)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Dialer
forall a. Maybe a
P.Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveDialerMethod (t :: Symbol) (o :: *) :: * where
ResolveDialerMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
ResolveDialerMethod "add" o = Gtk.Container.ContainerAddMethodInfo
ResolveDialerMethod "addAccelerator" o = Gtk.Widget.WidgetAddAcceleratorMethodInfo
ResolveDialerMethod "addChild" o = Gtk.Buildable.BuildableAddChildMethodInfo
ResolveDialerMethod "addDeviceEvents" o = Gtk.Widget.WidgetAddDeviceEventsMethodInfo
ResolveDialerMethod "addEvents" o = Gtk.Widget.WidgetAddEventsMethodInfo
ResolveDialerMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
ResolveDialerMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
ResolveDialerMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveDialerMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveDialerMethod "canActivateAccel" o = Gtk.Widget.WidgetCanActivateAccelMethodInfo
ResolveDialerMethod "checkResize" o = Gtk.Container.ContainerCheckResizeMethodInfo
ResolveDialerMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
ResolveDialerMethod "childGetProperty" o = Gtk.Container.ContainerChildGetPropertyMethodInfo
ResolveDialerMethod "childNotify" o = Gtk.Container.ContainerChildNotifyMethodInfo
ResolveDialerMethod "childNotifyByPspec" o = Gtk.Container.ContainerChildNotifyByPspecMethodInfo
ResolveDialerMethod "childSetProperty" o = Gtk.Container.ContainerChildSetPropertyMethodInfo
ResolveDialerMethod "childType" o = Gtk.Container.ContainerChildTypeMethodInfo
ResolveDialerMethod "classPath" o = Gtk.Widget.WidgetClassPathMethodInfo
ResolveDialerMethod "clearNumber" o = DialerClearNumberMethodInfo
ResolveDialerMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
ResolveDialerMethod "constructChild" o = Gtk.Buildable.BuildableConstructChildMethodInfo
ResolveDialerMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
ResolveDialerMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
ResolveDialerMethod "customFinished" o = Gtk.Buildable.BuildableCustomFinishedMethodInfo
ResolveDialerMethod "customTagEnd" o = Gtk.Buildable.BuildableCustomTagEndMethodInfo
ResolveDialerMethod "customTagStart" o = Gtk.Buildable.BuildableCustomTagStartMethodInfo
ResolveDialerMethod "destroy" o = Gtk.Widget.WidgetDestroyMethodInfo
ResolveDialerMethod "destroyed" o = Gtk.Widget.WidgetDestroyedMethodInfo
ResolveDialerMethod "deviceIsShadowed" o = Gtk.Widget.WidgetDeviceIsShadowedMethodInfo
ResolveDialerMethod "dragBegin" o = Gtk.Widget.WidgetDragBeginMethodInfo
ResolveDialerMethod "dragBeginWithCoordinates" o = Gtk.Widget.WidgetDragBeginWithCoordinatesMethodInfo
ResolveDialerMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
ResolveDialerMethod "dragDestAddImageTargets" o = Gtk.Widget.WidgetDragDestAddImageTargetsMethodInfo
ResolveDialerMethod "dragDestAddTextTargets" o = Gtk.Widget.WidgetDragDestAddTextTargetsMethodInfo
ResolveDialerMethod "dragDestAddUriTargets" o = Gtk.Widget.WidgetDragDestAddUriTargetsMethodInfo
ResolveDialerMethod "dragDestFindTarget" o = Gtk.Widget.WidgetDragDestFindTargetMethodInfo
ResolveDialerMethod "dragDestGetTargetList" o = Gtk.Widget.WidgetDragDestGetTargetListMethodInfo
ResolveDialerMethod "dragDestGetTrackMotion" o = Gtk.Widget.WidgetDragDestGetTrackMotionMethodInfo
ResolveDialerMethod "dragDestSet" o = Gtk.Widget.WidgetDragDestSetMethodInfo
ResolveDialerMethod "dragDestSetProxy" o = Gtk.Widget.WidgetDragDestSetProxyMethodInfo
ResolveDialerMethod "dragDestSetTargetList" o = Gtk.Widget.WidgetDragDestSetTargetListMethodInfo
ResolveDialerMethod "dragDestSetTrackMotion" o = Gtk.Widget.WidgetDragDestSetTrackMotionMethodInfo
ResolveDialerMethod "dragDestUnset" o = Gtk.Widget.WidgetDragDestUnsetMethodInfo
ResolveDialerMethod "dragGetData" o = Gtk.Widget.WidgetDragGetDataMethodInfo
ResolveDialerMethod "dragHighlight" o = Gtk.Widget.WidgetDragHighlightMethodInfo
ResolveDialerMethod "dragSourceAddImageTargets" o = Gtk.Widget.WidgetDragSourceAddImageTargetsMethodInfo
ResolveDialerMethod "dragSourceAddTextTargets" o = Gtk.Widget.WidgetDragSourceAddTextTargetsMethodInfo
ResolveDialerMethod "dragSourceAddUriTargets" o = Gtk.Widget.WidgetDragSourceAddUriTargetsMethodInfo
ResolveDialerMethod "dragSourceGetTargetList" o = Gtk.Widget.WidgetDragSourceGetTargetListMethodInfo
ResolveDialerMethod "dragSourceSet" o = Gtk.Widget.WidgetDragSourceSetMethodInfo
ResolveDialerMethod "dragSourceSetIconGicon" o = Gtk.Widget.WidgetDragSourceSetIconGiconMethodInfo
ResolveDialerMethod "dragSourceSetIconName" o = Gtk.Widget.WidgetDragSourceSetIconNameMethodInfo
ResolveDialerMethod "dragSourceSetIconPixbuf" o = Gtk.Widget.WidgetDragSourceSetIconPixbufMethodInfo
ResolveDialerMethod "dragSourceSetIconStock" o = Gtk.Widget.WidgetDragSourceSetIconStockMethodInfo
ResolveDialerMethod "dragSourceSetTargetList" o = Gtk.Widget.WidgetDragSourceSetTargetListMethodInfo
ResolveDialerMethod "dragSourceUnset" o = Gtk.Widget.WidgetDragSourceUnsetMethodInfo
ResolveDialerMethod "dragUnhighlight" o = Gtk.Widget.WidgetDragUnhighlightMethodInfo
ResolveDialerMethod "draw" o = Gtk.Widget.WidgetDrawMethodInfo
ResolveDialerMethod "ensureStyle" o = Gtk.Widget.WidgetEnsureStyleMethodInfo
ResolveDialerMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
ResolveDialerMethod "event" o = Gtk.Widget.WidgetEventMethodInfo
ResolveDialerMethod "forall" o = Gtk.Container.ContainerForallMethodInfo
ResolveDialerMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveDialerMethod "foreach" o = Gtk.Container.ContainerForeachMethodInfo
ResolveDialerMethod "freezeChildNotify" o = Gtk.Widget.WidgetFreezeChildNotifyMethodInfo
ResolveDialerMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveDialerMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveDialerMethod "grabAdd" o = Gtk.Widget.WidgetGrabAddMethodInfo
ResolveDialerMethod "grabDefault" o = Gtk.Widget.WidgetGrabDefaultMethodInfo
ResolveDialerMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
ResolveDialerMethod "grabRemove" o = Gtk.Widget.WidgetGrabRemoveMethodInfo
ResolveDialerMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
ResolveDialerMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
ResolveDialerMethod "hasGrab" o = Gtk.Widget.WidgetHasGrabMethodInfo
ResolveDialerMethod "hasRcStyle" o = Gtk.Widget.WidgetHasRcStyleMethodInfo
ResolveDialerMethod "hasScreen" o = Gtk.Widget.WidgetHasScreenMethodInfo
ResolveDialerMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
ResolveDialerMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
ResolveDialerMethod "hideOnDelete" o = Gtk.Widget.WidgetHideOnDeleteMethodInfo
ResolveDialerMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
ResolveDialerMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
ResolveDialerMethod "inputShapeCombineRegion" o = Gtk.Widget.WidgetInputShapeCombineRegionMethodInfo
ResolveDialerMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
ResolveDialerMethod "intersect" o = Gtk.Widget.WidgetIntersectMethodInfo
ResolveDialerMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
ResolveDialerMethod "isComposited" o = Gtk.Widget.WidgetIsCompositedMethodInfo
ResolveDialerMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
ResolveDialerMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveDialerMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
ResolveDialerMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
ResolveDialerMethod "isToplevel" o = Gtk.Widget.WidgetIsToplevelMethodInfo
ResolveDialerMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
ResolveDialerMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
ResolveDialerMethod "listAccelClosures" o = Gtk.Widget.WidgetListAccelClosuresMethodInfo
ResolveDialerMethod "listActionPrefixes" o = Gtk.Widget.WidgetListActionPrefixesMethodInfo
ResolveDialerMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
ResolveDialerMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
ResolveDialerMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
ResolveDialerMethod "modifyBase" o = Gtk.Widget.WidgetModifyBaseMethodInfo
ResolveDialerMethod "modifyBg" o = Gtk.Widget.WidgetModifyBgMethodInfo
ResolveDialerMethod "modifyCursor" o = Gtk.Widget.WidgetModifyCursorMethodInfo
ResolveDialerMethod "modifyFg" o = Gtk.Widget.WidgetModifyFgMethodInfo
ResolveDialerMethod "modifyFont" o = Gtk.Widget.WidgetModifyFontMethodInfo
ResolveDialerMethod "modifyStyle" o = Gtk.Widget.WidgetModifyStyleMethodInfo
ResolveDialerMethod "modifyText" o = Gtk.Widget.WidgetModifyTextMethodInfo
ResolveDialerMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveDialerMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveDialerMethod "overrideBackgroundColor" o = Gtk.Widget.WidgetOverrideBackgroundColorMethodInfo
ResolveDialerMethod "overrideColor" o = Gtk.Widget.WidgetOverrideColorMethodInfo
ResolveDialerMethod "overrideCursor" o = Gtk.Widget.WidgetOverrideCursorMethodInfo
ResolveDialerMethod "overrideFont" o = Gtk.Widget.WidgetOverrideFontMethodInfo
ResolveDialerMethod "overrideSymbolicColor" o = Gtk.Widget.WidgetOverrideSymbolicColorMethodInfo
ResolveDialerMethod "parserFinished" o = Gtk.Buildable.BuildableParserFinishedMethodInfo
ResolveDialerMethod "path" o = Gtk.Widget.WidgetPathMethodInfo
ResolveDialerMethod "propagateDraw" o = Gtk.Container.ContainerPropagateDrawMethodInfo
ResolveDialerMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
ResolveDialerMethod "queueComputeExpand" o = Gtk.Widget.WidgetQueueComputeExpandMethodInfo
ResolveDialerMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
ResolveDialerMethod "queueDrawArea" o = Gtk.Widget.WidgetQueueDrawAreaMethodInfo
ResolveDialerMethod "queueDrawRegion" o = Gtk.Widget.WidgetQueueDrawRegionMethodInfo
ResolveDialerMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
ResolveDialerMethod "queueResizeNoRedraw" o = Gtk.Widget.WidgetQueueResizeNoRedrawMethodInfo
ResolveDialerMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
ResolveDialerMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveDialerMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveDialerMethod "regionIntersect" o = Gtk.Widget.WidgetRegionIntersectMethodInfo
ResolveDialerMethod "registerWindow" o = Gtk.Widget.WidgetRegisterWindowMethodInfo
ResolveDialerMethod "remove" o = Gtk.Container.ContainerRemoveMethodInfo
ResolveDialerMethod "removeAccelerator" o = Gtk.Widget.WidgetRemoveAcceleratorMethodInfo
ResolveDialerMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
ResolveDialerMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
ResolveDialerMethod "renderIcon" o = Gtk.Widget.WidgetRenderIconMethodInfo
ResolveDialerMethod "renderIconPixbuf" o = Gtk.Widget.WidgetRenderIconPixbufMethodInfo
ResolveDialerMethod "reparent" o = Gtk.Widget.WidgetReparentMethodInfo
ResolveDialerMethod "resetRcStyles" o = Gtk.Widget.WidgetResetRcStylesMethodInfo
ResolveDialerMethod "resetStyle" o = Gtk.Widget.WidgetResetStyleMethodInfo
ResolveDialerMethod "resizeChildren" o = Gtk.Container.ContainerResizeChildrenMethodInfo
ResolveDialerMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveDialerMethod "sendExpose" o = Gtk.Widget.WidgetSendExposeMethodInfo
ResolveDialerMethod "sendFocusChange" o = Gtk.Widget.WidgetSendFocusChangeMethodInfo
ResolveDialerMethod "shapeCombineRegion" o = Gtk.Widget.WidgetShapeCombineRegionMethodInfo
ResolveDialerMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
ResolveDialerMethod "showAll" o = Gtk.Widget.WidgetShowAllMethodInfo
ResolveDialerMethod "showNow" o = Gtk.Widget.WidgetShowNowMethodInfo
ResolveDialerMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
ResolveDialerMethod "sizeAllocateWithBaseline" o = Gtk.Widget.WidgetSizeAllocateWithBaselineMethodInfo
ResolveDialerMethod "sizeRequest" o = Gtk.Widget.WidgetSizeRequestMethodInfo
ResolveDialerMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveDialerMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveDialerMethod "styleAttach" o = Gtk.Widget.WidgetStyleAttachMethodInfo
ResolveDialerMethod "styleGetProperty" o = Gtk.Widget.WidgetStyleGetPropertyMethodInfo
ResolveDialerMethod "thawChildNotify" o = Gtk.Widget.WidgetThawChildNotifyMethodInfo
ResolveDialerMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveDialerMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
ResolveDialerMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
ResolveDialerMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
ResolveDialerMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
ResolveDialerMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
ResolveDialerMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveDialerMethod "unregisterWindow" o = Gtk.Widget.WidgetUnregisterWindowMethodInfo
ResolveDialerMethod "unsetFocusChain" o = Gtk.Container.ContainerUnsetFocusChainMethodInfo
ResolveDialerMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
ResolveDialerMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveDialerMethod "getAccessible" o = Gtk.Widget.WidgetGetAccessibleMethodInfo
ResolveDialerMethod "getActionGroup" o = Gtk.Widget.WidgetGetActionGroupMethodInfo
ResolveDialerMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
ResolveDialerMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
ResolveDialerMethod "getAllocatedSize" o = Gtk.Widget.WidgetGetAllocatedSizeMethodInfo
ResolveDialerMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
ResolveDialerMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
ResolveDialerMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
ResolveDialerMethod "getAppPaintable" o = Gtk.Widget.WidgetGetAppPaintableMethodInfo
ResolveDialerMethod "getBorderWidth" o = Gtk.Container.ContainerGetBorderWidthMethodInfo
ResolveDialerMethod "getCanDefault" o = Gtk.Widget.WidgetGetCanDefaultMethodInfo
ResolveDialerMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
ResolveDialerMethod "getChild" o = Gtk.Bin.BinGetChildMethodInfo
ResolveDialerMethod "getChildRequisition" o = Gtk.Widget.WidgetGetChildRequisitionMethodInfo
ResolveDialerMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
ResolveDialerMethod "getChildren" o = Gtk.Container.ContainerGetChildrenMethodInfo
ResolveDialerMethod "getClip" o = Gtk.Widget.WidgetGetClipMethodInfo
ResolveDialerMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
ResolveDialerMethod "getCompositeName" o = Gtk.Widget.WidgetGetCompositeNameMethodInfo
ResolveDialerMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveDialerMethod "getDeviceEnabled" o = Gtk.Widget.WidgetGetDeviceEnabledMethodInfo
ResolveDialerMethod "getDeviceEvents" o = Gtk.Widget.WidgetGetDeviceEventsMethodInfo
ResolveDialerMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
ResolveDialerMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
ResolveDialerMethod "getDoubleBuffered" o = Gtk.Widget.WidgetGetDoubleBufferedMethodInfo
ResolveDialerMethod "getEvents" o = Gtk.Widget.WidgetGetEventsMethodInfo
ResolveDialerMethod "getFocusChain" o = Gtk.Container.ContainerGetFocusChainMethodInfo
ResolveDialerMethod "getFocusChild" o = Gtk.Container.ContainerGetFocusChildMethodInfo
ResolveDialerMethod "getFocusHadjustment" o = Gtk.Container.ContainerGetFocusHadjustmentMethodInfo
ResolveDialerMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
ResolveDialerMethod "getFocusVadjustment" o = Gtk.Container.ContainerGetFocusVadjustmentMethodInfo
ResolveDialerMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
ResolveDialerMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
ResolveDialerMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
ResolveDialerMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
ResolveDialerMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
ResolveDialerMethod "getHasWindow" o = Gtk.Widget.WidgetGetHasWindowMethodInfo
ResolveDialerMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
ResolveDialerMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
ResolveDialerMethod "getInternalChild" o = Gtk.Buildable.BuildableGetInternalChildMethodInfo
ResolveDialerMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
ResolveDialerMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
ResolveDialerMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
ResolveDialerMethod "getMarginLeft" o = Gtk.Widget.WidgetGetMarginLeftMethodInfo
ResolveDialerMethod "getMarginRight" o = Gtk.Widget.WidgetGetMarginRightMethodInfo
ResolveDialerMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
ResolveDialerMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
ResolveDialerMethod "getModifierMask" o = Gtk.Widget.WidgetGetModifierMaskMethodInfo
ResolveDialerMethod "getModifierStyle" o = Gtk.Widget.WidgetGetModifierStyleMethodInfo
ResolveDialerMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
ResolveDialerMethod "getNoShowAll" o = Gtk.Widget.WidgetGetNoShowAllMethodInfo
ResolveDialerMethod "getNumber" o = DialerGetNumberMethodInfo
ResolveDialerMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
ResolveDialerMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
ResolveDialerMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
ResolveDialerMethod "getParentWindow" o = Gtk.Widget.WidgetGetParentWindowMethodInfo
ResolveDialerMethod "getPath" o = Gtk.Widget.WidgetGetPathMethodInfo
ResolveDialerMethod "getPathForChild" o = Gtk.Container.ContainerGetPathForChildMethodInfo
ResolveDialerMethod "getPointer" o = Gtk.Widget.WidgetGetPointerMethodInfo
ResolveDialerMethod "getPreferredHeight" o = Gtk.Widget.WidgetGetPreferredHeightMethodInfo
ResolveDialerMethod "getPreferredHeightAndBaselineForWidth" o = Gtk.Widget.WidgetGetPreferredHeightAndBaselineForWidthMethodInfo
ResolveDialerMethod "getPreferredHeightForWidth" o = Gtk.Widget.WidgetGetPreferredHeightForWidthMethodInfo
ResolveDialerMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
ResolveDialerMethod "getPreferredWidth" o = Gtk.Widget.WidgetGetPreferredWidthMethodInfo
ResolveDialerMethod "getPreferredWidthForHeight" o = Gtk.Widget.WidgetGetPreferredWidthForHeightMethodInfo
ResolveDialerMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveDialerMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveDialerMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
ResolveDialerMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
ResolveDialerMethod "getRelief" o = DialerGetReliefMethodInfo
ResolveDialerMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
ResolveDialerMethod "getRequisition" o = Gtk.Widget.WidgetGetRequisitionMethodInfo
ResolveDialerMethod "getResizeMode" o = Gtk.Container.ContainerGetResizeModeMethodInfo
ResolveDialerMethod "getRootWindow" o = Gtk.Widget.WidgetGetRootWindowMethodInfo
ResolveDialerMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
ResolveDialerMethod "getScreen" o = Gtk.Widget.WidgetGetScreenMethodInfo
ResolveDialerMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
ResolveDialerMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
ResolveDialerMethod "getShowActionButtons" o = DialerGetShowActionButtonsMethodInfo
ResolveDialerMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
ResolveDialerMethod "getState" o = Gtk.Widget.WidgetGetStateMethodInfo
ResolveDialerMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
ResolveDialerMethod "getStyle" o = Gtk.Widget.WidgetGetStyleMethodInfo
ResolveDialerMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
ResolveDialerMethod "getSupportMultidevice" o = Gtk.Widget.WidgetGetSupportMultideviceMethodInfo
ResolveDialerMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
ResolveDialerMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
ResolveDialerMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
ResolveDialerMethod "getTooltipWindow" o = Gtk.Widget.WidgetGetTooltipWindowMethodInfo
ResolveDialerMethod "getToplevel" o = Gtk.Widget.WidgetGetToplevelMethodInfo
ResolveDialerMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
ResolveDialerMethod "getValignWithBaseline" o = Gtk.Widget.WidgetGetValignWithBaselineMethodInfo
ResolveDialerMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
ResolveDialerMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
ResolveDialerMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
ResolveDialerMethod "getVisual" o = Gtk.Widget.WidgetGetVisualMethodInfo
ResolveDialerMethod "getWindow" o = Gtk.Widget.WidgetGetWindowMethodInfo
ResolveDialerMethod "setAccelPath" o = Gtk.Widget.WidgetSetAccelPathMethodInfo
ResolveDialerMethod "setAllocation" o = Gtk.Widget.WidgetSetAllocationMethodInfo
ResolveDialerMethod "setAppPaintable" o = Gtk.Widget.WidgetSetAppPaintableMethodInfo
ResolveDialerMethod "setBorderWidth" o = Gtk.Container.ContainerSetBorderWidthMethodInfo
ResolveDialerMethod "setBuildableProperty" o = Gtk.Buildable.BuildableSetBuildablePropertyMethodInfo
ResolveDialerMethod "setCanDefault" o = Gtk.Widget.WidgetSetCanDefaultMethodInfo
ResolveDialerMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
ResolveDialerMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
ResolveDialerMethod "setClip" o = Gtk.Widget.WidgetSetClipMethodInfo
ResolveDialerMethod "setCompositeName" o = Gtk.Widget.WidgetSetCompositeNameMethodInfo
ResolveDialerMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveDialerMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveDialerMethod "setDeviceEnabled" o = Gtk.Widget.WidgetSetDeviceEnabledMethodInfo
ResolveDialerMethod "setDeviceEvents" o = Gtk.Widget.WidgetSetDeviceEventsMethodInfo
ResolveDialerMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
ResolveDialerMethod "setDoubleBuffered" o = Gtk.Widget.WidgetSetDoubleBufferedMethodInfo
ResolveDialerMethod "setEvents" o = Gtk.Widget.WidgetSetEventsMethodInfo
ResolveDialerMethod "setFocusChain" o = Gtk.Container.ContainerSetFocusChainMethodInfo
ResolveDialerMethod "setFocusChild" o = Gtk.Container.ContainerSetFocusChildMethodInfo
ResolveDialerMethod "setFocusHadjustment" o = Gtk.Container.ContainerSetFocusHadjustmentMethodInfo
ResolveDialerMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
ResolveDialerMethod "setFocusVadjustment" o = Gtk.Container.ContainerSetFocusVadjustmentMethodInfo
ResolveDialerMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
ResolveDialerMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
ResolveDialerMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
ResolveDialerMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
ResolveDialerMethod "setHasWindow" o = Gtk.Widget.WidgetSetHasWindowMethodInfo
ResolveDialerMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
ResolveDialerMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
ResolveDialerMethod "setMapped" o = Gtk.Widget.WidgetSetMappedMethodInfo
ResolveDialerMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
ResolveDialerMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
ResolveDialerMethod "setMarginLeft" o = Gtk.Widget.WidgetSetMarginLeftMethodInfo
ResolveDialerMethod "setMarginRight" o = Gtk.Widget.WidgetSetMarginRightMethodInfo
ResolveDialerMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
ResolveDialerMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
ResolveDialerMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
ResolveDialerMethod "setNoShowAll" o = Gtk.Widget.WidgetSetNoShowAllMethodInfo
ResolveDialerMethod "setNumber" o = DialerSetNumberMethodInfo
ResolveDialerMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
ResolveDialerMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
ResolveDialerMethod "setParentWindow" o = Gtk.Widget.WidgetSetParentWindowMethodInfo
ResolveDialerMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveDialerMethod "setRealized" o = Gtk.Widget.WidgetSetRealizedMethodInfo
ResolveDialerMethod "setReallocateRedraws" o = Gtk.Container.ContainerSetReallocateRedrawsMethodInfo
ResolveDialerMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
ResolveDialerMethod "setRedrawOnAllocate" o = Gtk.Widget.WidgetSetRedrawOnAllocateMethodInfo
ResolveDialerMethod "setRelief" o = DialerSetReliefMethodInfo
ResolveDialerMethod "setResizeMode" o = Gtk.Container.ContainerSetResizeModeMethodInfo
ResolveDialerMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
ResolveDialerMethod "setShowActionButtons" o = DialerSetShowActionButtonsMethodInfo
ResolveDialerMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
ResolveDialerMethod "setState" o = Gtk.Widget.WidgetSetStateMethodInfo
ResolveDialerMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
ResolveDialerMethod "setStyle" o = Gtk.Widget.WidgetSetStyleMethodInfo
ResolveDialerMethod "setSupportMultidevice" o = Gtk.Widget.WidgetSetSupportMultideviceMethodInfo
ResolveDialerMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
ResolveDialerMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
ResolveDialerMethod "setTooltipWindow" o = Gtk.Widget.WidgetSetTooltipWindowMethodInfo
ResolveDialerMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
ResolveDialerMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
ResolveDialerMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
ResolveDialerMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
ResolveDialerMethod "setVisual" o = Gtk.Widget.WidgetSetVisualMethodInfo
ResolveDialerMethod "setWindow" o = Gtk.Widget.WidgetSetWindowMethodInfo
ResolveDialerMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveDialerMethod t Dialer, O.OverloadedMethod info Dialer p) => OL.IsLabel t (Dialer -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#if MIN_VERSION_base(4,13,0)
instance (info ~ ResolveDialerMethod t Dialer, O.OverloadedMethod info Dialer p, R.HasField t Dialer p) => R.HasField t Dialer p where
getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveDialerMethod t Dialer, O.OverloadedMethodInfo info Dialer) => OL.IsLabel t (O.MethodProxy info Dialer) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.MethodProxy
#else
fromLabel _ = O.MethodProxy
#endif
#endif
type DialerDeletedCallback =
IO ()
noDialerDeletedCallback :: Maybe DialerDeletedCallback
noDialerDeletedCallback :: Maybe (IO ())
noDialerDeletedCallback = Maybe (IO ())
forall a. Maybe a
Nothing
type C_DialerDeletedCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_DialerDeletedCallback :: C_DialerDeletedCallback -> IO (FunPtr C_DialerDeletedCallback)
genClosure_DialerDeleted :: MonadIO m => DialerDeletedCallback -> m (GClosure C_DialerDeletedCallback)
genClosure_DialerDeleted :: forall (m :: * -> *).
MonadIO m =>
IO () -> m (GClosure C_DialerDeletedCallback)
genClosure_DialerDeleted IO ()
cb = IO (GClosure C_DialerDeletedCallback)
-> m (GClosure C_DialerDeletedCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_DialerDeletedCallback)
-> m (GClosure C_DialerDeletedCallback))
-> IO (GClosure C_DialerDeletedCallback)
-> m (GClosure C_DialerDeletedCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_DialerDeletedCallback
cb' = IO () -> C_DialerDeletedCallback
wrap_DialerDeletedCallback IO ()
cb
C_DialerDeletedCallback -> IO (FunPtr C_DialerDeletedCallback)
mk_DialerDeletedCallback C_DialerDeletedCallback
cb' IO (FunPtr C_DialerDeletedCallback)
-> (FunPtr C_DialerDeletedCallback
-> IO (GClosure C_DialerDeletedCallback))
-> IO (GClosure C_DialerDeletedCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_DialerDeletedCallback
-> IO (GClosure C_DialerDeletedCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_DialerDeletedCallback ::
DialerDeletedCallback ->
C_DialerDeletedCallback
wrap_DialerDeletedCallback :: IO () -> C_DialerDeletedCallback
wrap_DialerDeletedCallback IO ()
_cb Ptr ()
_ Ptr ()
_ = do
IO ()
_cb
onDialerDeleted :: (IsDialer a, MonadIO m) => a -> DialerDeletedCallback -> m SignalHandlerId
onDialerDeleted :: forall a (m :: * -> *).
(IsDialer a, MonadIO m) =>
a -> IO () -> m SignalHandlerId
onDialerDeleted 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_DialerDeletedCallback
cb' = IO () -> C_DialerDeletedCallback
wrap_DialerDeletedCallback IO ()
cb
FunPtr C_DialerDeletedCallback
cb'' <- C_DialerDeletedCallback -> IO (FunPtr C_DialerDeletedCallback)
mk_DialerDeletedCallback C_DialerDeletedCallback
cb'
a
-> Text
-> FunPtr C_DialerDeletedCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"deleted" FunPtr C_DialerDeletedCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterDialerDeleted :: (IsDialer a, MonadIO m) => a -> DialerDeletedCallback -> m SignalHandlerId
afterDialerDeleted :: forall a (m :: * -> *).
(IsDialer a, MonadIO m) =>
a -> IO () -> m SignalHandlerId
afterDialerDeleted 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_DialerDeletedCallback
cb' = IO () -> C_DialerDeletedCallback
wrap_DialerDeletedCallback IO ()
cb
FunPtr C_DialerDeletedCallback
cb'' <- C_DialerDeletedCallback -> IO (FunPtr C_DialerDeletedCallback)
mk_DialerDeletedCallback C_DialerDeletedCallback
cb'
a
-> Text
-> FunPtr C_DialerDeletedCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"deleted" FunPtr C_DialerDeletedCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data DialerDeletedSignalInfo
instance SignalInfo DialerDeletedSignalInfo where
type HaskellCallbackType DialerDeletedSignalInfo = DialerDeletedCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_DialerDeletedCallback cb
cb'' <- mk_DialerDeletedCallback cb'
connectSignalFunPtr obj "deleted" cb'' connectMode detail
#endif
type DialerSubmittedCallback =
T.Text
-> IO ()
noDialerSubmittedCallback :: Maybe DialerSubmittedCallback
noDialerSubmittedCallback :: Maybe DialerSubmittedCallback
noDialerSubmittedCallback = Maybe DialerSubmittedCallback
forall a. Maybe a
Nothing
type C_DialerSubmittedCallback =
Ptr () ->
CString ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_DialerSubmittedCallback :: C_DialerSubmittedCallback -> IO (FunPtr C_DialerSubmittedCallback)
genClosure_DialerSubmitted :: MonadIO m => DialerSubmittedCallback -> m (GClosure C_DialerSubmittedCallback)
genClosure_DialerSubmitted :: forall (m :: * -> *).
MonadIO m =>
DialerSubmittedCallback -> m (GClosure C_DialerSubmittedCallback)
genClosure_DialerSubmitted DialerSubmittedCallback
cb = IO (GClosure C_DialerSubmittedCallback)
-> m (GClosure C_DialerSubmittedCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_DialerSubmittedCallback)
-> m (GClosure C_DialerSubmittedCallback))
-> IO (GClosure C_DialerSubmittedCallback)
-> m (GClosure C_DialerSubmittedCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_DialerSubmittedCallback
cb' = DialerSubmittedCallback -> C_DialerSubmittedCallback
wrap_DialerSubmittedCallback DialerSubmittedCallback
cb
C_DialerSubmittedCallback -> IO (FunPtr C_DialerSubmittedCallback)
mk_DialerSubmittedCallback C_DialerSubmittedCallback
cb' IO (FunPtr C_DialerSubmittedCallback)
-> (FunPtr C_DialerSubmittedCallback
-> IO (GClosure C_DialerSubmittedCallback))
-> IO (GClosure C_DialerSubmittedCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_DialerSubmittedCallback
-> IO (GClosure C_DialerSubmittedCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_DialerSubmittedCallback ::
DialerSubmittedCallback ->
C_DialerSubmittedCallback
wrap_DialerSubmittedCallback :: DialerSubmittedCallback -> C_DialerSubmittedCallback
wrap_DialerSubmittedCallback DialerSubmittedCallback
_cb Ptr ()
_ CString
number Ptr ()
_ = do
Text
number' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
number
DialerSubmittedCallback
_cb Text
number'
onDialerSubmitted :: (IsDialer a, MonadIO m) => a -> DialerSubmittedCallback -> m SignalHandlerId
onDialerSubmitted :: forall a (m :: * -> *).
(IsDialer a, MonadIO m) =>
a -> DialerSubmittedCallback -> m SignalHandlerId
onDialerSubmitted a
obj DialerSubmittedCallback
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_DialerSubmittedCallback
cb' = DialerSubmittedCallback -> C_DialerSubmittedCallback
wrap_DialerSubmittedCallback DialerSubmittedCallback
cb
FunPtr C_DialerSubmittedCallback
cb'' <- C_DialerSubmittedCallback -> IO (FunPtr C_DialerSubmittedCallback)
mk_DialerSubmittedCallback C_DialerSubmittedCallback
cb'
a
-> Text
-> FunPtr C_DialerSubmittedCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"submitted" FunPtr C_DialerSubmittedCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterDialerSubmitted :: (IsDialer a, MonadIO m) => a -> DialerSubmittedCallback -> m SignalHandlerId
afterDialerSubmitted :: forall a (m :: * -> *).
(IsDialer a, MonadIO m) =>
a -> DialerSubmittedCallback -> m SignalHandlerId
afterDialerSubmitted a
obj DialerSubmittedCallback
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_DialerSubmittedCallback
cb' = DialerSubmittedCallback -> C_DialerSubmittedCallback
wrap_DialerSubmittedCallback DialerSubmittedCallback
cb
FunPtr C_DialerSubmittedCallback
cb'' <- C_DialerSubmittedCallback -> IO (FunPtr C_DialerSubmittedCallback)
mk_DialerSubmittedCallback C_DialerSubmittedCallback
cb'
a
-> Text
-> FunPtr C_DialerSubmittedCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"submitted" FunPtr C_DialerSubmittedCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data DialerSubmittedSignalInfo
instance SignalInfo DialerSubmittedSignalInfo where
type HaskellCallbackType DialerSubmittedSignalInfo = DialerSubmittedCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_DialerSubmittedCallback cb
cb'' <- mk_DialerSubmittedCallback cb'
connectSignalFunPtr obj "submitted" cb'' connectMode detail
#endif
type DialerSymbolClickedCallback =
Int8
-> IO ()
noDialerSymbolClickedCallback :: Maybe DialerSymbolClickedCallback
noDialerSymbolClickedCallback :: Maybe DialerSymbolClickedCallback
noDialerSymbolClickedCallback = Maybe DialerSymbolClickedCallback
forall a. Maybe a
Nothing
type C_DialerSymbolClickedCallback =
Ptr () ->
Int8 ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_DialerSymbolClickedCallback :: C_DialerSymbolClickedCallback -> IO (FunPtr C_DialerSymbolClickedCallback)
genClosure_DialerSymbolClicked :: MonadIO m => DialerSymbolClickedCallback -> m (GClosure C_DialerSymbolClickedCallback)
genClosure_DialerSymbolClicked :: forall (m :: * -> *).
MonadIO m =>
DialerSymbolClickedCallback
-> m (GClosure C_DialerSymbolClickedCallback)
genClosure_DialerSymbolClicked DialerSymbolClickedCallback
cb = IO (GClosure C_DialerSymbolClickedCallback)
-> m (GClosure C_DialerSymbolClickedCallback)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (GClosure C_DialerSymbolClickedCallback)
-> m (GClosure C_DialerSymbolClickedCallback))
-> IO (GClosure C_DialerSymbolClickedCallback)
-> m (GClosure C_DialerSymbolClickedCallback)
forall a b. (a -> b) -> a -> b
$ do
let cb' :: C_DialerSymbolClickedCallback
cb' = DialerSymbolClickedCallback -> C_DialerSymbolClickedCallback
wrap_DialerSymbolClickedCallback DialerSymbolClickedCallback
cb
C_DialerSymbolClickedCallback
-> IO (FunPtr C_DialerSymbolClickedCallback)
mk_DialerSymbolClickedCallback C_DialerSymbolClickedCallback
cb' IO (FunPtr C_DialerSymbolClickedCallback)
-> (FunPtr C_DialerSymbolClickedCallback
-> IO (GClosure C_DialerSymbolClickedCallback))
-> IO (GClosure C_DialerSymbolClickedCallback)
forall (m :: * -> *) a b. Monad m => m a -> (a -> m b) -> m b
>>= FunPtr C_DialerSymbolClickedCallback
-> IO (GClosure C_DialerSymbolClickedCallback)
forall (m :: * -> *) a. MonadIO m => FunPtr a -> m (GClosure a)
B.GClosure.newGClosure
wrap_DialerSymbolClickedCallback ::
DialerSymbolClickedCallback ->
C_DialerSymbolClickedCallback
wrap_DialerSymbolClickedCallback :: DialerSymbolClickedCallback -> C_DialerSymbolClickedCallback
wrap_DialerSymbolClickedCallback DialerSymbolClickedCallback
_cb Ptr ()
_ Int8
button Ptr ()
_ = do
DialerSymbolClickedCallback
_cb Int8
button
onDialerSymbolClicked :: (IsDialer a, MonadIO m) => a -> DialerSymbolClickedCallback -> m SignalHandlerId
onDialerSymbolClicked :: forall a (m :: * -> *).
(IsDialer a, MonadIO m) =>
a -> DialerSymbolClickedCallback -> m SignalHandlerId
onDialerSymbolClicked a
obj DialerSymbolClickedCallback
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_DialerSymbolClickedCallback
cb' = DialerSymbolClickedCallback -> C_DialerSymbolClickedCallback
wrap_DialerSymbolClickedCallback DialerSymbolClickedCallback
cb
FunPtr C_DialerSymbolClickedCallback
cb'' <- C_DialerSymbolClickedCallback
-> IO (FunPtr C_DialerSymbolClickedCallback)
mk_DialerSymbolClickedCallback C_DialerSymbolClickedCallback
cb'
a
-> Text
-> FunPtr C_DialerSymbolClickedCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"symbol-clicked" FunPtr C_DialerSymbolClickedCallback
cb'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterDialerSymbolClicked :: (IsDialer a, MonadIO m) => a -> DialerSymbolClickedCallback -> m SignalHandlerId
afterDialerSymbolClicked :: forall a (m :: * -> *).
(IsDialer a, MonadIO m) =>
a -> DialerSymbolClickedCallback -> m SignalHandlerId
afterDialerSymbolClicked a
obj DialerSymbolClickedCallback
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_DialerSymbolClickedCallback
cb' = DialerSymbolClickedCallback -> C_DialerSymbolClickedCallback
wrap_DialerSymbolClickedCallback DialerSymbolClickedCallback
cb
FunPtr C_DialerSymbolClickedCallback
cb'' <- C_DialerSymbolClickedCallback
-> IO (FunPtr C_DialerSymbolClickedCallback)
mk_DialerSymbolClickedCallback C_DialerSymbolClickedCallback
cb'
a
-> Text
-> FunPtr C_DialerSymbolClickedCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"symbol-clicked" FunPtr C_DialerSymbolClickedCallback
cb'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data DialerSymbolClickedSignalInfo
instance SignalInfo DialerSymbolClickedSignalInfo where
type HaskellCallbackType DialerSymbolClickedSignalInfo = DialerSymbolClickedCallback
connectSignal obj cb connectMode detail = do
let cb' = wrap_DialerSymbolClickedCallback cb
cb'' <- mk_DialerSymbolClickedCallback cb'
connectSignalFunPtr obj "symbol-clicked" cb'' connectMode detail
#endif
getDialerColumnSpacing :: (MonadIO m, IsDialer o) => o -> m Word32
getDialerColumnSpacing :: forall (m :: * -> *) o. (MonadIO m, IsDialer o) => o -> m Word32
getDialerColumnSpacing o
obj = IO Word32 -> m Word32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Word32
forall a. GObject a => a -> String -> IO Word32
B.Properties.getObjectPropertyUInt32 o
obj String
"column-spacing"
setDialerColumnSpacing :: (MonadIO m, IsDialer o) => o -> Word32 -> m ()
setDialerColumnSpacing :: forall (m :: * -> *) o.
(MonadIO m, IsDialer o) =>
o -> Word32 -> m ()
setDialerColumnSpacing o
obj Word32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Word32 -> IO ()
forall a. GObject a => a -> String -> Word32 -> IO ()
B.Properties.setObjectPropertyUInt32 o
obj String
"column-spacing" Word32
val
constructDialerColumnSpacing :: (IsDialer o, MIO.MonadIO m) => Word32 -> m (GValueConstruct o)
constructDialerColumnSpacing :: forall o (m :: * -> *).
(IsDialer o, MonadIO m) =>
Word32 -> m (GValueConstruct o)
constructDialerColumnSpacing Word32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Word32 -> IO (GValueConstruct o)
forall o. String -> Word32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyUInt32 String
"column-spacing" Word32
val
#if defined(ENABLE_OVERLOADING)
data DialerColumnSpacingPropertyInfo
instance AttrInfo DialerColumnSpacingPropertyInfo where
type AttrAllowedOps DialerColumnSpacingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DialerColumnSpacingPropertyInfo = IsDialer
type AttrSetTypeConstraint DialerColumnSpacingPropertyInfo = (~) Word32
type AttrTransferTypeConstraint DialerColumnSpacingPropertyInfo = (~) Word32
type AttrTransferType DialerColumnSpacingPropertyInfo = Word32
type AttrGetType DialerColumnSpacingPropertyInfo = Word32
type AttrLabel DialerColumnSpacingPropertyInfo = "column-spacing"
type AttrOrigin DialerColumnSpacingPropertyInfo = Dialer
attrGet = getDialerColumnSpacing
attrSet = setDialerColumnSpacing
attrTransfer _ v = do
return v
attrConstruct = constructDialerColumnSpacing
attrClear = undefined
#endif
getDialerNumber :: (MonadIO m, IsDialer o) => o -> m T.Text
getDialerNumber :: forall (m :: * -> *) o. (MonadIO m, IsDialer o) => o -> m Text
getDialerNumber o
obj = IO Text -> m Text
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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
"getDialerNumber" (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
"number"
setDialerNumber :: (MonadIO m, IsDialer o) => o -> T.Text -> m ()
setDialerNumber :: forall (m :: * -> *) o.
(MonadIO m, IsDialer o) =>
o -> Text -> m ()
setDialerNumber o
obj Text
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Maybe Text -> IO ()
forall a. GObject a => a -> String -> Maybe Text -> IO ()
B.Properties.setObjectPropertyString o
obj String
"number" (Text -> Maybe Text
forall a. a -> Maybe a
Just Text
val)
constructDialerNumber :: (IsDialer o, MIO.MonadIO m) => T.Text -> m (GValueConstruct o)
constructDialerNumber :: forall o (m :: * -> *).
(IsDialer o, MonadIO m) =>
Text -> m (GValueConstruct o)
constructDialerNumber 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
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (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
"number" (Text -> Maybe Text
forall a. a -> Maybe a
P.Just Text
val)
#if defined(ENABLE_OVERLOADING)
data DialerNumberPropertyInfo
instance AttrInfo DialerNumberPropertyInfo where
type AttrAllowedOps DialerNumberPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DialerNumberPropertyInfo = IsDialer
type AttrSetTypeConstraint DialerNumberPropertyInfo = (~) T.Text
type AttrTransferTypeConstraint DialerNumberPropertyInfo = (~) T.Text
type AttrTransferType DialerNumberPropertyInfo = T.Text
type AttrGetType DialerNumberPropertyInfo = T.Text
type AttrLabel DialerNumberPropertyInfo = "number"
type AttrOrigin DialerNumberPropertyInfo = Dialer
attrGet = getDialerNumber
attrSet = setDialerNumber
attrTransfer _ v = do
return v
attrConstruct = constructDialerNumber
attrClear = undefined
#endif
getDialerRelief :: (MonadIO m, IsDialer o) => o -> m Gtk.Enums.ReliefStyle
getDialerRelief :: forall (m :: * -> *) o.
(MonadIO m, IsDialer o) =>
o -> m ReliefStyle
getDialerRelief o
obj = IO ReliefStyle -> m ReliefStyle
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO ReliefStyle -> m ReliefStyle)
-> IO ReliefStyle -> m ReliefStyle
forall a b. (a -> b) -> a -> b
$ o -> String -> IO ReliefStyle
forall a b. (GObject a, Enum b, BoxedEnum b) => a -> String -> IO b
B.Properties.getObjectPropertyEnum o
obj String
"relief"
setDialerRelief :: (MonadIO m, IsDialer o) => o -> Gtk.Enums.ReliefStyle -> m ()
setDialerRelief :: forall (m :: * -> *) o.
(MonadIO m, IsDialer o) =>
o -> ReliefStyle -> m ()
setDialerRelief o
obj ReliefStyle
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> ReliefStyle -> IO ()
forall a b.
(GObject a, Enum b, BoxedEnum b) =>
a -> String -> b -> IO ()
B.Properties.setObjectPropertyEnum o
obj String
"relief" ReliefStyle
val
constructDialerRelief :: (IsDialer o, MIO.MonadIO m) => Gtk.Enums.ReliefStyle -> m (GValueConstruct o)
constructDialerRelief :: forall o (m :: * -> *).
(IsDialer o, MonadIO m) =>
ReliefStyle -> m (GValueConstruct o)
constructDialerRelief ReliefStyle
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
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> ReliefStyle -> IO (GValueConstruct o)
forall a o.
(Enum a, BoxedEnum a) =>
String -> a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyEnum String
"relief" ReliefStyle
val
#if defined(ENABLE_OVERLOADING)
data DialerReliefPropertyInfo
instance AttrInfo DialerReliefPropertyInfo where
type AttrAllowedOps DialerReliefPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DialerReliefPropertyInfo = IsDialer
type AttrSetTypeConstraint DialerReliefPropertyInfo = (~) Gtk.Enums.ReliefStyle
type AttrTransferTypeConstraint DialerReliefPropertyInfo = (~) Gtk.Enums.ReliefStyle
type AttrTransferType DialerReliefPropertyInfo = Gtk.Enums.ReliefStyle
type AttrGetType DialerReliefPropertyInfo = Gtk.Enums.ReliefStyle
type AttrLabel DialerReliefPropertyInfo = "relief"
type AttrOrigin DialerReliefPropertyInfo = Dialer
attrGet = getDialerRelief
attrSet = setDialerRelief
attrTransfer _ v = do
return v
attrConstruct = constructDialerRelief
attrClear = undefined
#endif
getDialerRowSpacing :: (MonadIO m, IsDialer o) => o -> m Word32
getDialerRowSpacing :: forall (m :: * -> *) o. (MonadIO m, IsDialer o) => o -> m Word32
getDialerRowSpacing o
obj = IO Word32 -> m Word32
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Word32 -> m Word32) -> IO Word32 -> m Word32
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Word32
forall a. GObject a => a -> String -> IO Word32
B.Properties.getObjectPropertyUInt32 o
obj String
"row-spacing"
setDialerRowSpacing :: (MonadIO m, IsDialer o) => o -> Word32 -> m ()
setDialerRowSpacing :: forall (m :: * -> *) o.
(MonadIO m, IsDialer o) =>
o -> Word32 -> m ()
setDialerRowSpacing o
obj Word32
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Word32 -> IO ()
forall a. GObject a => a -> String -> Word32 -> IO ()
B.Properties.setObjectPropertyUInt32 o
obj String
"row-spacing" Word32
val
constructDialerRowSpacing :: (IsDialer o, MIO.MonadIO m) => Word32 -> m (GValueConstruct o)
constructDialerRowSpacing :: forall o (m :: * -> *).
(IsDialer o, MonadIO m) =>
Word32 -> m (GValueConstruct o)
constructDialerRowSpacing Word32
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Word32 -> IO (GValueConstruct o)
forall o. String -> Word32 -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyUInt32 String
"row-spacing" Word32
val
#if defined(ENABLE_OVERLOADING)
data DialerRowSpacingPropertyInfo
instance AttrInfo DialerRowSpacingPropertyInfo where
type AttrAllowedOps DialerRowSpacingPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DialerRowSpacingPropertyInfo = IsDialer
type AttrSetTypeConstraint DialerRowSpacingPropertyInfo = (~) Word32
type AttrTransferTypeConstraint DialerRowSpacingPropertyInfo = (~) Word32
type AttrTransferType DialerRowSpacingPropertyInfo = Word32
type AttrGetType DialerRowSpacingPropertyInfo = Word32
type AttrLabel DialerRowSpacingPropertyInfo = "row-spacing"
type AttrOrigin DialerRowSpacingPropertyInfo = Dialer
attrGet = getDialerRowSpacing
attrSet = setDialerRowSpacing
attrTransfer _ v = do
return v
attrConstruct = constructDialerRowSpacing
attrClear = undefined
#endif
getDialerShowActionButtons :: (MonadIO m, IsDialer o) => o -> m Bool
getDialerShowActionButtons :: forall (m :: * -> *) o. (MonadIO m, IsDialer o) => o -> m Bool
getDialerShowActionButtons o
obj = IO Bool -> m Bool
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.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
"show-action-buttons"
setDialerShowActionButtons :: (MonadIO m, IsDialer o) => o -> Bool -> m ()
setDialerShowActionButtons :: forall (m :: * -> *) o.
(MonadIO m, IsDialer o) =>
o -> Bool -> m ()
setDialerShowActionButtons o
obj Bool
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"show-action-buttons" Bool
val
constructDialerShowActionButtons :: (IsDialer o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructDialerShowActionButtons :: forall o (m :: * -> *).
(IsDialer o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructDialerShowActionButtons 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
$ do
IO (GValueConstruct o) -> IO (GValueConstruct o)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (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
"show-action-buttons" Bool
val
#if defined(ENABLE_OVERLOADING)
data DialerShowActionButtonsPropertyInfo
instance AttrInfo DialerShowActionButtonsPropertyInfo where
type AttrAllowedOps DialerShowActionButtonsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint DialerShowActionButtonsPropertyInfo = IsDialer
type AttrSetTypeConstraint DialerShowActionButtonsPropertyInfo = (~) Bool
type AttrTransferTypeConstraint DialerShowActionButtonsPropertyInfo = (~) Bool
type AttrTransferType DialerShowActionButtonsPropertyInfo = Bool
type AttrGetType DialerShowActionButtonsPropertyInfo = Bool
type AttrLabel DialerShowActionButtonsPropertyInfo = "show-action-buttons"
type AttrOrigin DialerShowActionButtonsPropertyInfo = Dialer
attrGet = getDialerShowActionButtons
attrSet = setDialerShowActionButtons
attrTransfer _ v = do
return v
attrConstruct = constructDialerShowActionButtons
attrClear = undefined
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList Dialer
type instance O.AttributeList Dialer = DialerAttributeList
type DialerAttributeList = ('[ '("appPaintable", Gtk.Widget.WidgetAppPaintablePropertyInfo), '("borderWidth", Gtk.Container.ContainerBorderWidthPropertyInfo), '("canDefault", Gtk.Widget.WidgetCanDefaultPropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("child", Gtk.Container.ContainerChildPropertyInfo), '("columnSpacing", DialerColumnSpacingPropertyInfo), '("compositeChild", Gtk.Widget.WidgetCompositeChildPropertyInfo), '("doubleBuffered", Gtk.Widget.WidgetDoubleBufferedPropertyInfo), '("events", Gtk.Widget.WidgetEventsPropertyInfo), '("expand", Gtk.Widget.WidgetExpandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("isFocus", Gtk.Widget.WidgetIsFocusPropertyInfo), '("margin", Gtk.Widget.WidgetMarginPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginLeft", Gtk.Widget.WidgetMarginLeftPropertyInfo), '("marginRight", Gtk.Widget.WidgetMarginRightPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("noShowAll", Gtk.Widget.WidgetNoShowAllPropertyInfo), '("number", DialerNumberPropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("relief", DialerReliefPropertyInfo), '("resizeMode", Gtk.Container.ContainerResizeModePropertyInfo), '("rowSpacing", DialerRowSpacingPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("showActionButtons", DialerShowActionButtonsPropertyInfo), '("style", Gtk.Widget.WidgetStylePropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo), '("window", Gtk.Widget.WidgetWindowPropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
dialerColumnSpacing :: AttrLabelProxy "columnSpacing"
dialerColumnSpacing = AttrLabelProxy
dialerNumber :: AttrLabelProxy "number"
dialerNumber = AttrLabelProxy
dialerRelief :: AttrLabelProxy "relief"
dialerRelief = AttrLabelProxy
dialerRowSpacing :: AttrLabelProxy "rowSpacing"
dialerRowSpacing = AttrLabelProxy
dialerShowActionButtons :: AttrLabelProxy "showActionButtons"
dialerShowActionButtons = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList Dialer = DialerSignalList
type DialerSignalList = ('[ '("accelClosuresChanged", Gtk.Widget.WidgetAccelClosuresChangedSignalInfo), '("add", Gtk.Container.ContainerAddSignalInfo), '("buttonPressEvent", Gtk.Widget.WidgetButtonPressEventSignalInfo), '("buttonReleaseEvent", Gtk.Widget.WidgetButtonReleaseEventSignalInfo), '("canActivateAccel", Gtk.Widget.WidgetCanActivateAccelSignalInfo), '("checkResize", Gtk.Container.ContainerCheckResizeSignalInfo), '("childNotify", Gtk.Widget.WidgetChildNotifySignalInfo), '("compositedChanged", Gtk.Widget.WidgetCompositedChangedSignalInfo), '("configureEvent", Gtk.Widget.WidgetConfigureEventSignalInfo), '("damageEvent", Gtk.Widget.WidgetDamageEventSignalInfo), '("deleteEvent", Gtk.Widget.WidgetDeleteEventSignalInfo), '("deleted", DialerDeletedSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("destroyEvent", Gtk.Widget.WidgetDestroyEventSignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("dragBegin", Gtk.Widget.WidgetDragBeginSignalInfo), '("dragDataDelete", Gtk.Widget.WidgetDragDataDeleteSignalInfo), '("dragDataGet", Gtk.Widget.WidgetDragDataGetSignalInfo), '("dragDataReceived", Gtk.Widget.WidgetDragDataReceivedSignalInfo), '("dragDrop", Gtk.Widget.WidgetDragDropSignalInfo), '("dragEnd", Gtk.Widget.WidgetDragEndSignalInfo), '("dragFailed", Gtk.Widget.WidgetDragFailedSignalInfo), '("dragLeave", Gtk.Widget.WidgetDragLeaveSignalInfo), '("dragMotion", Gtk.Widget.WidgetDragMotionSignalInfo), '("draw", Gtk.Widget.WidgetDrawSignalInfo), '("enterNotifyEvent", Gtk.Widget.WidgetEnterNotifyEventSignalInfo), '("event", Gtk.Widget.WidgetEventSignalInfo), '("eventAfter", Gtk.Widget.WidgetEventAfterSignalInfo), '("focus", Gtk.Widget.WidgetFocusSignalInfo), '("focusInEvent", Gtk.Widget.WidgetFocusInEventSignalInfo), '("focusOutEvent", Gtk.Widget.WidgetFocusOutEventSignalInfo), '("grabBrokenEvent", Gtk.Widget.WidgetGrabBrokenEventSignalInfo), '("grabFocus", Gtk.Widget.WidgetGrabFocusSignalInfo), '("grabNotify", Gtk.Widget.WidgetGrabNotifySignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("hierarchyChanged", Gtk.Widget.WidgetHierarchyChangedSignalInfo), '("keyPressEvent", Gtk.Widget.WidgetKeyPressEventSignalInfo), '("keyReleaseEvent", Gtk.Widget.WidgetKeyReleaseEventSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("leaveNotifyEvent", Gtk.Widget.WidgetLeaveNotifyEventSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mapEvent", Gtk.Widget.WidgetMapEventSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("motionNotifyEvent", Gtk.Widget.WidgetMotionNotifyEventSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("parentSet", Gtk.Widget.WidgetParentSetSignalInfo), '("popupMenu", Gtk.Widget.WidgetPopupMenuSignalInfo), '("propertyNotifyEvent", Gtk.Widget.WidgetPropertyNotifyEventSignalInfo), '("proximityInEvent", Gtk.Widget.WidgetProximityInEventSignalInfo), '("proximityOutEvent", Gtk.Widget.WidgetProximityOutEventSignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("remove", Gtk.Container.ContainerRemoveSignalInfo), '("screenChanged", Gtk.Widget.WidgetScreenChangedSignalInfo), '("scrollEvent", Gtk.Widget.WidgetScrollEventSignalInfo), '("selectionClearEvent", Gtk.Widget.WidgetSelectionClearEventSignalInfo), '("selectionGet", Gtk.Widget.WidgetSelectionGetSignalInfo), '("selectionNotifyEvent", Gtk.Widget.WidgetSelectionNotifyEventSignalInfo), '("selectionReceived", Gtk.Widget.WidgetSelectionReceivedSignalInfo), '("selectionRequestEvent", Gtk.Widget.WidgetSelectionRequestEventSignalInfo), '("setFocusChild", Gtk.Container.ContainerSetFocusChildSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("showHelp", Gtk.Widget.WidgetShowHelpSignalInfo), '("sizeAllocate", Gtk.Widget.WidgetSizeAllocateSignalInfo), '("stateChanged", Gtk.Widget.WidgetStateChangedSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("styleSet", Gtk.Widget.WidgetStyleSetSignalInfo), '("styleUpdated", Gtk.Widget.WidgetStyleUpdatedSignalInfo), '("submitted", DialerSubmittedSignalInfo), '("symbolClicked", DialerSymbolClickedSignalInfo), '("touchEvent", Gtk.Widget.WidgetTouchEventSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unmapEvent", Gtk.Widget.WidgetUnmapEventSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo), '("visibilityNotifyEvent", Gtk.Widget.WidgetVisibilityNotifyEventSignalInfo), '("windowStateEvent", Gtk.Widget.WidgetWindowStateEventSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "hdy_dialer_new" hdy_dialer_new ::
IO (Ptr Dialer)
{-# DEPRECATED dialerNew ["(Since version 0.0.12)","use t'GI.Handy.Objects.Keypad.Keypad' instead"] #-}
dialerNew ::
(B.CallStack.HasCallStack, MonadIO m) =>
m Dialer
dialerNew :: forall (m :: * -> *). (HasCallStack, MonadIO m) => m Dialer
dialerNew = IO Dialer -> m Dialer
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Dialer -> m Dialer) -> IO Dialer -> m Dialer
forall a b. (a -> b) -> a -> b
$ do
Ptr Dialer
result <- IO (Ptr Dialer)
hdy_dialer_new
Text -> Ptr Dialer -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"dialerNew" Ptr Dialer
result
Dialer
result' <- ((ManagedPtr Dialer -> Dialer) -> Ptr Dialer -> IO Dialer
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Dialer -> Dialer
Dialer) Ptr Dialer
result
Dialer -> IO Dialer
forall (m :: * -> *) a. Monad m => a -> m a
return Dialer
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "hdy_dialer_clear_number" hdy_dialer_clear_number ::
Ptr Dialer ->
IO ()
{-# DEPRECATED dialerClearNumber ["(Since version 0.0.12)","use t'GI.Handy.Objects.Keypad.Keypad' instead"] #-}
dialerClearNumber ::
(B.CallStack.HasCallStack, MonadIO m, IsDialer a) =>
a
-> m ()
dialerClearNumber :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDialer a) =>
a -> m ()
dialerClearNumber a
self = 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 Dialer
self' <- a -> IO (Ptr Dialer)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr Dialer -> IO ()
hdy_dialer_clear_number Ptr Dialer
self'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DialerClearNumberMethodInfo
instance (signature ~ (m ()), MonadIO m, IsDialer a) => O.OverloadedMethod DialerClearNumberMethodInfo a signature where
overloadedMethod = dialerClearNumber
instance O.OverloadedMethodInfo DialerClearNumberMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Handy.Objects.Dialer.dialerClearNumber",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-handy-0.0.8/docs/GI-Handy-Objects-Dialer.html#v:dialerClearNumber"
}
#endif
foreign import ccall "hdy_dialer_get_number" hdy_dialer_get_number ::
Ptr Dialer ->
IO CString
{-# DEPRECATED dialerGetNumber ["(Since version 0.0.12)","use t'GI.Handy.Objects.Keypad.Keypad' instead"] #-}
dialerGetNumber ::
(B.CallStack.HasCallStack, MonadIO m, IsDialer a) =>
a
-> m T.Text
dialerGetNumber :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDialer a) =>
a -> m Text
dialerGetNumber a
self = 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 Dialer
self' <- a -> IO (Ptr Dialer)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
result <- Ptr Dialer -> IO CString
hdy_dialer_get_number Ptr Dialer
self'
Text -> CString -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"dialerGetNumber" CString
result
Text
result' <- HasCallStack => CString -> IO Text
CString -> IO Text
cstringToText CString
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Text -> IO Text
forall (m :: * -> *) a. Monad m => a -> m a
return Text
result'
#if defined(ENABLE_OVERLOADING)
data DialerGetNumberMethodInfo
instance (signature ~ (m T.Text), MonadIO m, IsDialer a) => O.OverloadedMethod DialerGetNumberMethodInfo a signature where
overloadedMethod = dialerGetNumber
instance O.OverloadedMethodInfo DialerGetNumberMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Handy.Objects.Dialer.dialerGetNumber",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-handy-0.0.8/docs/GI-Handy-Objects-Dialer.html#v:dialerGetNumber"
}
#endif
foreign import ccall "hdy_dialer_get_relief" hdy_dialer_get_relief ::
Ptr Dialer ->
IO CUInt
{-# DEPRECATED dialerGetRelief ["(Since version 0.0.12)","use t'GI.Handy.Objects.Keypad.Keypad' instead"] #-}
dialerGetRelief ::
(B.CallStack.HasCallStack, MonadIO m, IsDialer a) =>
a
-> m Gtk.Enums.ReliefStyle
dialerGetRelief :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDialer a) =>
a -> m ReliefStyle
dialerGetRelief a
self = IO ReliefStyle -> m ReliefStyle
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO ReliefStyle -> m ReliefStyle)
-> IO ReliefStyle -> m ReliefStyle
forall a b. (a -> b) -> a -> b
$ do
Ptr Dialer
self' <- a -> IO (Ptr Dialer)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CUInt
result <- Ptr Dialer -> IO CUInt
hdy_dialer_get_relief Ptr Dialer
self'
let result' :: ReliefStyle
result' = (Int -> ReliefStyle
forall a. Enum a => Int -> a
toEnum (Int -> ReliefStyle) -> (CUInt -> Int) -> CUInt -> ReliefStyle
forall b c a. (b -> c) -> (a -> b) -> a -> c
. CUInt -> Int
forall a b. (Integral a, Num b) => a -> b
fromIntegral) CUInt
result
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
ReliefStyle -> IO ReliefStyle
forall (m :: * -> *) a. Monad m => a -> m a
return ReliefStyle
result'
#if defined(ENABLE_OVERLOADING)
data DialerGetReliefMethodInfo
instance (signature ~ (m Gtk.Enums.ReliefStyle), MonadIO m, IsDialer a) => O.OverloadedMethod DialerGetReliefMethodInfo a signature where
overloadedMethod = dialerGetRelief
instance O.OverloadedMethodInfo DialerGetReliefMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Handy.Objects.Dialer.dialerGetRelief",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-handy-0.0.8/docs/GI-Handy-Objects-Dialer.html#v:dialerGetRelief"
}
#endif
foreign import ccall "hdy_dialer_get_show_action_buttons" hdy_dialer_get_show_action_buttons ::
Ptr Dialer ->
IO CInt
{-# DEPRECATED dialerGetShowActionButtons ["(Since version 0.0.12)","use t'GI.Handy.Objects.Keypad.Keypad' instead"] #-}
dialerGetShowActionButtons ::
(B.CallStack.HasCallStack, MonadIO m, IsDialer a) =>
a
-> m Bool
dialerGetShowActionButtons :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDialer a) =>
a -> m Bool
dialerGetShowActionButtons a
self = 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 Dialer
self' <- a -> IO (Ptr Dialer)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CInt
result <- Ptr Dialer -> IO CInt
hdy_dialer_get_show_action_buttons Ptr Dialer
self'
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
self
Bool -> IO Bool
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data DialerGetShowActionButtonsMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsDialer a) => O.OverloadedMethod DialerGetShowActionButtonsMethodInfo a signature where
overloadedMethod = dialerGetShowActionButtons
instance O.OverloadedMethodInfo DialerGetShowActionButtonsMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Handy.Objects.Dialer.dialerGetShowActionButtons",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-handy-0.0.8/docs/GI-Handy-Objects-Dialer.html#v:dialerGetShowActionButtons"
}
#endif
foreign import ccall "hdy_dialer_set_number" hdy_dialer_set_number ::
Ptr Dialer ->
CString ->
IO ()
{-# DEPRECATED dialerSetNumber ["(Since version 0.0.12)","use t'GI.Handy.Objects.Keypad.Keypad' instead"] #-}
dialerSetNumber ::
(B.CallStack.HasCallStack, MonadIO m, IsDialer a) =>
a
-> T.Text
-> m ()
dialerSetNumber :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDialer a) =>
a -> Text -> m ()
dialerSetNumber a
self Text
number = 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 Dialer
self' <- a -> IO (Ptr Dialer)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
CString
number' <- Text -> IO CString
textToCString Text
number
Ptr Dialer -> CString -> IO ()
hdy_dialer_set_number Ptr Dialer
self' CString
number'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
CString -> IO ()
forall a. Ptr a -> IO ()
freeMem CString
number'
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DialerSetNumberMethodInfo
instance (signature ~ (T.Text -> m ()), MonadIO m, IsDialer a) => O.OverloadedMethod DialerSetNumberMethodInfo a signature where
overloadedMethod = dialerSetNumber
instance O.OverloadedMethodInfo DialerSetNumberMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Handy.Objects.Dialer.dialerSetNumber",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-handy-0.0.8/docs/GI-Handy-Objects-Dialer.html#v:dialerSetNumber"
}
#endif
foreign import ccall "hdy_dialer_set_relief" hdy_dialer_set_relief ::
Ptr Dialer ->
CUInt ->
IO ()
{-# DEPRECATED dialerSetRelief ["(Since version 0.0.12)","use t'GI.Handy.Objects.Keypad.Keypad' instead"] #-}
dialerSetRelief ::
(B.CallStack.HasCallStack, MonadIO m, IsDialer a) =>
a
-> Gtk.Enums.ReliefStyle
-> m ()
dialerSetRelief :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDialer a) =>
a -> ReliefStyle -> m ()
dialerSetRelief a
self ReliefStyle
relief = 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 Dialer
self' <- a -> IO (Ptr Dialer)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let relief' :: CUInt
relief' = (Int -> CUInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CUInt) -> (ReliefStyle -> Int) -> ReliefStyle -> CUInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. ReliefStyle -> Int
forall a. Enum a => a -> Int
fromEnum) ReliefStyle
relief
Ptr Dialer -> CUInt -> IO ()
hdy_dialer_set_relief Ptr Dialer
self' CUInt
relief'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DialerSetReliefMethodInfo
instance (signature ~ (Gtk.Enums.ReliefStyle -> m ()), MonadIO m, IsDialer a) => O.OverloadedMethod DialerSetReliefMethodInfo a signature where
overloadedMethod = dialerSetRelief
instance O.OverloadedMethodInfo DialerSetReliefMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Handy.Objects.Dialer.dialerSetRelief",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-handy-0.0.8/docs/GI-Handy-Objects-Dialer.html#v:dialerSetRelief"
}
#endif
foreign import ccall "hdy_dialer_set_show_action_buttons" hdy_dialer_set_show_action_buttons ::
Ptr Dialer ->
CInt ->
IO ()
{-# DEPRECATED dialerSetShowActionButtons ["(Since version 0.0.12)","use t'GI.Handy.Objects.Keypad.Keypad' instead"] #-}
dialerSetShowActionButtons ::
(B.CallStack.HasCallStack, MonadIO m, IsDialer a) =>
a
-> Bool
-> m ()
dialerSetShowActionButtons :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsDialer a) =>
a -> Bool -> m ()
dialerSetShowActionButtons a
self Bool
show_ = 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 Dialer
self' <- a -> IO (Ptr Dialer)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
let show_' :: CInt
show_' = (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
show_
Ptr Dialer -> CInt -> IO ()
hdy_dialer_set_show_action_buttons Ptr Dialer
self' CInt
show_'
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data DialerSetShowActionButtonsMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsDialer a) => O.OverloadedMethod DialerSetShowActionButtonsMethodInfo a signature where
overloadedMethod = dialerSetShowActionButtons
instance O.OverloadedMethodInfo DialerSetShowActionButtonsMethodInfo a where
overloadedMethodInfo = O.MethodInfo {
O.overloadedMethodName = "GI.Handy.Objects.Dialer.dialerSetShowActionButtons",
O.overloadedMethodURL = "https://hackage.haskell.org/package/gi-handy-0.0.8/docs/GI-Handy-Objects-Dialer.html#v:dialerSetShowActionButtons"
}
#endif