module GI.Gtk.Objects.CellRenderer
(
CellRenderer(..) ,
IsCellRenderer ,
toCellRenderer ,
noCellRenderer ,
CellRendererActivateMethodInfo ,
cellRendererActivate ,
CellRendererGetAlignedAreaMethodInfo ,
cellRendererGetAlignedArea ,
CellRendererGetAlignmentMethodInfo ,
cellRendererGetAlignment ,
CellRendererGetFixedSizeMethodInfo ,
cellRendererGetFixedSize ,
CellRendererGetPaddingMethodInfo ,
cellRendererGetPadding ,
CellRendererGetPreferredHeightMethodInfo,
cellRendererGetPreferredHeight ,
CellRendererGetPreferredHeightForWidthMethodInfo,
cellRendererGetPreferredHeightForWidth ,
CellRendererGetPreferredSizeMethodInfo ,
cellRendererGetPreferredSize ,
CellRendererGetPreferredWidthMethodInfo ,
cellRendererGetPreferredWidth ,
CellRendererGetPreferredWidthForHeightMethodInfo,
cellRendererGetPreferredWidthForHeight ,
CellRendererGetRequestModeMethodInfo ,
cellRendererGetRequestMode ,
CellRendererGetSensitiveMethodInfo ,
cellRendererGetSensitive ,
CellRendererGetSizeMethodInfo ,
cellRendererGetSize ,
CellRendererGetStateMethodInfo ,
cellRendererGetState ,
CellRendererGetVisibleMethodInfo ,
cellRendererGetVisible ,
CellRendererIsActivatableMethodInfo ,
cellRendererIsActivatable ,
CellRendererRenderMethodInfo ,
cellRendererRender ,
CellRendererSetAlignmentMethodInfo ,
cellRendererSetAlignment ,
CellRendererSetFixedSizeMethodInfo ,
cellRendererSetFixedSize ,
CellRendererSetPaddingMethodInfo ,
cellRendererSetPadding ,
CellRendererSetSensitiveMethodInfo ,
cellRendererSetSensitive ,
CellRendererSetVisibleMethodInfo ,
cellRendererSetVisible ,
CellRendererStartEditingMethodInfo ,
cellRendererStartEditing ,
CellRendererStopEditingMethodInfo ,
cellRendererStopEditing ,
CellRendererCellBackgroundPropertyInfo ,
cellRendererCellBackground ,
clearCellRendererCellBackground ,
constructCellRendererCellBackground ,
setCellRendererCellBackground ,
CellRendererCellBackgroundGdkPropertyInfo,
cellRendererCellBackgroundGdk ,
clearCellRendererCellBackgroundGdk ,
constructCellRendererCellBackgroundGdk ,
getCellRendererCellBackgroundGdk ,
setCellRendererCellBackgroundGdk ,
CellRendererCellBackgroundRgbaPropertyInfo,
cellRendererCellBackgroundRgba ,
clearCellRendererCellBackgroundRgba ,
constructCellRendererCellBackgroundRgba ,
getCellRendererCellBackgroundRgba ,
setCellRendererCellBackgroundRgba ,
CellRendererCellBackgroundSetPropertyInfo,
cellRendererCellBackgroundSet ,
constructCellRendererCellBackgroundSet ,
getCellRendererCellBackgroundSet ,
setCellRendererCellBackgroundSet ,
CellRendererEditingPropertyInfo ,
cellRendererEditing ,
getCellRendererEditing ,
CellRendererHeightPropertyInfo ,
cellRendererHeight ,
constructCellRendererHeight ,
getCellRendererHeight ,
setCellRendererHeight ,
CellRendererIsExpandedPropertyInfo ,
cellRendererIsExpanded ,
constructCellRendererIsExpanded ,
getCellRendererIsExpanded ,
setCellRendererIsExpanded ,
CellRendererIsExpanderPropertyInfo ,
cellRendererIsExpander ,
constructCellRendererIsExpander ,
getCellRendererIsExpander ,
setCellRendererIsExpander ,
CellRendererModePropertyInfo ,
cellRendererMode ,
constructCellRendererMode ,
getCellRendererMode ,
setCellRendererMode ,
CellRendererSensitivePropertyInfo ,
cellRendererSensitive ,
constructCellRendererSensitive ,
getCellRendererSensitive ,
setCellRendererSensitive ,
CellRendererVisiblePropertyInfo ,
cellRendererVisible ,
constructCellRendererVisible ,
getCellRendererVisible ,
setCellRendererVisible ,
CellRendererWidthPropertyInfo ,
cellRendererWidth ,
constructCellRendererWidth ,
getCellRendererWidth ,
setCellRendererWidth ,
CellRendererXalignPropertyInfo ,
cellRendererXalign ,
constructCellRendererXalign ,
getCellRendererXalign ,
setCellRendererXalign ,
CellRendererXpadPropertyInfo ,
cellRendererXpad ,
constructCellRendererXpad ,
getCellRendererXpad ,
setCellRendererXpad ,
CellRendererYalignPropertyInfo ,
cellRendererYalign ,
constructCellRendererYalign ,
getCellRendererYalign ,
setCellRendererYalign ,
CellRendererYpadPropertyInfo ,
cellRendererYpad ,
constructCellRendererYpad ,
getCellRendererYpad ,
setCellRendererYpad ,
C_CellRendererEditingCanceledCallback ,
CellRendererEditingCanceledCallback ,
CellRendererEditingCanceledSignalInfo ,
afterCellRendererEditingCanceled ,
genClosure_CellRendererEditingCanceled ,
mk_CellRendererEditingCanceledCallback ,
noCellRendererEditingCanceledCallback ,
onCellRendererEditingCanceled ,
wrap_CellRendererEditingCanceledCallback,
C_CellRendererEditingStartedCallback ,
CellRendererEditingStartedCallback ,
CellRendererEditingStartedSignalInfo ,
afterCellRendererEditingStarted ,
genClosure_CellRendererEditingStarted ,
mk_CellRendererEditingStartedCallback ,
noCellRendererEditingStartedCallback ,
onCellRendererEditingStarted ,
wrap_CellRendererEditingStartedCallback ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GI.Cairo.Structs.Context as Cairo.Context
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gdk.Structs.Color as Gdk.Color
import qualified GI.Gdk.Structs.RGBA as Gdk.RGBA
import qualified GI.Gdk.Structs.Rectangle as Gdk.Rectangle
import qualified GI.Gdk.Unions.Event as Gdk.Event
import qualified GI.Gtk.Enums as Gtk.Enums
import qualified GI.Gtk.Flags as Gtk.Flags
import qualified GI.Gtk.Interfaces.CellEditable as Gtk.CellEditable
import qualified GI.Gtk.Objects.Widget as Gtk.Widget
import qualified GI.Gtk.Structs.Requisition as Gtk.Requisition
newtype CellRenderer = CellRenderer (ManagedPtr CellRenderer)
foreign import ccall "gtk_cell_renderer_get_type"
c_gtk_cell_renderer_get_type :: IO GType
instance GObject CellRenderer where
gobjectType _ = c_gtk_cell_renderer_get_type
class GObject o => IsCellRenderer o
#if MIN_VERSION_base(4,9,0)
instance (GObject a, O.UnknownAncestorError CellRenderer a) =>
IsCellRenderer a
#endif
instance IsCellRenderer CellRenderer
instance GObject.Object.IsObject CellRenderer
toCellRenderer :: IsCellRenderer o => o -> IO CellRenderer
toCellRenderer = unsafeCastTo CellRenderer
noCellRenderer :: Maybe CellRenderer
noCellRenderer = Nothing
type family ResolveCellRendererMethod (t :: Symbol) (o :: *) :: * where
ResolveCellRendererMethod "activate" o = CellRendererActivateMethodInfo
ResolveCellRendererMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveCellRendererMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveCellRendererMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveCellRendererMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveCellRendererMethod "isActivatable" o = CellRendererIsActivatableMethodInfo
ResolveCellRendererMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveCellRendererMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveCellRendererMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveCellRendererMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveCellRendererMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveCellRendererMethod "render" o = CellRendererRenderMethodInfo
ResolveCellRendererMethod "replaceData" o = GObject.Object.ObjectReplaceDataMethodInfo
ResolveCellRendererMethod "replaceQdata" o = GObject.Object.ObjectReplaceQdataMethodInfo
ResolveCellRendererMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveCellRendererMethod "startEditing" o = CellRendererStartEditingMethodInfo
ResolveCellRendererMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveCellRendererMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveCellRendererMethod "stopEditing" o = CellRendererStopEditingMethodInfo
ResolveCellRendererMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveCellRendererMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveCellRendererMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveCellRendererMethod "getAlignedArea" o = CellRendererGetAlignedAreaMethodInfo
ResolveCellRendererMethod "getAlignment" o = CellRendererGetAlignmentMethodInfo
ResolveCellRendererMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveCellRendererMethod "getFixedSize" o = CellRendererGetFixedSizeMethodInfo
ResolveCellRendererMethod "getPadding" o = CellRendererGetPaddingMethodInfo
ResolveCellRendererMethod "getPreferredHeight" o = CellRendererGetPreferredHeightMethodInfo
ResolveCellRendererMethod "getPreferredHeightForWidth" o = CellRendererGetPreferredHeightForWidthMethodInfo
ResolveCellRendererMethod "getPreferredSize" o = CellRendererGetPreferredSizeMethodInfo
ResolveCellRendererMethod "getPreferredWidth" o = CellRendererGetPreferredWidthMethodInfo
ResolveCellRendererMethod "getPreferredWidthForHeight" o = CellRendererGetPreferredWidthForHeightMethodInfo
ResolveCellRendererMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveCellRendererMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveCellRendererMethod "getRequestMode" o = CellRendererGetRequestModeMethodInfo
ResolveCellRendererMethod "getSensitive" o = CellRendererGetSensitiveMethodInfo
ResolveCellRendererMethod "getSize" o = CellRendererGetSizeMethodInfo
ResolveCellRendererMethod "getState" o = CellRendererGetStateMethodInfo
ResolveCellRendererMethod "getVisible" o = CellRendererGetVisibleMethodInfo
ResolveCellRendererMethod "setAlignment" o = CellRendererSetAlignmentMethodInfo
ResolveCellRendererMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveCellRendererMethod "setFixedSize" o = CellRendererSetFixedSizeMethodInfo
ResolveCellRendererMethod "setPadding" o = CellRendererSetPaddingMethodInfo
ResolveCellRendererMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveCellRendererMethod "setSensitive" o = CellRendererSetSensitiveMethodInfo
ResolveCellRendererMethod "setVisible" o = CellRendererSetVisibleMethodInfo
ResolveCellRendererMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveCellRendererMethod t CellRenderer, O.MethodInfo info CellRenderer p) => O.IsLabelProxy t (CellRenderer -> p) where
fromLabelProxy _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveCellRendererMethod t CellRenderer, O.MethodInfo info CellRenderer p) => O.IsLabel t (CellRenderer -> p) where
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
type CellRendererEditingCanceledCallback =
IO ()
noCellRendererEditingCanceledCallback :: Maybe CellRendererEditingCanceledCallback
noCellRendererEditingCanceledCallback = Nothing
type C_CellRendererEditingCanceledCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_CellRendererEditingCanceledCallback :: C_CellRendererEditingCanceledCallback -> IO (FunPtr C_CellRendererEditingCanceledCallback)
genClosure_CellRendererEditingCanceled :: CellRendererEditingCanceledCallback -> IO Closure
genClosure_CellRendererEditingCanceled cb = do
let cb' = wrap_CellRendererEditingCanceledCallback cb
mk_CellRendererEditingCanceledCallback cb' >>= newCClosure
wrap_CellRendererEditingCanceledCallback ::
CellRendererEditingCanceledCallback ->
Ptr () ->
Ptr () ->
IO ()
wrap_CellRendererEditingCanceledCallback _cb _ _ = do
_cb
onCellRendererEditingCanceled :: (GObject a, MonadIO m) => a -> CellRendererEditingCanceledCallback -> m SignalHandlerId
onCellRendererEditingCanceled obj cb = liftIO $ connectCellRendererEditingCanceled obj cb SignalConnectBefore
afterCellRendererEditingCanceled :: (GObject a, MonadIO m) => a -> CellRendererEditingCanceledCallback -> m SignalHandlerId
afterCellRendererEditingCanceled obj cb = connectCellRendererEditingCanceled obj cb SignalConnectAfter
connectCellRendererEditingCanceled :: (GObject a, MonadIO m) =>
a -> CellRendererEditingCanceledCallback -> SignalConnectMode -> m SignalHandlerId
connectCellRendererEditingCanceled obj cb after = liftIO $ do
let cb' = wrap_CellRendererEditingCanceledCallback cb
cb'' <- mk_CellRendererEditingCanceledCallback cb'
connectSignalFunPtr obj "editing-canceled" cb'' after
type CellRendererEditingStartedCallback =
Gtk.CellEditable.CellEditable ->
T.Text ->
IO ()
noCellRendererEditingStartedCallback :: Maybe CellRendererEditingStartedCallback
noCellRendererEditingStartedCallback = Nothing
type C_CellRendererEditingStartedCallback =
Ptr () ->
Ptr Gtk.CellEditable.CellEditable ->
CString ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_CellRendererEditingStartedCallback :: C_CellRendererEditingStartedCallback -> IO (FunPtr C_CellRendererEditingStartedCallback)
genClosure_CellRendererEditingStarted :: CellRendererEditingStartedCallback -> IO Closure
genClosure_CellRendererEditingStarted cb = do
let cb' = wrap_CellRendererEditingStartedCallback cb
mk_CellRendererEditingStartedCallback cb' >>= newCClosure
wrap_CellRendererEditingStartedCallback ::
CellRendererEditingStartedCallback ->
Ptr () ->
Ptr Gtk.CellEditable.CellEditable ->
CString ->
Ptr () ->
IO ()
wrap_CellRendererEditingStartedCallback _cb _ editable path _ = do
editable' <- (newObject Gtk.CellEditable.CellEditable) editable
path' <- cstringToText path
_cb editable' path'
onCellRendererEditingStarted :: (GObject a, MonadIO m) => a -> CellRendererEditingStartedCallback -> m SignalHandlerId
onCellRendererEditingStarted obj cb = liftIO $ connectCellRendererEditingStarted obj cb SignalConnectBefore
afterCellRendererEditingStarted :: (GObject a, MonadIO m) => a -> CellRendererEditingStartedCallback -> m SignalHandlerId
afterCellRendererEditingStarted obj cb = connectCellRendererEditingStarted obj cb SignalConnectAfter
connectCellRendererEditingStarted :: (GObject a, MonadIO m) =>
a -> CellRendererEditingStartedCallback -> SignalConnectMode -> m SignalHandlerId
connectCellRendererEditingStarted obj cb after = liftIO $ do
let cb' = wrap_CellRendererEditingStartedCallback cb
cb'' <- mk_CellRendererEditingStartedCallback cb'
connectSignalFunPtr obj "editing-started" cb'' after
setCellRendererCellBackground :: (MonadIO m, IsCellRenderer o) => o -> T.Text -> m ()
setCellRendererCellBackground obj val = liftIO $ setObjectPropertyString obj "cell-background" (Just val)
constructCellRendererCellBackground :: (IsCellRenderer o) => T.Text -> IO (GValueConstruct o)
constructCellRendererCellBackground val = constructObjectPropertyString "cell-background" (Just val)
clearCellRendererCellBackground :: (MonadIO m, IsCellRenderer o) => o -> m ()
clearCellRendererCellBackground obj = liftIO $ setObjectPropertyString obj "cell-background" (Nothing :: Maybe T.Text)
data CellRendererCellBackgroundPropertyInfo
instance AttrInfo CellRendererCellBackgroundPropertyInfo where
type AttrAllowedOps CellRendererCellBackgroundPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrClear]
type AttrSetTypeConstraint CellRendererCellBackgroundPropertyInfo = (~) T.Text
type AttrBaseTypeConstraint CellRendererCellBackgroundPropertyInfo = IsCellRenderer
type AttrGetType CellRendererCellBackgroundPropertyInfo = ()
type AttrLabel CellRendererCellBackgroundPropertyInfo = "cell-background"
type AttrOrigin CellRendererCellBackgroundPropertyInfo = CellRenderer
attrGet _ = undefined
attrSet _ = setCellRendererCellBackground
attrConstruct _ = constructCellRendererCellBackground
attrClear _ = clearCellRendererCellBackground
getCellRendererCellBackgroundGdk :: (MonadIO m, IsCellRenderer o) => o -> m (Maybe Gdk.Color.Color)
getCellRendererCellBackgroundGdk obj = liftIO $ getObjectPropertyBoxed obj "cell-background-gdk" Gdk.Color.Color
setCellRendererCellBackgroundGdk :: (MonadIO m, IsCellRenderer o) => o -> Gdk.Color.Color -> m ()
setCellRendererCellBackgroundGdk obj val = liftIO $ setObjectPropertyBoxed obj "cell-background-gdk" (Just val)
constructCellRendererCellBackgroundGdk :: (IsCellRenderer o) => Gdk.Color.Color -> IO (GValueConstruct o)
constructCellRendererCellBackgroundGdk val = constructObjectPropertyBoxed "cell-background-gdk" (Just val)
clearCellRendererCellBackgroundGdk :: (MonadIO m, IsCellRenderer o) => o -> m ()
clearCellRendererCellBackgroundGdk obj = liftIO $ setObjectPropertyBoxed obj "cell-background-gdk" (Nothing :: Maybe Gdk.Color.Color)
data CellRendererCellBackgroundGdkPropertyInfo
instance AttrInfo CellRendererCellBackgroundGdkPropertyInfo where
type AttrAllowedOps CellRendererCellBackgroundGdkPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint CellRendererCellBackgroundGdkPropertyInfo = (~) Gdk.Color.Color
type AttrBaseTypeConstraint CellRendererCellBackgroundGdkPropertyInfo = IsCellRenderer
type AttrGetType CellRendererCellBackgroundGdkPropertyInfo = (Maybe Gdk.Color.Color)
type AttrLabel CellRendererCellBackgroundGdkPropertyInfo = "cell-background-gdk"
type AttrOrigin CellRendererCellBackgroundGdkPropertyInfo = CellRenderer
attrGet _ = getCellRendererCellBackgroundGdk
attrSet _ = setCellRendererCellBackgroundGdk
attrConstruct _ = constructCellRendererCellBackgroundGdk
attrClear _ = clearCellRendererCellBackgroundGdk
getCellRendererCellBackgroundRgba :: (MonadIO m, IsCellRenderer o) => o -> m (Maybe Gdk.RGBA.RGBA)
getCellRendererCellBackgroundRgba obj = liftIO $ getObjectPropertyBoxed obj "cell-background-rgba" Gdk.RGBA.RGBA
setCellRendererCellBackgroundRgba :: (MonadIO m, IsCellRenderer o) => o -> Gdk.RGBA.RGBA -> m ()
setCellRendererCellBackgroundRgba obj val = liftIO $ setObjectPropertyBoxed obj "cell-background-rgba" (Just val)
constructCellRendererCellBackgroundRgba :: (IsCellRenderer o) => Gdk.RGBA.RGBA -> IO (GValueConstruct o)
constructCellRendererCellBackgroundRgba val = constructObjectPropertyBoxed "cell-background-rgba" (Just val)
clearCellRendererCellBackgroundRgba :: (MonadIO m, IsCellRenderer o) => o -> m ()
clearCellRendererCellBackgroundRgba obj = liftIO $ setObjectPropertyBoxed obj "cell-background-rgba" (Nothing :: Maybe Gdk.RGBA.RGBA)
data CellRendererCellBackgroundRgbaPropertyInfo
instance AttrInfo CellRendererCellBackgroundRgbaPropertyInfo where
type AttrAllowedOps CellRendererCellBackgroundRgbaPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrSetTypeConstraint CellRendererCellBackgroundRgbaPropertyInfo = (~) Gdk.RGBA.RGBA
type AttrBaseTypeConstraint CellRendererCellBackgroundRgbaPropertyInfo = IsCellRenderer
type AttrGetType CellRendererCellBackgroundRgbaPropertyInfo = (Maybe Gdk.RGBA.RGBA)
type AttrLabel CellRendererCellBackgroundRgbaPropertyInfo = "cell-background-rgba"
type AttrOrigin CellRendererCellBackgroundRgbaPropertyInfo = CellRenderer
attrGet _ = getCellRendererCellBackgroundRgba
attrSet _ = setCellRendererCellBackgroundRgba
attrConstruct _ = constructCellRendererCellBackgroundRgba
attrClear _ = clearCellRendererCellBackgroundRgba
getCellRendererCellBackgroundSet :: (MonadIO m, IsCellRenderer o) => o -> m Bool
getCellRendererCellBackgroundSet obj = liftIO $ getObjectPropertyBool obj "cell-background-set"
setCellRendererCellBackgroundSet :: (MonadIO m, IsCellRenderer o) => o -> Bool -> m ()
setCellRendererCellBackgroundSet obj val = liftIO $ setObjectPropertyBool obj "cell-background-set" val
constructCellRendererCellBackgroundSet :: (IsCellRenderer o) => Bool -> IO (GValueConstruct o)
constructCellRendererCellBackgroundSet val = constructObjectPropertyBool "cell-background-set" val
data CellRendererCellBackgroundSetPropertyInfo
instance AttrInfo CellRendererCellBackgroundSetPropertyInfo where
type AttrAllowedOps CellRendererCellBackgroundSetPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CellRendererCellBackgroundSetPropertyInfo = (~) Bool
type AttrBaseTypeConstraint CellRendererCellBackgroundSetPropertyInfo = IsCellRenderer
type AttrGetType CellRendererCellBackgroundSetPropertyInfo = Bool
type AttrLabel CellRendererCellBackgroundSetPropertyInfo = "cell-background-set"
type AttrOrigin CellRendererCellBackgroundSetPropertyInfo = CellRenderer
attrGet _ = getCellRendererCellBackgroundSet
attrSet _ = setCellRendererCellBackgroundSet
attrConstruct _ = constructCellRendererCellBackgroundSet
attrClear _ = undefined
getCellRendererEditing :: (MonadIO m, IsCellRenderer o) => o -> m Bool
getCellRendererEditing obj = liftIO $ getObjectPropertyBool obj "editing"
data CellRendererEditingPropertyInfo
instance AttrInfo CellRendererEditingPropertyInfo where
type AttrAllowedOps CellRendererEditingPropertyInfo = '[ 'AttrGet]
type AttrSetTypeConstraint CellRendererEditingPropertyInfo = (~) ()
type AttrBaseTypeConstraint CellRendererEditingPropertyInfo = IsCellRenderer
type AttrGetType CellRendererEditingPropertyInfo = Bool
type AttrLabel CellRendererEditingPropertyInfo = "editing"
type AttrOrigin CellRendererEditingPropertyInfo = CellRenderer
attrGet _ = getCellRendererEditing
attrSet _ = undefined
attrConstruct _ = undefined
attrClear _ = undefined
getCellRendererHeight :: (MonadIO m, IsCellRenderer o) => o -> m Int32
getCellRendererHeight obj = liftIO $ getObjectPropertyInt32 obj "height"
setCellRendererHeight :: (MonadIO m, IsCellRenderer o) => o -> Int32 -> m ()
setCellRendererHeight obj val = liftIO $ setObjectPropertyInt32 obj "height" val
constructCellRendererHeight :: (IsCellRenderer o) => Int32 -> IO (GValueConstruct o)
constructCellRendererHeight val = constructObjectPropertyInt32 "height" val
data CellRendererHeightPropertyInfo
instance AttrInfo CellRendererHeightPropertyInfo where
type AttrAllowedOps CellRendererHeightPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CellRendererHeightPropertyInfo = (~) Int32
type AttrBaseTypeConstraint CellRendererHeightPropertyInfo = IsCellRenderer
type AttrGetType CellRendererHeightPropertyInfo = Int32
type AttrLabel CellRendererHeightPropertyInfo = "height"
type AttrOrigin CellRendererHeightPropertyInfo = CellRenderer
attrGet _ = getCellRendererHeight
attrSet _ = setCellRendererHeight
attrConstruct _ = constructCellRendererHeight
attrClear _ = undefined
getCellRendererIsExpanded :: (MonadIO m, IsCellRenderer o) => o -> m Bool
getCellRendererIsExpanded obj = liftIO $ getObjectPropertyBool obj "is-expanded"
setCellRendererIsExpanded :: (MonadIO m, IsCellRenderer o) => o -> Bool -> m ()
setCellRendererIsExpanded obj val = liftIO $ setObjectPropertyBool obj "is-expanded" val
constructCellRendererIsExpanded :: (IsCellRenderer o) => Bool -> IO (GValueConstruct o)
constructCellRendererIsExpanded val = constructObjectPropertyBool "is-expanded" val
data CellRendererIsExpandedPropertyInfo
instance AttrInfo CellRendererIsExpandedPropertyInfo where
type AttrAllowedOps CellRendererIsExpandedPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CellRendererIsExpandedPropertyInfo = (~) Bool
type AttrBaseTypeConstraint CellRendererIsExpandedPropertyInfo = IsCellRenderer
type AttrGetType CellRendererIsExpandedPropertyInfo = Bool
type AttrLabel CellRendererIsExpandedPropertyInfo = "is-expanded"
type AttrOrigin CellRendererIsExpandedPropertyInfo = CellRenderer
attrGet _ = getCellRendererIsExpanded
attrSet _ = setCellRendererIsExpanded
attrConstruct _ = constructCellRendererIsExpanded
attrClear _ = undefined
getCellRendererIsExpander :: (MonadIO m, IsCellRenderer o) => o -> m Bool
getCellRendererIsExpander obj = liftIO $ getObjectPropertyBool obj "is-expander"
setCellRendererIsExpander :: (MonadIO m, IsCellRenderer o) => o -> Bool -> m ()
setCellRendererIsExpander obj val = liftIO $ setObjectPropertyBool obj "is-expander" val
constructCellRendererIsExpander :: (IsCellRenderer o) => Bool -> IO (GValueConstruct o)
constructCellRendererIsExpander val = constructObjectPropertyBool "is-expander" val
data CellRendererIsExpanderPropertyInfo
instance AttrInfo CellRendererIsExpanderPropertyInfo where
type AttrAllowedOps CellRendererIsExpanderPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CellRendererIsExpanderPropertyInfo = (~) Bool
type AttrBaseTypeConstraint CellRendererIsExpanderPropertyInfo = IsCellRenderer
type AttrGetType CellRendererIsExpanderPropertyInfo = Bool
type AttrLabel CellRendererIsExpanderPropertyInfo = "is-expander"
type AttrOrigin CellRendererIsExpanderPropertyInfo = CellRenderer
attrGet _ = getCellRendererIsExpander
attrSet _ = setCellRendererIsExpander
attrConstruct _ = constructCellRendererIsExpander
attrClear _ = undefined
getCellRendererMode :: (MonadIO m, IsCellRenderer o) => o -> m Gtk.Enums.CellRendererMode
getCellRendererMode obj = liftIO $ getObjectPropertyEnum obj "mode"
setCellRendererMode :: (MonadIO m, IsCellRenderer o) => o -> Gtk.Enums.CellRendererMode -> m ()
setCellRendererMode obj val = liftIO $ setObjectPropertyEnum obj "mode" val
constructCellRendererMode :: (IsCellRenderer o) => Gtk.Enums.CellRendererMode -> IO (GValueConstruct o)
constructCellRendererMode val = constructObjectPropertyEnum "mode" val
data CellRendererModePropertyInfo
instance AttrInfo CellRendererModePropertyInfo where
type AttrAllowedOps CellRendererModePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CellRendererModePropertyInfo = (~) Gtk.Enums.CellRendererMode
type AttrBaseTypeConstraint CellRendererModePropertyInfo = IsCellRenderer
type AttrGetType CellRendererModePropertyInfo = Gtk.Enums.CellRendererMode
type AttrLabel CellRendererModePropertyInfo = "mode"
type AttrOrigin CellRendererModePropertyInfo = CellRenderer
attrGet _ = getCellRendererMode
attrSet _ = setCellRendererMode
attrConstruct _ = constructCellRendererMode
attrClear _ = undefined
getCellRendererSensitive :: (MonadIO m, IsCellRenderer o) => o -> m Bool
getCellRendererSensitive obj = liftIO $ getObjectPropertyBool obj "sensitive"
setCellRendererSensitive :: (MonadIO m, IsCellRenderer o) => o -> Bool -> m ()
setCellRendererSensitive obj val = liftIO $ setObjectPropertyBool obj "sensitive" val
constructCellRendererSensitive :: (IsCellRenderer o) => Bool -> IO (GValueConstruct o)
constructCellRendererSensitive val = constructObjectPropertyBool "sensitive" val
data CellRendererSensitivePropertyInfo
instance AttrInfo CellRendererSensitivePropertyInfo where
type AttrAllowedOps CellRendererSensitivePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CellRendererSensitivePropertyInfo = (~) Bool
type AttrBaseTypeConstraint CellRendererSensitivePropertyInfo = IsCellRenderer
type AttrGetType CellRendererSensitivePropertyInfo = Bool
type AttrLabel CellRendererSensitivePropertyInfo = "sensitive"
type AttrOrigin CellRendererSensitivePropertyInfo = CellRenderer
attrGet _ = getCellRendererSensitive
attrSet _ = setCellRendererSensitive
attrConstruct _ = constructCellRendererSensitive
attrClear _ = undefined
getCellRendererVisible :: (MonadIO m, IsCellRenderer o) => o -> m Bool
getCellRendererVisible obj = liftIO $ getObjectPropertyBool obj "visible"
setCellRendererVisible :: (MonadIO m, IsCellRenderer o) => o -> Bool -> m ()
setCellRendererVisible obj val = liftIO $ setObjectPropertyBool obj "visible" val
constructCellRendererVisible :: (IsCellRenderer o) => Bool -> IO (GValueConstruct o)
constructCellRendererVisible val = constructObjectPropertyBool "visible" val
data CellRendererVisiblePropertyInfo
instance AttrInfo CellRendererVisiblePropertyInfo where
type AttrAllowedOps CellRendererVisiblePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CellRendererVisiblePropertyInfo = (~) Bool
type AttrBaseTypeConstraint CellRendererVisiblePropertyInfo = IsCellRenderer
type AttrGetType CellRendererVisiblePropertyInfo = Bool
type AttrLabel CellRendererVisiblePropertyInfo = "visible"
type AttrOrigin CellRendererVisiblePropertyInfo = CellRenderer
attrGet _ = getCellRendererVisible
attrSet _ = setCellRendererVisible
attrConstruct _ = constructCellRendererVisible
attrClear _ = undefined
getCellRendererWidth :: (MonadIO m, IsCellRenderer o) => o -> m Int32
getCellRendererWidth obj = liftIO $ getObjectPropertyInt32 obj "width"
setCellRendererWidth :: (MonadIO m, IsCellRenderer o) => o -> Int32 -> m ()
setCellRendererWidth obj val = liftIO $ setObjectPropertyInt32 obj "width" val
constructCellRendererWidth :: (IsCellRenderer o) => Int32 -> IO (GValueConstruct o)
constructCellRendererWidth val = constructObjectPropertyInt32 "width" val
data CellRendererWidthPropertyInfo
instance AttrInfo CellRendererWidthPropertyInfo where
type AttrAllowedOps CellRendererWidthPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CellRendererWidthPropertyInfo = (~) Int32
type AttrBaseTypeConstraint CellRendererWidthPropertyInfo = IsCellRenderer
type AttrGetType CellRendererWidthPropertyInfo = Int32
type AttrLabel CellRendererWidthPropertyInfo = "width"
type AttrOrigin CellRendererWidthPropertyInfo = CellRenderer
attrGet _ = getCellRendererWidth
attrSet _ = setCellRendererWidth
attrConstruct _ = constructCellRendererWidth
attrClear _ = undefined
getCellRendererXalign :: (MonadIO m, IsCellRenderer o) => o -> m Float
getCellRendererXalign obj = liftIO $ getObjectPropertyFloat obj "xalign"
setCellRendererXalign :: (MonadIO m, IsCellRenderer o) => o -> Float -> m ()
setCellRendererXalign obj val = liftIO $ setObjectPropertyFloat obj "xalign" val
constructCellRendererXalign :: (IsCellRenderer o) => Float -> IO (GValueConstruct o)
constructCellRendererXalign val = constructObjectPropertyFloat "xalign" val
data CellRendererXalignPropertyInfo
instance AttrInfo CellRendererXalignPropertyInfo where
type AttrAllowedOps CellRendererXalignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CellRendererXalignPropertyInfo = (~) Float
type AttrBaseTypeConstraint CellRendererXalignPropertyInfo = IsCellRenderer
type AttrGetType CellRendererXalignPropertyInfo = Float
type AttrLabel CellRendererXalignPropertyInfo = "xalign"
type AttrOrigin CellRendererXalignPropertyInfo = CellRenderer
attrGet _ = getCellRendererXalign
attrSet _ = setCellRendererXalign
attrConstruct _ = constructCellRendererXalign
attrClear _ = undefined
getCellRendererXpad :: (MonadIO m, IsCellRenderer o) => o -> m Word32
getCellRendererXpad obj = liftIO $ getObjectPropertyUInt32 obj "xpad"
setCellRendererXpad :: (MonadIO m, IsCellRenderer o) => o -> Word32 -> m ()
setCellRendererXpad obj val = liftIO $ setObjectPropertyUInt32 obj "xpad" val
constructCellRendererXpad :: (IsCellRenderer o) => Word32 -> IO (GValueConstruct o)
constructCellRendererXpad val = constructObjectPropertyUInt32 "xpad" val
data CellRendererXpadPropertyInfo
instance AttrInfo CellRendererXpadPropertyInfo where
type AttrAllowedOps CellRendererXpadPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CellRendererXpadPropertyInfo = (~) Word32
type AttrBaseTypeConstraint CellRendererXpadPropertyInfo = IsCellRenderer
type AttrGetType CellRendererXpadPropertyInfo = Word32
type AttrLabel CellRendererXpadPropertyInfo = "xpad"
type AttrOrigin CellRendererXpadPropertyInfo = CellRenderer
attrGet _ = getCellRendererXpad
attrSet _ = setCellRendererXpad
attrConstruct _ = constructCellRendererXpad
attrClear _ = undefined
getCellRendererYalign :: (MonadIO m, IsCellRenderer o) => o -> m Float
getCellRendererYalign obj = liftIO $ getObjectPropertyFloat obj "yalign"
setCellRendererYalign :: (MonadIO m, IsCellRenderer o) => o -> Float -> m ()
setCellRendererYalign obj val = liftIO $ setObjectPropertyFloat obj "yalign" val
constructCellRendererYalign :: (IsCellRenderer o) => Float -> IO (GValueConstruct o)
constructCellRendererYalign val = constructObjectPropertyFloat "yalign" val
data CellRendererYalignPropertyInfo
instance AttrInfo CellRendererYalignPropertyInfo where
type AttrAllowedOps CellRendererYalignPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CellRendererYalignPropertyInfo = (~) Float
type AttrBaseTypeConstraint CellRendererYalignPropertyInfo = IsCellRenderer
type AttrGetType CellRendererYalignPropertyInfo = Float
type AttrLabel CellRendererYalignPropertyInfo = "yalign"
type AttrOrigin CellRendererYalignPropertyInfo = CellRenderer
attrGet _ = getCellRendererYalign
attrSet _ = setCellRendererYalign
attrConstruct _ = constructCellRendererYalign
attrClear _ = undefined
getCellRendererYpad :: (MonadIO m, IsCellRenderer o) => o -> m Word32
getCellRendererYpad obj = liftIO $ getObjectPropertyUInt32 obj "ypad"
setCellRendererYpad :: (MonadIO m, IsCellRenderer o) => o -> Word32 -> m ()
setCellRendererYpad obj val = liftIO $ setObjectPropertyUInt32 obj "ypad" val
constructCellRendererYpad :: (IsCellRenderer o) => Word32 -> IO (GValueConstruct o)
constructCellRendererYpad val = constructObjectPropertyUInt32 "ypad" val
data CellRendererYpadPropertyInfo
instance AttrInfo CellRendererYpadPropertyInfo where
type AttrAllowedOps CellRendererYpadPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
type AttrSetTypeConstraint CellRendererYpadPropertyInfo = (~) Word32
type AttrBaseTypeConstraint CellRendererYpadPropertyInfo = IsCellRenderer
type AttrGetType CellRendererYpadPropertyInfo = Word32
type AttrLabel CellRendererYpadPropertyInfo = "ypad"
type AttrOrigin CellRendererYpadPropertyInfo = CellRenderer
attrGet _ = getCellRendererYpad
attrSet _ = setCellRendererYpad
attrConstruct _ = constructCellRendererYpad
attrClear _ = undefined
instance O.HasAttributeList CellRenderer
type instance O.AttributeList CellRenderer = CellRendererAttributeList
type CellRendererAttributeList = ('[ '("cellBackground", CellRendererCellBackgroundPropertyInfo), '("cellBackgroundGdk", CellRendererCellBackgroundGdkPropertyInfo), '("cellBackgroundRgba", CellRendererCellBackgroundRgbaPropertyInfo), '("cellBackgroundSet", CellRendererCellBackgroundSetPropertyInfo), '("editing", CellRendererEditingPropertyInfo), '("height", CellRendererHeightPropertyInfo), '("isExpanded", CellRendererIsExpandedPropertyInfo), '("isExpander", CellRendererIsExpanderPropertyInfo), '("mode", CellRendererModePropertyInfo), '("sensitive", CellRendererSensitivePropertyInfo), '("visible", CellRendererVisiblePropertyInfo), '("width", CellRendererWidthPropertyInfo), '("xalign", CellRendererXalignPropertyInfo), '("xpad", CellRendererXpadPropertyInfo), '("yalign", CellRendererYalignPropertyInfo), '("ypad", CellRendererYpadPropertyInfo)] :: [(Symbol, *)])
cellRendererCellBackground :: AttrLabelProxy "cellBackground"
cellRendererCellBackground = AttrLabelProxy
cellRendererCellBackgroundGdk :: AttrLabelProxy "cellBackgroundGdk"
cellRendererCellBackgroundGdk = AttrLabelProxy
cellRendererCellBackgroundRgba :: AttrLabelProxy "cellBackgroundRgba"
cellRendererCellBackgroundRgba = AttrLabelProxy
cellRendererCellBackgroundSet :: AttrLabelProxy "cellBackgroundSet"
cellRendererCellBackgroundSet = AttrLabelProxy
cellRendererEditing :: AttrLabelProxy "editing"
cellRendererEditing = AttrLabelProxy
cellRendererHeight :: AttrLabelProxy "height"
cellRendererHeight = AttrLabelProxy
cellRendererIsExpanded :: AttrLabelProxy "isExpanded"
cellRendererIsExpanded = AttrLabelProxy
cellRendererIsExpander :: AttrLabelProxy "isExpander"
cellRendererIsExpander = AttrLabelProxy
cellRendererMode :: AttrLabelProxy "mode"
cellRendererMode = AttrLabelProxy
cellRendererSensitive :: AttrLabelProxy "sensitive"
cellRendererSensitive = AttrLabelProxy
cellRendererVisible :: AttrLabelProxy "visible"
cellRendererVisible = AttrLabelProxy
cellRendererWidth :: AttrLabelProxy "width"
cellRendererWidth = AttrLabelProxy
cellRendererXalign :: AttrLabelProxy "xalign"
cellRendererXalign = AttrLabelProxy
cellRendererXpad :: AttrLabelProxy "xpad"
cellRendererXpad = AttrLabelProxy
cellRendererYalign :: AttrLabelProxy "yalign"
cellRendererYalign = AttrLabelProxy
cellRendererYpad :: AttrLabelProxy "ypad"
cellRendererYpad = AttrLabelProxy
data CellRendererEditingCanceledSignalInfo
instance SignalInfo CellRendererEditingCanceledSignalInfo where
type HaskellCallbackType CellRendererEditingCanceledSignalInfo = CellRendererEditingCanceledCallback
connectSignal _ = connectCellRendererEditingCanceled
data CellRendererEditingStartedSignalInfo
instance SignalInfo CellRendererEditingStartedSignalInfo where
type HaskellCallbackType CellRendererEditingStartedSignalInfo = CellRendererEditingStartedCallback
connectSignal _ = connectCellRendererEditingStarted
type instance O.SignalList CellRenderer = CellRendererSignalList
type CellRendererSignalList = ('[ '("editingCanceled", CellRendererEditingCanceledSignalInfo), '("editingStarted", CellRendererEditingStartedSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
foreign import ccall "gtk_cell_renderer_activate" gtk_cell_renderer_activate ::
Ptr CellRenderer ->
Ptr Gdk.Event.Event ->
Ptr Gtk.Widget.Widget ->
CString ->
Ptr Gdk.Rectangle.Rectangle ->
Ptr Gdk.Rectangle.Rectangle ->
CUInt ->
IO CInt
cellRendererActivate ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) =>
a
-> Gdk.Event.Event
-> b
-> T.Text
-> Gdk.Rectangle.Rectangle
-> Gdk.Rectangle.Rectangle
-> [Gtk.Flags.CellRendererState]
-> m Bool
cellRendererActivate cell event widget path backgroundArea cellArea flags = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
event' <- unsafeManagedPtrGetPtr event
widget' <- unsafeManagedPtrCastPtr widget
path' <- textToCString path
backgroundArea' <- unsafeManagedPtrGetPtr backgroundArea
cellArea' <- unsafeManagedPtrGetPtr cellArea
let flags' = gflagsToWord flags
result <- gtk_cell_renderer_activate cell' event' widget' path' backgroundArea' cellArea' flags'
let result' = (/= 0) result
touchManagedPtr cell
touchManagedPtr event
touchManagedPtr widget
touchManagedPtr backgroundArea
touchManagedPtr cellArea
freeMem path'
return result'
data CellRendererActivateMethodInfo
instance (signature ~ (Gdk.Event.Event -> b -> T.Text -> Gdk.Rectangle.Rectangle -> Gdk.Rectangle.Rectangle -> [Gtk.Flags.CellRendererState] -> m Bool), MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) => O.MethodInfo CellRendererActivateMethodInfo a signature where
overloadedMethod _ = cellRendererActivate
foreign import ccall "gtk_cell_renderer_get_aligned_area" gtk_cell_renderer_get_aligned_area ::
Ptr CellRenderer ->
Ptr Gtk.Widget.Widget ->
CUInt ->
Ptr Gdk.Rectangle.Rectangle ->
Ptr Gdk.Rectangle.Rectangle ->
IO ()
cellRendererGetAlignedArea ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> [Gtk.Flags.CellRendererState]
-> Gdk.Rectangle.Rectangle
-> m (Gdk.Rectangle.Rectangle)
cellRendererGetAlignedArea cell widget flags cellArea = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
widget' <- unsafeManagedPtrCastPtr widget
let flags' = gflagsToWord flags
cellArea' <- unsafeManagedPtrGetPtr cellArea
alignedArea <- callocBoxedBytes 16 :: IO (Ptr Gdk.Rectangle.Rectangle)
gtk_cell_renderer_get_aligned_area cell' widget' flags' cellArea' alignedArea
alignedArea' <- (wrapBoxed Gdk.Rectangle.Rectangle) alignedArea
touchManagedPtr cell
touchManagedPtr widget
touchManagedPtr cellArea
return alignedArea'
data CellRendererGetAlignedAreaMethodInfo
instance (signature ~ (b -> [Gtk.Flags.CellRendererState] -> Gdk.Rectangle.Rectangle -> m (Gdk.Rectangle.Rectangle)), MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) => O.MethodInfo CellRendererGetAlignedAreaMethodInfo a signature where
overloadedMethod _ = cellRendererGetAlignedArea
foreign import ccall "gtk_cell_renderer_get_alignment" gtk_cell_renderer_get_alignment ::
Ptr CellRenderer ->
Ptr CFloat ->
Ptr CFloat ->
IO ()
cellRendererGetAlignment ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a) =>
a
-> m (Float,Float)
cellRendererGetAlignment cell = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
xalign <- allocMem :: IO (Ptr CFloat)
yalign <- allocMem :: IO (Ptr CFloat)
gtk_cell_renderer_get_alignment cell' xalign yalign
xalign' <- peek xalign
let xalign'' = realToFrac xalign'
yalign' <- peek yalign
let yalign'' = realToFrac yalign'
touchManagedPtr cell
freeMem xalign
freeMem yalign
return (xalign'', yalign'')
data CellRendererGetAlignmentMethodInfo
instance (signature ~ (m (Float,Float)), MonadIO m, IsCellRenderer a) => O.MethodInfo CellRendererGetAlignmentMethodInfo a signature where
overloadedMethod _ = cellRendererGetAlignment
foreign import ccall "gtk_cell_renderer_get_fixed_size" gtk_cell_renderer_get_fixed_size ::
Ptr CellRenderer ->
Ptr Int32 ->
Ptr Int32 ->
IO ()
cellRendererGetFixedSize ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a) =>
a
-> m (Int32,Int32)
cellRendererGetFixedSize cell = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
width <- allocMem :: IO (Ptr Int32)
height <- allocMem :: IO (Ptr Int32)
gtk_cell_renderer_get_fixed_size cell' width height
width' <- peek width
height' <- peek height
touchManagedPtr cell
freeMem width
freeMem height
return (width', height')
data CellRendererGetFixedSizeMethodInfo
instance (signature ~ (m (Int32,Int32)), MonadIO m, IsCellRenderer a) => O.MethodInfo CellRendererGetFixedSizeMethodInfo a signature where
overloadedMethod _ = cellRendererGetFixedSize
foreign import ccall "gtk_cell_renderer_get_padding" gtk_cell_renderer_get_padding ::
Ptr CellRenderer ->
Ptr Int32 ->
Ptr Int32 ->
IO ()
cellRendererGetPadding ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a) =>
a
-> m (Int32,Int32)
cellRendererGetPadding cell = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
xpad <- allocMem :: IO (Ptr Int32)
ypad <- allocMem :: IO (Ptr Int32)
gtk_cell_renderer_get_padding cell' xpad ypad
xpad' <- peek xpad
ypad' <- peek ypad
touchManagedPtr cell
freeMem xpad
freeMem ypad
return (xpad', ypad')
data CellRendererGetPaddingMethodInfo
instance (signature ~ (m (Int32,Int32)), MonadIO m, IsCellRenderer a) => O.MethodInfo CellRendererGetPaddingMethodInfo a signature where
overloadedMethod _ = cellRendererGetPadding
foreign import ccall "gtk_cell_renderer_get_preferred_height" gtk_cell_renderer_get_preferred_height ::
Ptr CellRenderer ->
Ptr Gtk.Widget.Widget ->
Ptr Int32 ->
Ptr Int32 ->
IO ()
cellRendererGetPreferredHeight ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m (Int32,Int32)
cellRendererGetPreferredHeight cell widget = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
widget' <- unsafeManagedPtrCastPtr widget
minimumSize <- allocMem :: IO (Ptr Int32)
naturalSize <- allocMem :: IO (Ptr Int32)
gtk_cell_renderer_get_preferred_height cell' widget' minimumSize naturalSize
minimumSize' <- peek minimumSize
naturalSize' <- peek naturalSize
touchManagedPtr cell
touchManagedPtr widget
freeMem minimumSize
freeMem naturalSize
return (minimumSize', naturalSize')
data CellRendererGetPreferredHeightMethodInfo
instance (signature ~ (b -> m (Int32,Int32)), MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) => O.MethodInfo CellRendererGetPreferredHeightMethodInfo a signature where
overloadedMethod _ = cellRendererGetPreferredHeight
foreign import ccall "gtk_cell_renderer_get_preferred_height_for_width" gtk_cell_renderer_get_preferred_height_for_width ::
Ptr CellRenderer ->
Ptr Gtk.Widget.Widget ->
Int32 ->
Ptr Int32 ->
Ptr Int32 ->
IO ()
cellRendererGetPreferredHeightForWidth ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> Int32
-> m (Int32,Int32)
cellRendererGetPreferredHeightForWidth cell widget width = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
widget' <- unsafeManagedPtrCastPtr widget
minimumHeight <- allocMem :: IO (Ptr Int32)
naturalHeight <- allocMem :: IO (Ptr Int32)
gtk_cell_renderer_get_preferred_height_for_width cell' widget' width minimumHeight naturalHeight
minimumHeight' <- peek minimumHeight
naturalHeight' <- peek naturalHeight
touchManagedPtr cell
touchManagedPtr widget
freeMem minimumHeight
freeMem naturalHeight
return (minimumHeight', naturalHeight')
data CellRendererGetPreferredHeightForWidthMethodInfo
instance (signature ~ (b -> Int32 -> m (Int32,Int32)), MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) => O.MethodInfo CellRendererGetPreferredHeightForWidthMethodInfo a signature where
overloadedMethod _ = cellRendererGetPreferredHeightForWidth
foreign import ccall "gtk_cell_renderer_get_preferred_size" gtk_cell_renderer_get_preferred_size ::
Ptr CellRenderer ->
Ptr Gtk.Widget.Widget ->
Ptr Gtk.Requisition.Requisition ->
Ptr Gtk.Requisition.Requisition ->
IO ()
cellRendererGetPreferredSize ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m (Gtk.Requisition.Requisition,Gtk.Requisition.Requisition)
cellRendererGetPreferredSize cell widget = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
widget' <- unsafeManagedPtrCastPtr widget
minimumSize <- callocBoxedBytes 8 :: IO (Ptr Gtk.Requisition.Requisition)
naturalSize <- callocBoxedBytes 8 :: IO (Ptr Gtk.Requisition.Requisition)
gtk_cell_renderer_get_preferred_size cell' widget' minimumSize naturalSize
minimumSize' <- (wrapBoxed Gtk.Requisition.Requisition) minimumSize
naturalSize' <- (wrapBoxed Gtk.Requisition.Requisition) naturalSize
touchManagedPtr cell
touchManagedPtr widget
return (minimumSize', naturalSize')
data CellRendererGetPreferredSizeMethodInfo
instance (signature ~ (b -> m (Gtk.Requisition.Requisition,Gtk.Requisition.Requisition)), MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) => O.MethodInfo CellRendererGetPreferredSizeMethodInfo a signature where
overloadedMethod _ = cellRendererGetPreferredSize
foreign import ccall "gtk_cell_renderer_get_preferred_width" gtk_cell_renderer_get_preferred_width ::
Ptr CellRenderer ->
Ptr Gtk.Widget.Widget ->
Ptr Int32 ->
Ptr Int32 ->
IO ()
cellRendererGetPreferredWidth ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> m (Int32,Int32)
cellRendererGetPreferredWidth cell widget = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
widget' <- unsafeManagedPtrCastPtr widget
minimumSize <- allocMem :: IO (Ptr Int32)
naturalSize <- allocMem :: IO (Ptr Int32)
gtk_cell_renderer_get_preferred_width cell' widget' minimumSize naturalSize
minimumSize' <- peek minimumSize
naturalSize' <- peek naturalSize
touchManagedPtr cell
touchManagedPtr widget
freeMem minimumSize
freeMem naturalSize
return (minimumSize', naturalSize')
data CellRendererGetPreferredWidthMethodInfo
instance (signature ~ (b -> m (Int32,Int32)), MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) => O.MethodInfo CellRendererGetPreferredWidthMethodInfo a signature where
overloadedMethod _ = cellRendererGetPreferredWidth
foreign import ccall "gtk_cell_renderer_get_preferred_width_for_height" gtk_cell_renderer_get_preferred_width_for_height ::
Ptr CellRenderer ->
Ptr Gtk.Widget.Widget ->
Int32 ->
Ptr Int32 ->
Ptr Int32 ->
IO ()
cellRendererGetPreferredWidthForHeight ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> Int32
-> m (Int32,Int32)
cellRendererGetPreferredWidthForHeight cell widget height = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
widget' <- unsafeManagedPtrCastPtr widget
minimumWidth <- allocMem :: IO (Ptr Int32)
naturalWidth <- allocMem :: IO (Ptr Int32)
gtk_cell_renderer_get_preferred_width_for_height cell' widget' height minimumWidth naturalWidth
minimumWidth' <- peek minimumWidth
naturalWidth' <- peek naturalWidth
touchManagedPtr cell
touchManagedPtr widget
freeMem minimumWidth
freeMem naturalWidth
return (minimumWidth', naturalWidth')
data CellRendererGetPreferredWidthForHeightMethodInfo
instance (signature ~ (b -> Int32 -> m (Int32,Int32)), MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) => O.MethodInfo CellRendererGetPreferredWidthForHeightMethodInfo a signature where
overloadedMethod _ = cellRendererGetPreferredWidthForHeight
foreign import ccall "gtk_cell_renderer_get_request_mode" gtk_cell_renderer_get_request_mode ::
Ptr CellRenderer ->
IO CUInt
cellRendererGetRequestMode ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a) =>
a
-> m Gtk.Enums.SizeRequestMode
cellRendererGetRequestMode cell = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
result <- gtk_cell_renderer_get_request_mode cell'
let result' = (toEnum . fromIntegral) result
touchManagedPtr cell
return result'
data CellRendererGetRequestModeMethodInfo
instance (signature ~ (m Gtk.Enums.SizeRequestMode), MonadIO m, IsCellRenderer a) => O.MethodInfo CellRendererGetRequestModeMethodInfo a signature where
overloadedMethod _ = cellRendererGetRequestMode
foreign import ccall "gtk_cell_renderer_get_sensitive" gtk_cell_renderer_get_sensitive ::
Ptr CellRenderer ->
IO CInt
cellRendererGetSensitive ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a) =>
a
-> m Bool
cellRendererGetSensitive cell = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
result <- gtk_cell_renderer_get_sensitive cell'
let result' = (/= 0) result
touchManagedPtr cell
return result'
data CellRendererGetSensitiveMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsCellRenderer a) => O.MethodInfo CellRendererGetSensitiveMethodInfo a signature where
overloadedMethod _ = cellRendererGetSensitive
foreign import ccall "gtk_cell_renderer_get_size" gtk_cell_renderer_get_size ::
Ptr CellRenderer ->
Ptr Gtk.Widget.Widget ->
Ptr Gdk.Rectangle.Rectangle ->
Ptr Int32 ->
Ptr Int32 ->
Ptr Int32 ->
Ptr Int32 ->
IO ()
cellRendererGetSize ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) =>
a
-> b
-> Maybe (Gdk.Rectangle.Rectangle)
-> m (Int32,Int32,Int32,Int32)
cellRendererGetSize cell widget cellArea = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
widget' <- unsafeManagedPtrCastPtr widget
maybeCellArea <- case cellArea of
Nothing -> return nullPtr
Just jCellArea -> do
jCellArea' <- unsafeManagedPtrGetPtr jCellArea
return jCellArea'
xOffset <- allocMem :: IO (Ptr Int32)
yOffset <- allocMem :: IO (Ptr Int32)
width <- allocMem :: IO (Ptr Int32)
height <- allocMem :: IO (Ptr Int32)
gtk_cell_renderer_get_size cell' widget' maybeCellArea xOffset yOffset width height
xOffset' <- peek xOffset
yOffset' <- peek yOffset
width' <- peek width
height' <- peek height
touchManagedPtr cell
touchManagedPtr widget
whenJust cellArea touchManagedPtr
freeMem xOffset
freeMem yOffset
freeMem width
freeMem height
return (xOffset', yOffset', width', height')
data CellRendererGetSizeMethodInfo
instance (signature ~ (b -> Maybe (Gdk.Rectangle.Rectangle) -> m (Int32,Int32,Int32,Int32)), MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) => O.MethodInfo CellRendererGetSizeMethodInfo a signature where
overloadedMethod _ = cellRendererGetSize
foreign import ccall "gtk_cell_renderer_get_state" gtk_cell_renderer_get_state ::
Ptr CellRenderer ->
Ptr Gtk.Widget.Widget ->
CUInt ->
IO CUInt
cellRendererGetState ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) =>
a
-> Maybe (b)
-> [Gtk.Flags.CellRendererState]
-> m [Gtk.Flags.StateFlags]
cellRendererGetState cell widget cellState = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
maybeWidget <- case widget of
Nothing -> return nullPtr
Just jWidget -> do
jWidget' <- unsafeManagedPtrCastPtr jWidget
return jWidget'
let cellState' = gflagsToWord cellState
result <- gtk_cell_renderer_get_state cell' maybeWidget cellState'
let result' = wordToGFlags result
touchManagedPtr cell
whenJust widget touchManagedPtr
return result'
data CellRendererGetStateMethodInfo
instance (signature ~ (Maybe (b) -> [Gtk.Flags.CellRendererState] -> m [Gtk.Flags.StateFlags]), MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) => O.MethodInfo CellRendererGetStateMethodInfo a signature where
overloadedMethod _ = cellRendererGetState
foreign import ccall "gtk_cell_renderer_get_visible" gtk_cell_renderer_get_visible ::
Ptr CellRenderer ->
IO CInt
cellRendererGetVisible ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a) =>
a
-> m Bool
cellRendererGetVisible cell = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
result <- gtk_cell_renderer_get_visible cell'
let result' = (/= 0) result
touchManagedPtr cell
return result'
data CellRendererGetVisibleMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsCellRenderer a) => O.MethodInfo CellRendererGetVisibleMethodInfo a signature where
overloadedMethod _ = cellRendererGetVisible
foreign import ccall "gtk_cell_renderer_is_activatable" gtk_cell_renderer_is_activatable ::
Ptr CellRenderer ->
IO CInt
cellRendererIsActivatable ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a) =>
a
-> m Bool
cellRendererIsActivatable cell = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
result <- gtk_cell_renderer_is_activatable cell'
let result' = (/= 0) result
touchManagedPtr cell
return result'
data CellRendererIsActivatableMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsCellRenderer a) => O.MethodInfo CellRendererIsActivatableMethodInfo a signature where
overloadedMethod _ = cellRendererIsActivatable
foreign import ccall "gtk_cell_renderer_render" gtk_cell_renderer_render ::
Ptr CellRenderer ->
Ptr Cairo.Context.Context ->
Ptr Gtk.Widget.Widget ->
Ptr Gdk.Rectangle.Rectangle ->
Ptr Gdk.Rectangle.Rectangle ->
CUInt ->
IO ()
cellRendererRender ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) =>
a
-> Cairo.Context.Context
-> b
-> Gdk.Rectangle.Rectangle
-> Gdk.Rectangle.Rectangle
-> [Gtk.Flags.CellRendererState]
-> m ()
cellRendererRender cell cr widget backgroundArea cellArea flags = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
cr' <- unsafeManagedPtrGetPtr cr
widget' <- unsafeManagedPtrCastPtr widget
backgroundArea' <- unsafeManagedPtrGetPtr backgroundArea
cellArea' <- unsafeManagedPtrGetPtr cellArea
let flags' = gflagsToWord flags
gtk_cell_renderer_render cell' cr' widget' backgroundArea' cellArea' flags'
touchManagedPtr cell
touchManagedPtr cr
touchManagedPtr widget
touchManagedPtr backgroundArea
touchManagedPtr cellArea
return ()
data CellRendererRenderMethodInfo
instance (signature ~ (Cairo.Context.Context -> b -> Gdk.Rectangle.Rectangle -> Gdk.Rectangle.Rectangle -> [Gtk.Flags.CellRendererState] -> m ()), MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) => O.MethodInfo CellRendererRenderMethodInfo a signature where
overloadedMethod _ = cellRendererRender
foreign import ccall "gtk_cell_renderer_set_alignment" gtk_cell_renderer_set_alignment ::
Ptr CellRenderer ->
CFloat ->
CFloat ->
IO ()
cellRendererSetAlignment ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a) =>
a
-> Float
-> Float
-> m ()
cellRendererSetAlignment cell xalign yalign = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
let xalign' = realToFrac xalign
let yalign' = realToFrac yalign
gtk_cell_renderer_set_alignment cell' xalign' yalign'
touchManagedPtr cell
return ()
data CellRendererSetAlignmentMethodInfo
instance (signature ~ (Float -> Float -> m ()), MonadIO m, IsCellRenderer a) => O.MethodInfo CellRendererSetAlignmentMethodInfo a signature where
overloadedMethod _ = cellRendererSetAlignment
foreign import ccall "gtk_cell_renderer_set_fixed_size" gtk_cell_renderer_set_fixed_size ::
Ptr CellRenderer ->
Int32 ->
Int32 ->
IO ()
cellRendererSetFixedSize ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a) =>
a
-> Int32
-> Int32
-> m ()
cellRendererSetFixedSize cell width height = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
gtk_cell_renderer_set_fixed_size cell' width height
touchManagedPtr cell
return ()
data CellRendererSetFixedSizeMethodInfo
instance (signature ~ (Int32 -> Int32 -> m ()), MonadIO m, IsCellRenderer a) => O.MethodInfo CellRendererSetFixedSizeMethodInfo a signature where
overloadedMethod _ = cellRendererSetFixedSize
foreign import ccall "gtk_cell_renderer_set_padding" gtk_cell_renderer_set_padding ::
Ptr CellRenderer ->
Int32 ->
Int32 ->
IO ()
cellRendererSetPadding ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a) =>
a
-> Int32
-> Int32
-> m ()
cellRendererSetPadding cell xpad ypad = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
gtk_cell_renderer_set_padding cell' xpad ypad
touchManagedPtr cell
return ()
data CellRendererSetPaddingMethodInfo
instance (signature ~ (Int32 -> Int32 -> m ()), MonadIO m, IsCellRenderer a) => O.MethodInfo CellRendererSetPaddingMethodInfo a signature where
overloadedMethod _ = cellRendererSetPadding
foreign import ccall "gtk_cell_renderer_set_sensitive" gtk_cell_renderer_set_sensitive ::
Ptr CellRenderer ->
CInt ->
IO ()
cellRendererSetSensitive ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a) =>
a
-> Bool
-> m ()
cellRendererSetSensitive cell sensitive = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
let sensitive' = (fromIntegral . fromEnum) sensitive
gtk_cell_renderer_set_sensitive cell' sensitive'
touchManagedPtr cell
return ()
data CellRendererSetSensitiveMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsCellRenderer a) => O.MethodInfo CellRendererSetSensitiveMethodInfo a signature where
overloadedMethod _ = cellRendererSetSensitive
foreign import ccall "gtk_cell_renderer_set_visible" gtk_cell_renderer_set_visible ::
Ptr CellRenderer ->
CInt ->
IO ()
cellRendererSetVisible ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a) =>
a
-> Bool
-> m ()
cellRendererSetVisible cell visible = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
let visible' = (fromIntegral . fromEnum) visible
gtk_cell_renderer_set_visible cell' visible'
touchManagedPtr cell
return ()
data CellRendererSetVisibleMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsCellRenderer a) => O.MethodInfo CellRendererSetVisibleMethodInfo a signature where
overloadedMethod _ = cellRendererSetVisible
foreign import ccall "gtk_cell_renderer_start_editing" gtk_cell_renderer_start_editing ::
Ptr CellRenderer ->
Ptr Gdk.Event.Event ->
Ptr Gtk.Widget.Widget ->
CString ->
Ptr Gdk.Rectangle.Rectangle ->
Ptr Gdk.Rectangle.Rectangle ->
CUInt ->
IO (Ptr Gtk.CellEditable.CellEditable)
cellRendererStartEditing ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) =>
a
-> Maybe (Gdk.Event.Event)
-> b
-> T.Text
-> Gdk.Rectangle.Rectangle
-> Gdk.Rectangle.Rectangle
-> [Gtk.Flags.CellRendererState]
-> m (Maybe Gtk.CellEditable.CellEditable)
cellRendererStartEditing cell event widget path backgroundArea cellArea flags = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
maybeEvent <- case event of
Nothing -> return nullPtr
Just jEvent -> do
jEvent' <- unsafeManagedPtrGetPtr jEvent
return jEvent'
widget' <- unsafeManagedPtrCastPtr widget
path' <- textToCString path
backgroundArea' <- unsafeManagedPtrGetPtr backgroundArea
cellArea' <- unsafeManagedPtrGetPtr cellArea
let flags' = gflagsToWord flags
result <- gtk_cell_renderer_start_editing cell' maybeEvent widget' path' backgroundArea' cellArea' flags'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject Gtk.CellEditable.CellEditable) result'
return result''
touchManagedPtr cell
whenJust event touchManagedPtr
touchManagedPtr widget
touchManagedPtr backgroundArea
touchManagedPtr cellArea
freeMem path'
return maybeResult
data CellRendererStartEditingMethodInfo
instance (signature ~ (Maybe (Gdk.Event.Event) -> b -> T.Text -> Gdk.Rectangle.Rectangle -> Gdk.Rectangle.Rectangle -> [Gtk.Flags.CellRendererState] -> m (Maybe Gtk.CellEditable.CellEditable)), MonadIO m, IsCellRenderer a, Gtk.Widget.IsWidget b) => O.MethodInfo CellRendererStartEditingMethodInfo a signature where
overloadedMethod _ = cellRendererStartEditing
foreign import ccall "gtk_cell_renderer_stop_editing" gtk_cell_renderer_stop_editing ::
Ptr CellRenderer ->
CInt ->
IO ()
cellRendererStopEditing ::
(B.CallStack.HasCallStack, MonadIO m, IsCellRenderer a) =>
a
-> Bool
-> m ()
cellRendererStopEditing cell canceled = liftIO $ do
cell' <- unsafeManagedPtrCastPtr cell
let canceled' = (fromIntegral . fromEnum) canceled
gtk_cell_renderer_stop_editing cell' canceled'
touchManagedPtr cell
return ()
data CellRendererStopEditingMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsCellRenderer a) => O.MethodInfo CellRendererStopEditingMethodInfo a signature where
overloadedMethod _ = cellRendererStopEditing