module GI.Atk.Interfaces.Table
(
Table(..) ,
noTable ,
IsTable ,
toTable ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableAddColumnSelectionMethodInfo ,
#endif
tableAddColumnSelection ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableAddRowSelectionMethodInfo ,
#endif
tableAddRowSelection ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetCaptionMethodInfo ,
#endif
tableGetCaption ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetColumnAtIndexMethodInfo ,
#endif
tableGetColumnAtIndex ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetColumnDescriptionMethodInfo ,
#endif
tableGetColumnDescription ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetColumnExtentAtMethodInfo ,
#endif
tableGetColumnExtentAt ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetColumnHeaderMethodInfo ,
#endif
tableGetColumnHeader ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetIndexAtMethodInfo ,
#endif
tableGetIndexAt ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetNColumnsMethodInfo ,
#endif
tableGetNColumns ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetNRowsMethodInfo ,
#endif
tableGetNRows ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetRowAtIndexMethodInfo ,
#endif
tableGetRowAtIndex ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetRowDescriptionMethodInfo ,
#endif
tableGetRowDescription ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetRowExtentAtMethodInfo ,
#endif
tableGetRowExtentAt ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetRowHeaderMethodInfo ,
#endif
tableGetRowHeader ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetSelectedColumnsMethodInfo ,
#endif
tableGetSelectedColumns ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetSelectedRowsMethodInfo ,
#endif
tableGetSelectedRows ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableGetSummaryMethodInfo ,
#endif
tableGetSummary ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableIsColumnSelectedMethodInfo ,
#endif
tableIsColumnSelected ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableIsRowSelectedMethodInfo ,
#endif
tableIsRowSelected ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableIsSelectedMethodInfo ,
#endif
tableIsSelected ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableRefAtMethodInfo ,
#endif
tableRefAt ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableRemoveColumnSelectionMethodInfo ,
#endif
tableRemoveColumnSelection ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableRemoveRowSelectionMethodInfo ,
#endif
tableRemoveRowSelection ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableSetCaptionMethodInfo ,
#endif
tableSetCaption ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableSetColumnDescriptionMethodInfo ,
#endif
tableSetColumnDescription ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableSetColumnHeaderMethodInfo ,
#endif
tableSetColumnHeader ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableSetRowDescriptionMethodInfo ,
#endif
tableSetRowDescription ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableSetRowHeaderMethodInfo ,
#endif
tableSetRowHeader ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableSetSummaryMethodInfo ,
#endif
tableSetSummary ,
C_TableColumnDeletedCallback ,
TableColumnDeletedCallback ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableColumnDeletedSignalInfo ,
#endif
afterTableColumnDeleted ,
genClosure_TableColumnDeleted ,
mk_TableColumnDeletedCallback ,
noTableColumnDeletedCallback ,
onTableColumnDeleted ,
wrap_TableColumnDeletedCallback ,
C_TableColumnInsertedCallback ,
TableColumnInsertedCallback ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableColumnInsertedSignalInfo ,
#endif
afterTableColumnInserted ,
genClosure_TableColumnInserted ,
mk_TableColumnInsertedCallback ,
noTableColumnInsertedCallback ,
onTableColumnInserted ,
wrap_TableColumnInsertedCallback ,
C_TableColumnReorderedCallback ,
TableColumnReorderedCallback ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableColumnReorderedSignalInfo ,
#endif
afterTableColumnReordered ,
genClosure_TableColumnReordered ,
mk_TableColumnReorderedCallback ,
noTableColumnReorderedCallback ,
onTableColumnReordered ,
wrap_TableColumnReorderedCallback ,
C_TableModelChangedCallback ,
TableModelChangedCallback ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableModelChangedSignalInfo ,
#endif
afterTableModelChanged ,
genClosure_TableModelChanged ,
mk_TableModelChangedCallback ,
noTableModelChangedCallback ,
onTableModelChanged ,
wrap_TableModelChangedCallback ,
C_TableRowDeletedCallback ,
TableRowDeletedCallback ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableRowDeletedSignalInfo ,
#endif
afterTableRowDeleted ,
genClosure_TableRowDeleted ,
mk_TableRowDeletedCallback ,
noTableRowDeletedCallback ,
onTableRowDeleted ,
wrap_TableRowDeletedCallback ,
C_TableRowInsertedCallback ,
TableRowInsertedCallback ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableRowInsertedSignalInfo ,
#endif
afterTableRowInserted ,
genClosure_TableRowInserted ,
mk_TableRowInsertedCallback ,
noTableRowInsertedCallback ,
onTableRowInserted ,
wrap_TableRowInsertedCallback ,
C_TableRowReorderedCallback ,
TableRowReorderedCallback ,
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
TableRowReorderedSignalInfo ,
#endif
afterTableRowReordered ,
genClosure_TableRowReordered ,
mk_TableRowReorderedCallback ,
noTableRowReorderedCallback ,
onTableRowReordered ,
wrap_TableRowReorderedCallback ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GI.Atk.Objects.Object as Atk.Object
import qualified GI.GObject.Objects.Object as GObject.Object
newtype Table = Table (ManagedPtr Table)
noTable :: Maybe Table
noTable = Nothing
type TableColumnDeletedCallback =
Int32 ->
Int32 ->
IO ()
noTableColumnDeletedCallback :: Maybe TableColumnDeletedCallback
noTableColumnDeletedCallback = Nothing
type C_TableColumnDeletedCallback =
Ptr () ->
Int32 ->
Int32 ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TableColumnDeletedCallback :: C_TableColumnDeletedCallback -> IO (FunPtr C_TableColumnDeletedCallback)
genClosure_TableColumnDeleted :: TableColumnDeletedCallback -> IO Closure
genClosure_TableColumnDeleted cb = do
let cb' = wrap_TableColumnDeletedCallback cb
mk_TableColumnDeletedCallback cb' >>= newCClosure
wrap_TableColumnDeletedCallback ::
TableColumnDeletedCallback ->
Ptr () ->
Int32 ->
Int32 ->
Ptr () ->
IO ()
wrap_TableColumnDeletedCallback _cb _ arg1 arg2 _ = do
_cb arg1 arg2
onTableColumnDeleted :: (IsTable a, MonadIO m) => a -> TableColumnDeletedCallback -> m SignalHandlerId
onTableColumnDeleted obj cb = liftIO $ do
let cb' = wrap_TableColumnDeletedCallback cb
cb'' <- mk_TableColumnDeletedCallback cb'
connectSignalFunPtr obj "column-deleted" cb'' SignalConnectBefore
afterTableColumnDeleted :: (IsTable a, MonadIO m) => a -> TableColumnDeletedCallback -> m SignalHandlerId
afterTableColumnDeleted obj cb = liftIO $ do
let cb' = wrap_TableColumnDeletedCallback cb
cb'' <- mk_TableColumnDeletedCallback cb'
connectSignalFunPtr obj "column-deleted" cb'' SignalConnectAfter
type TableColumnInsertedCallback =
Int32 ->
Int32 ->
IO ()
noTableColumnInsertedCallback :: Maybe TableColumnInsertedCallback
noTableColumnInsertedCallback = Nothing
type C_TableColumnInsertedCallback =
Ptr () ->
Int32 ->
Int32 ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TableColumnInsertedCallback :: C_TableColumnInsertedCallback -> IO (FunPtr C_TableColumnInsertedCallback)
genClosure_TableColumnInserted :: TableColumnInsertedCallback -> IO Closure
genClosure_TableColumnInserted cb = do
let cb' = wrap_TableColumnInsertedCallback cb
mk_TableColumnInsertedCallback cb' >>= newCClosure
wrap_TableColumnInsertedCallback ::
TableColumnInsertedCallback ->
Ptr () ->
Int32 ->
Int32 ->
Ptr () ->
IO ()
wrap_TableColumnInsertedCallback _cb _ arg1 arg2 _ = do
_cb arg1 arg2
onTableColumnInserted :: (IsTable a, MonadIO m) => a -> TableColumnInsertedCallback -> m SignalHandlerId
onTableColumnInserted obj cb = liftIO $ do
let cb' = wrap_TableColumnInsertedCallback cb
cb'' <- mk_TableColumnInsertedCallback cb'
connectSignalFunPtr obj "column-inserted" cb'' SignalConnectBefore
afterTableColumnInserted :: (IsTable a, MonadIO m) => a -> TableColumnInsertedCallback -> m SignalHandlerId
afterTableColumnInserted obj cb = liftIO $ do
let cb' = wrap_TableColumnInsertedCallback cb
cb'' <- mk_TableColumnInsertedCallback cb'
connectSignalFunPtr obj "column-inserted" cb'' SignalConnectAfter
type TableColumnReorderedCallback =
IO ()
noTableColumnReorderedCallback :: Maybe TableColumnReorderedCallback
noTableColumnReorderedCallback = Nothing
type C_TableColumnReorderedCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TableColumnReorderedCallback :: C_TableColumnReorderedCallback -> IO (FunPtr C_TableColumnReorderedCallback)
genClosure_TableColumnReordered :: TableColumnReorderedCallback -> IO Closure
genClosure_TableColumnReordered cb = do
let cb' = wrap_TableColumnReorderedCallback cb
mk_TableColumnReorderedCallback cb' >>= newCClosure
wrap_TableColumnReorderedCallback ::
TableColumnReorderedCallback ->
Ptr () ->
Ptr () ->
IO ()
wrap_TableColumnReorderedCallback _cb _ _ = do
_cb
onTableColumnReordered :: (IsTable a, MonadIO m) => a -> TableColumnReorderedCallback -> m SignalHandlerId
onTableColumnReordered obj cb = liftIO $ do
let cb' = wrap_TableColumnReorderedCallback cb
cb'' <- mk_TableColumnReorderedCallback cb'
connectSignalFunPtr obj "column-reordered" cb'' SignalConnectBefore
afterTableColumnReordered :: (IsTable a, MonadIO m) => a -> TableColumnReorderedCallback -> m SignalHandlerId
afterTableColumnReordered obj cb = liftIO $ do
let cb' = wrap_TableColumnReorderedCallback cb
cb'' <- mk_TableColumnReorderedCallback cb'
connectSignalFunPtr obj "column-reordered" cb'' SignalConnectAfter
type TableModelChangedCallback =
IO ()
noTableModelChangedCallback :: Maybe TableModelChangedCallback
noTableModelChangedCallback = Nothing
type C_TableModelChangedCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TableModelChangedCallback :: C_TableModelChangedCallback -> IO (FunPtr C_TableModelChangedCallback)
genClosure_TableModelChanged :: TableModelChangedCallback -> IO Closure
genClosure_TableModelChanged cb = do
let cb' = wrap_TableModelChangedCallback cb
mk_TableModelChangedCallback cb' >>= newCClosure
wrap_TableModelChangedCallback ::
TableModelChangedCallback ->
Ptr () ->
Ptr () ->
IO ()
wrap_TableModelChangedCallback _cb _ _ = do
_cb
onTableModelChanged :: (IsTable a, MonadIO m) => a -> TableModelChangedCallback -> m SignalHandlerId
onTableModelChanged obj cb = liftIO $ do
let cb' = wrap_TableModelChangedCallback cb
cb'' <- mk_TableModelChangedCallback cb'
connectSignalFunPtr obj "model-changed" cb'' SignalConnectBefore
afterTableModelChanged :: (IsTable a, MonadIO m) => a -> TableModelChangedCallback -> m SignalHandlerId
afterTableModelChanged obj cb = liftIO $ do
let cb' = wrap_TableModelChangedCallback cb
cb'' <- mk_TableModelChangedCallback cb'
connectSignalFunPtr obj "model-changed" cb'' SignalConnectAfter
type TableRowDeletedCallback =
Int32 ->
Int32 ->
IO ()
noTableRowDeletedCallback :: Maybe TableRowDeletedCallback
noTableRowDeletedCallback = Nothing
type C_TableRowDeletedCallback =
Ptr () ->
Int32 ->
Int32 ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TableRowDeletedCallback :: C_TableRowDeletedCallback -> IO (FunPtr C_TableRowDeletedCallback)
genClosure_TableRowDeleted :: TableRowDeletedCallback -> IO Closure
genClosure_TableRowDeleted cb = do
let cb' = wrap_TableRowDeletedCallback cb
mk_TableRowDeletedCallback cb' >>= newCClosure
wrap_TableRowDeletedCallback ::
TableRowDeletedCallback ->
Ptr () ->
Int32 ->
Int32 ->
Ptr () ->
IO ()
wrap_TableRowDeletedCallback _cb _ arg1 arg2 _ = do
_cb arg1 arg2
onTableRowDeleted :: (IsTable a, MonadIO m) => a -> TableRowDeletedCallback -> m SignalHandlerId
onTableRowDeleted obj cb = liftIO $ do
let cb' = wrap_TableRowDeletedCallback cb
cb'' <- mk_TableRowDeletedCallback cb'
connectSignalFunPtr obj "row-deleted" cb'' SignalConnectBefore
afterTableRowDeleted :: (IsTable a, MonadIO m) => a -> TableRowDeletedCallback -> m SignalHandlerId
afterTableRowDeleted obj cb = liftIO $ do
let cb' = wrap_TableRowDeletedCallback cb
cb'' <- mk_TableRowDeletedCallback cb'
connectSignalFunPtr obj "row-deleted" cb'' SignalConnectAfter
type TableRowInsertedCallback =
Int32 ->
Int32 ->
IO ()
noTableRowInsertedCallback :: Maybe TableRowInsertedCallback
noTableRowInsertedCallback = Nothing
type C_TableRowInsertedCallback =
Ptr () ->
Int32 ->
Int32 ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TableRowInsertedCallback :: C_TableRowInsertedCallback -> IO (FunPtr C_TableRowInsertedCallback)
genClosure_TableRowInserted :: TableRowInsertedCallback -> IO Closure
genClosure_TableRowInserted cb = do
let cb' = wrap_TableRowInsertedCallback cb
mk_TableRowInsertedCallback cb' >>= newCClosure
wrap_TableRowInsertedCallback ::
TableRowInsertedCallback ->
Ptr () ->
Int32 ->
Int32 ->
Ptr () ->
IO ()
wrap_TableRowInsertedCallback _cb _ arg1 arg2 _ = do
_cb arg1 arg2
onTableRowInserted :: (IsTable a, MonadIO m) => a -> TableRowInsertedCallback -> m SignalHandlerId
onTableRowInserted obj cb = liftIO $ do
let cb' = wrap_TableRowInsertedCallback cb
cb'' <- mk_TableRowInsertedCallback cb'
connectSignalFunPtr obj "row-inserted" cb'' SignalConnectBefore
afterTableRowInserted :: (IsTable a, MonadIO m) => a -> TableRowInsertedCallback -> m SignalHandlerId
afterTableRowInserted obj cb = liftIO $ do
let cb' = wrap_TableRowInsertedCallback cb
cb'' <- mk_TableRowInsertedCallback cb'
connectSignalFunPtr obj "row-inserted" cb'' SignalConnectAfter
type TableRowReorderedCallback =
IO ()
noTableRowReorderedCallback :: Maybe TableRowReorderedCallback
noTableRowReorderedCallback = Nothing
type C_TableRowReorderedCallback =
Ptr () ->
Ptr () ->
IO ()
foreign import ccall "wrapper"
mk_TableRowReorderedCallback :: C_TableRowReorderedCallback -> IO (FunPtr C_TableRowReorderedCallback)
genClosure_TableRowReordered :: TableRowReorderedCallback -> IO Closure
genClosure_TableRowReordered cb = do
let cb' = wrap_TableRowReorderedCallback cb
mk_TableRowReorderedCallback cb' >>= newCClosure
wrap_TableRowReorderedCallback ::
TableRowReorderedCallback ->
Ptr () ->
Ptr () ->
IO ()
wrap_TableRowReorderedCallback _cb _ _ = do
_cb
onTableRowReordered :: (IsTable a, MonadIO m) => a -> TableRowReorderedCallback -> m SignalHandlerId
onTableRowReordered obj cb = liftIO $ do
let cb' = wrap_TableRowReorderedCallback cb
cb'' <- mk_TableRowReorderedCallback cb'
connectSignalFunPtr obj "row-reordered" cb'' SignalConnectBefore
afterTableRowReordered :: (IsTable a, MonadIO m) => a -> TableRowReorderedCallback -> m SignalHandlerId
afterTableRowReordered obj cb = liftIO $ do
let cb' = wrap_TableRowReorderedCallback cb
cb'' <- mk_TableRowReorderedCallback cb'
connectSignalFunPtr obj "row-reordered" cb'' SignalConnectAfter
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableColumnDeletedSignalInfo
instance SignalInfo TableColumnDeletedSignalInfo where
type HaskellCallbackType TableColumnDeletedSignalInfo = TableColumnDeletedCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TableColumnDeletedCallback cb
cb'' <- mk_TableColumnDeletedCallback cb'
connectSignalFunPtr obj "column-deleted" cb'' connectMode
data TableColumnInsertedSignalInfo
instance SignalInfo TableColumnInsertedSignalInfo where
type HaskellCallbackType TableColumnInsertedSignalInfo = TableColumnInsertedCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TableColumnInsertedCallback cb
cb'' <- mk_TableColumnInsertedCallback cb'
connectSignalFunPtr obj "column-inserted" cb'' connectMode
data TableColumnReorderedSignalInfo
instance SignalInfo TableColumnReorderedSignalInfo where
type HaskellCallbackType TableColumnReorderedSignalInfo = TableColumnReorderedCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TableColumnReorderedCallback cb
cb'' <- mk_TableColumnReorderedCallback cb'
connectSignalFunPtr obj "column-reordered" cb'' connectMode
data TableModelChangedSignalInfo
instance SignalInfo TableModelChangedSignalInfo where
type HaskellCallbackType TableModelChangedSignalInfo = TableModelChangedCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TableModelChangedCallback cb
cb'' <- mk_TableModelChangedCallback cb'
connectSignalFunPtr obj "model-changed" cb'' connectMode
data TableRowDeletedSignalInfo
instance SignalInfo TableRowDeletedSignalInfo where
type HaskellCallbackType TableRowDeletedSignalInfo = TableRowDeletedCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TableRowDeletedCallback cb
cb'' <- mk_TableRowDeletedCallback cb'
connectSignalFunPtr obj "row-deleted" cb'' connectMode
data TableRowInsertedSignalInfo
instance SignalInfo TableRowInsertedSignalInfo where
type HaskellCallbackType TableRowInsertedSignalInfo = TableRowInsertedCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TableRowInsertedCallback cb
cb'' <- mk_TableRowInsertedCallback cb'
connectSignalFunPtr obj "row-inserted" cb'' connectMode
data TableRowReorderedSignalInfo
instance SignalInfo TableRowReorderedSignalInfo where
type HaskellCallbackType TableRowReorderedSignalInfo = TableRowReorderedCallback
connectSignal _ obj cb connectMode = do
let cb' = wrap_TableRowReorderedCallback cb
cb'' <- mk_TableRowReorderedCallback cb'
connectSignalFunPtr obj "row-reordered" cb'' connectMode
type instance O.SignalList Table = TableSignalList
type TableSignalList = ('[ '("columnDeleted", TableColumnDeletedSignalInfo), '("columnInserted", TableColumnInsertedSignalInfo), '("columnReordered", TableColumnReorderedSignalInfo), '("modelChanged", TableModelChangedSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("rowDeleted", TableRowDeletedSignalInfo), '("rowInserted", TableRowInsertedSignalInfo), '("rowReordered", TableRowReorderedSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "atk_table_get_type"
c_atk_table_get_type :: IO GType
instance GObject Table where
gobjectType _ = c_atk_table_get_type
class GObject o => IsTable o
#if MIN_VERSION_base(4,9,0)
instance (GObject a, O.UnknownAncestorError Table a) =>
IsTable a
#endif
instance IsTable Table
instance GObject.Object.IsObject Table
toTable :: (MonadIO m, IsTable o) => o -> m Table
toTable = liftIO . unsafeCastTo Table
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
instance O.HasAttributeList Table
type instance O.AttributeList Table = TableAttributeList
type TableAttributeList = ('[ ] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
#endif
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
type family ResolveTableMethod (t :: Symbol) (o :: *) :: * where
ResolveTableMethod "addColumnSelection" o = TableAddColumnSelectionMethodInfo
ResolveTableMethod "addRowSelection" o = TableAddRowSelectionMethodInfo
ResolveTableMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveTableMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveTableMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveTableMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveTableMethod "isColumnSelected" o = TableIsColumnSelectedMethodInfo
ResolveTableMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveTableMethod "isRowSelected" o = TableIsRowSelectedMethodInfo
ResolveTableMethod "isSelected" o = TableIsSelectedMethodInfo
ResolveTableMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveTableMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveTableMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveTableMethod "refAt" o = TableRefAtMethodInfo
ResolveTableMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveTableMethod "removeColumnSelection" o = TableRemoveColumnSelectionMethodInfo
ResolveTableMethod "removeRowSelection" o = TableRemoveRowSelectionMethodInfo
ResolveTableMethod "replaceData" o = GObject.Object.ObjectReplaceDataMethodInfo
ResolveTableMethod "replaceQdata" o = GObject.Object.ObjectReplaceQdataMethodInfo
ResolveTableMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveTableMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveTableMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveTableMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveTableMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveTableMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveTableMethod "getCaption" o = TableGetCaptionMethodInfo
ResolveTableMethod "getColumnAtIndex" o = TableGetColumnAtIndexMethodInfo
ResolveTableMethod "getColumnDescription" o = TableGetColumnDescriptionMethodInfo
ResolveTableMethod "getColumnExtentAt" o = TableGetColumnExtentAtMethodInfo
ResolveTableMethod "getColumnHeader" o = TableGetColumnHeaderMethodInfo
ResolveTableMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveTableMethod "getIndexAt" o = TableGetIndexAtMethodInfo
ResolveTableMethod "getNColumns" o = TableGetNColumnsMethodInfo
ResolveTableMethod "getNRows" o = TableGetNRowsMethodInfo
ResolveTableMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveTableMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveTableMethod "getRowAtIndex" o = TableGetRowAtIndexMethodInfo
ResolveTableMethod "getRowDescription" o = TableGetRowDescriptionMethodInfo
ResolveTableMethod "getRowExtentAt" o = TableGetRowExtentAtMethodInfo
ResolveTableMethod "getRowHeader" o = TableGetRowHeaderMethodInfo
ResolveTableMethod "getSelectedColumns" o = TableGetSelectedColumnsMethodInfo
ResolveTableMethod "getSelectedRows" o = TableGetSelectedRowsMethodInfo
ResolveTableMethod "getSummary" o = TableGetSummaryMethodInfo
ResolveTableMethod "setCaption" o = TableSetCaptionMethodInfo
ResolveTableMethod "setColumnDescription" o = TableSetColumnDescriptionMethodInfo
ResolveTableMethod "setColumnHeader" o = TableSetColumnHeaderMethodInfo
ResolveTableMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveTableMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveTableMethod "setRowDescription" o = TableSetRowDescriptionMethodInfo
ResolveTableMethod "setRowHeader" o = TableSetRowHeaderMethodInfo
ResolveTableMethod "setSummary" o = TableSetSummaryMethodInfo
ResolveTableMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveTableMethod t Table, O.MethodInfo info Table p) => O.IsLabelProxy t (Table -> p) where
fromLabelProxy _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#if MIN_VERSION_base(4,9,0)
instance (info ~ ResolveTableMethod t Table, O.MethodInfo info Table p) => O.IsLabel t (Table -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#else
fromLabel _ = O.overloadedMethod (O.MethodProxy :: O.MethodProxy info)
#endif
#endif
#endif
foreign import ccall "atk_table_add_column_selection" atk_table_add_column_selection ::
Ptr Table ->
Int32 ->
IO CInt
tableAddColumnSelection ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> m Bool
tableAddColumnSelection table column = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_add_column_selection table' column
let result' = (/= 0) result
touchManagedPtr table
return result'
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableAddColumnSelectionMethodInfo
instance (signature ~ (Int32 -> m Bool), MonadIO m, IsTable a) => O.MethodInfo TableAddColumnSelectionMethodInfo a signature where
overloadedMethod _ = tableAddColumnSelection
#endif
foreign import ccall "atk_table_add_row_selection" atk_table_add_row_selection ::
Ptr Table ->
Int32 ->
IO CInt
tableAddRowSelection ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> m Bool
tableAddRowSelection table row = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_add_row_selection table' row
let result' = (/= 0) result
touchManagedPtr table
return result'
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableAddRowSelectionMethodInfo
instance (signature ~ (Int32 -> m Bool), MonadIO m, IsTable a) => O.MethodInfo TableAddRowSelectionMethodInfo a signature where
overloadedMethod _ = tableAddRowSelection
#endif
foreign import ccall "atk_table_get_caption" atk_table_get_caption ::
Ptr Table ->
IO (Ptr Atk.Object.Object)
tableGetCaption ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> m (Maybe Atk.Object.Object)
tableGetCaption table = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_caption table'
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject Atk.Object.Object) result'
return result''
touchManagedPtr table
return maybeResult
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetCaptionMethodInfo
instance (signature ~ (m (Maybe Atk.Object.Object)), MonadIO m, IsTable a) => O.MethodInfo TableGetCaptionMethodInfo a signature where
overloadedMethod _ = tableGetCaption
#endif
foreign import ccall "atk_table_get_column_at_index" atk_table_get_column_at_index ::
Ptr Table ->
Int32 ->
IO Int32
tableGetColumnAtIndex ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> m Int32
tableGetColumnAtIndex table index_ = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_column_at_index table' index_
touchManagedPtr table
return result
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetColumnAtIndexMethodInfo
instance (signature ~ (Int32 -> m Int32), MonadIO m, IsTable a) => O.MethodInfo TableGetColumnAtIndexMethodInfo a signature where
overloadedMethod _ = tableGetColumnAtIndex
#endif
foreign import ccall "atk_table_get_column_description" atk_table_get_column_description ::
Ptr Table ->
Int32 ->
IO CString
tableGetColumnDescription ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> m T.Text
tableGetColumnDescription table column = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_column_description table' column
checkUnexpectedReturnNULL "tableGetColumnDescription" result
result' <- cstringToText result
touchManagedPtr table
return result'
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetColumnDescriptionMethodInfo
instance (signature ~ (Int32 -> m T.Text), MonadIO m, IsTable a) => O.MethodInfo TableGetColumnDescriptionMethodInfo a signature where
overloadedMethod _ = tableGetColumnDescription
#endif
foreign import ccall "atk_table_get_column_extent_at" atk_table_get_column_extent_at ::
Ptr Table ->
Int32 ->
Int32 ->
IO Int32
tableGetColumnExtentAt ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> Int32
-> m Int32
tableGetColumnExtentAt table row column = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_column_extent_at table' row column
touchManagedPtr table
return result
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetColumnExtentAtMethodInfo
instance (signature ~ (Int32 -> Int32 -> m Int32), MonadIO m, IsTable a) => O.MethodInfo TableGetColumnExtentAtMethodInfo a signature where
overloadedMethod _ = tableGetColumnExtentAt
#endif
foreign import ccall "atk_table_get_column_header" atk_table_get_column_header ::
Ptr Table ->
Int32 ->
IO (Ptr Atk.Object.Object)
tableGetColumnHeader ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> m (Maybe Atk.Object.Object)
tableGetColumnHeader table column = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_column_header table' column
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject Atk.Object.Object) result'
return result''
touchManagedPtr table
return maybeResult
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetColumnHeaderMethodInfo
instance (signature ~ (Int32 -> m (Maybe Atk.Object.Object)), MonadIO m, IsTable a) => O.MethodInfo TableGetColumnHeaderMethodInfo a signature where
overloadedMethod _ = tableGetColumnHeader
#endif
foreign import ccall "atk_table_get_index_at" atk_table_get_index_at ::
Ptr Table ->
Int32 ->
Int32 ->
IO Int32
tableGetIndexAt ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> Int32
-> m Int32
tableGetIndexAt table row column = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_index_at table' row column
touchManagedPtr table
return result
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetIndexAtMethodInfo
instance (signature ~ (Int32 -> Int32 -> m Int32), MonadIO m, IsTable a) => O.MethodInfo TableGetIndexAtMethodInfo a signature where
overloadedMethod _ = tableGetIndexAt
#endif
foreign import ccall "atk_table_get_n_columns" atk_table_get_n_columns ::
Ptr Table ->
IO Int32
tableGetNColumns ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> m Int32
tableGetNColumns table = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_n_columns table'
touchManagedPtr table
return result
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetNColumnsMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsTable a) => O.MethodInfo TableGetNColumnsMethodInfo a signature where
overloadedMethod _ = tableGetNColumns
#endif
foreign import ccall "atk_table_get_n_rows" atk_table_get_n_rows ::
Ptr Table ->
IO Int32
tableGetNRows ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> m Int32
tableGetNRows table = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_n_rows table'
touchManagedPtr table
return result
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetNRowsMethodInfo
instance (signature ~ (m Int32), MonadIO m, IsTable a) => O.MethodInfo TableGetNRowsMethodInfo a signature where
overloadedMethod _ = tableGetNRows
#endif
foreign import ccall "atk_table_get_row_at_index" atk_table_get_row_at_index ::
Ptr Table ->
Int32 ->
IO Int32
tableGetRowAtIndex ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> m Int32
tableGetRowAtIndex table index_ = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_row_at_index table' index_
touchManagedPtr table
return result
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetRowAtIndexMethodInfo
instance (signature ~ (Int32 -> m Int32), MonadIO m, IsTable a) => O.MethodInfo TableGetRowAtIndexMethodInfo a signature where
overloadedMethod _ = tableGetRowAtIndex
#endif
foreign import ccall "atk_table_get_row_description" atk_table_get_row_description ::
Ptr Table ->
Int32 ->
IO CString
tableGetRowDescription ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> m (Maybe T.Text)
tableGetRowDescription table row = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_row_description table' row
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- cstringToText result'
return result''
touchManagedPtr table
return maybeResult
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetRowDescriptionMethodInfo
instance (signature ~ (Int32 -> m (Maybe T.Text)), MonadIO m, IsTable a) => O.MethodInfo TableGetRowDescriptionMethodInfo a signature where
overloadedMethod _ = tableGetRowDescription
#endif
foreign import ccall "atk_table_get_row_extent_at" atk_table_get_row_extent_at ::
Ptr Table ->
Int32 ->
Int32 ->
IO Int32
tableGetRowExtentAt ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> Int32
-> m Int32
tableGetRowExtentAt table row column = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_row_extent_at table' row column
touchManagedPtr table
return result
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetRowExtentAtMethodInfo
instance (signature ~ (Int32 -> Int32 -> m Int32), MonadIO m, IsTable a) => O.MethodInfo TableGetRowExtentAtMethodInfo a signature where
overloadedMethod _ = tableGetRowExtentAt
#endif
foreign import ccall "atk_table_get_row_header" atk_table_get_row_header ::
Ptr Table ->
Int32 ->
IO (Ptr Atk.Object.Object)
tableGetRowHeader ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> m (Maybe Atk.Object.Object)
tableGetRowHeader table row = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_row_header table' row
maybeResult <- convertIfNonNull result $ \result' -> do
result'' <- (newObject Atk.Object.Object) result'
return result''
touchManagedPtr table
return maybeResult
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetRowHeaderMethodInfo
instance (signature ~ (Int32 -> m (Maybe Atk.Object.Object)), MonadIO m, IsTable a) => O.MethodInfo TableGetRowHeaderMethodInfo a signature where
overloadedMethod _ = tableGetRowHeader
#endif
foreign import ccall "atk_table_get_selected_columns" atk_table_get_selected_columns ::
Ptr Table ->
Int32 ->
IO Int32
tableGetSelectedColumns ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> m Int32
tableGetSelectedColumns table selected = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_selected_columns table' selected
touchManagedPtr table
return result
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetSelectedColumnsMethodInfo
instance (signature ~ (Int32 -> m Int32), MonadIO m, IsTable a) => O.MethodInfo TableGetSelectedColumnsMethodInfo a signature where
overloadedMethod _ = tableGetSelectedColumns
#endif
foreign import ccall "atk_table_get_selected_rows" atk_table_get_selected_rows ::
Ptr Table ->
Int32 ->
IO Int32
tableGetSelectedRows ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> m Int32
tableGetSelectedRows table selected = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_selected_rows table' selected
touchManagedPtr table
return result
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetSelectedRowsMethodInfo
instance (signature ~ (Int32 -> m Int32), MonadIO m, IsTable a) => O.MethodInfo TableGetSelectedRowsMethodInfo a signature where
overloadedMethod _ = tableGetSelectedRows
#endif
foreign import ccall "atk_table_get_summary" atk_table_get_summary ::
Ptr Table ->
IO (Ptr Atk.Object.Object)
tableGetSummary ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> m Atk.Object.Object
tableGetSummary table = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_get_summary table'
checkUnexpectedReturnNULL "tableGetSummary" result
result' <- (wrapObject Atk.Object.Object) result
touchManagedPtr table
return result'
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableGetSummaryMethodInfo
instance (signature ~ (m Atk.Object.Object), MonadIO m, IsTable a) => O.MethodInfo TableGetSummaryMethodInfo a signature where
overloadedMethod _ = tableGetSummary
#endif
foreign import ccall "atk_table_is_column_selected" atk_table_is_column_selected ::
Ptr Table ->
Int32 ->
IO CInt
tableIsColumnSelected ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> m Bool
tableIsColumnSelected table column = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_is_column_selected table' column
let result' = (/= 0) result
touchManagedPtr table
return result'
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableIsColumnSelectedMethodInfo
instance (signature ~ (Int32 -> m Bool), MonadIO m, IsTable a) => O.MethodInfo TableIsColumnSelectedMethodInfo a signature where
overloadedMethod _ = tableIsColumnSelected
#endif
foreign import ccall "atk_table_is_row_selected" atk_table_is_row_selected ::
Ptr Table ->
Int32 ->
IO CInt
tableIsRowSelected ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> m Bool
tableIsRowSelected table row = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_is_row_selected table' row
let result' = (/= 0) result
touchManagedPtr table
return result'
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableIsRowSelectedMethodInfo
instance (signature ~ (Int32 -> m Bool), MonadIO m, IsTable a) => O.MethodInfo TableIsRowSelectedMethodInfo a signature where
overloadedMethod _ = tableIsRowSelected
#endif
foreign import ccall "atk_table_is_selected" atk_table_is_selected ::
Ptr Table ->
Int32 ->
Int32 ->
IO CInt
tableIsSelected ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> Int32
-> m Bool
tableIsSelected table row column = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_is_selected table' row column
let result' = (/= 0) result
touchManagedPtr table
return result'
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableIsSelectedMethodInfo
instance (signature ~ (Int32 -> Int32 -> m Bool), MonadIO m, IsTable a) => O.MethodInfo TableIsSelectedMethodInfo a signature where
overloadedMethod _ = tableIsSelected
#endif
foreign import ccall "atk_table_ref_at" atk_table_ref_at ::
Ptr Table ->
Int32 ->
Int32 ->
IO (Ptr Atk.Object.Object)
tableRefAt ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> Int32
-> m Atk.Object.Object
tableRefAt table row column = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_ref_at table' row column
checkUnexpectedReturnNULL "tableRefAt" result
result' <- (wrapObject Atk.Object.Object) result
touchManagedPtr table
return result'
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableRefAtMethodInfo
instance (signature ~ (Int32 -> Int32 -> m Atk.Object.Object), MonadIO m, IsTable a) => O.MethodInfo TableRefAtMethodInfo a signature where
overloadedMethod _ = tableRefAt
#endif
foreign import ccall "atk_table_remove_column_selection" atk_table_remove_column_selection ::
Ptr Table ->
Int32 ->
IO CInt
tableRemoveColumnSelection ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> m Bool
tableRemoveColumnSelection table column = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_remove_column_selection table' column
let result' = (/= 0) result
touchManagedPtr table
return result'
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableRemoveColumnSelectionMethodInfo
instance (signature ~ (Int32 -> m Bool), MonadIO m, IsTable a) => O.MethodInfo TableRemoveColumnSelectionMethodInfo a signature where
overloadedMethod _ = tableRemoveColumnSelection
#endif
foreign import ccall "atk_table_remove_row_selection" atk_table_remove_row_selection ::
Ptr Table ->
Int32 ->
IO CInt
tableRemoveRowSelection ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> m Bool
tableRemoveRowSelection table row = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
result <- atk_table_remove_row_selection table' row
let result' = (/= 0) result
touchManagedPtr table
return result'
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableRemoveRowSelectionMethodInfo
instance (signature ~ (Int32 -> m Bool), MonadIO m, IsTable a) => O.MethodInfo TableRemoveRowSelectionMethodInfo a signature where
overloadedMethod _ = tableRemoveRowSelection
#endif
foreign import ccall "atk_table_set_caption" atk_table_set_caption ::
Ptr Table ->
Ptr Atk.Object.Object ->
IO ()
tableSetCaption ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a, Atk.Object.IsObject b) =>
a
-> b
-> m ()
tableSetCaption table caption = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
caption' <- unsafeManagedPtrCastPtr caption
atk_table_set_caption table' caption'
touchManagedPtr table
touchManagedPtr caption
return ()
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableSetCaptionMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsTable a, Atk.Object.IsObject b) => O.MethodInfo TableSetCaptionMethodInfo a signature where
overloadedMethod _ = tableSetCaption
#endif
foreign import ccall "atk_table_set_column_description" atk_table_set_column_description ::
Ptr Table ->
Int32 ->
CString ->
IO ()
tableSetColumnDescription ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> T.Text
-> m ()
tableSetColumnDescription table column description = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
description' <- textToCString description
atk_table_set_column_description table' column description'
touchManagedPtr table
freeMem description'
return ()
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableSetColumnDescriptionMethodInfo
instance (signature ~ (Int32 -> T.Text -> m ()), MonadIO m, IsTable a) => O.MethodInfo TableSetColumnDescriptionMethodInfo a signature where
overloadedMethod _ = tableSetColumnDescription
#endif
foreign import ccall "atk_table_set_column_header" atk_table_set_column_header ::
Ptr Table ->
Int32 ->
Ptr Atk.Object.Object ->
IO ()
tableSetColumnHeader ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a, Atk.Object.IsObject b) =>
a
-> Int32
-> b
-> m ()
tableSetColumnHeader table column header = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
header' <- unsafeManagedPtrCastPtr header
atk_table_set_column_header table' column header'
touchManagedPtr table
touchManagedPtr header
return ()
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableSetColumnHeaderMethodInfo
instance (signature ~ (Int32 -> b -> m ()), MonadIO m, IsTable a, Atk.Object.IsObject b) => O.MethodInfo TableSetColumnHeaderMethodInfo a signature where
overloadedMethod _ = tableSetColumnHeader
#endif
foreign import ccall "atk_table_set_row_description" atk_table_set_row_description ::
Ptr Table ->
Int32 ->
CString ->
IO ()
tableSetRowDescription ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a) =>
a
-> Int32
-> T.Text
-> m ()
tableSetRowDescription table row description = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
description' <- textToCString description
atk_table_set_row_description table' row description'
touchManagedPtr table
freeMem description'
return ()
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableSetRowDescriptionMethodInfo
instance (signature ~ (Int32 -> T.Text -> m ()), MonadIO m, IsTable a) => O.MethodInfo TableSetRowDescriptionMethodInfo a signature where
overloadedMethod _ = tableSetRowDescription
#endif
foreign import ccall "atk_table_set_row_header" atk_table_set_row_header ::
Ptr Table ->
Int32 ->
Ptr Atk.Object.Object ->
IO ()
tableSetRowHeader ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a, Atk.Object.IsObject b) =>
a
-> Int32
-> b
-> m ()
tableSetRowHeader table row header = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
header' <- unsafeManagedPtrCastPtr header
atk_table_set_row_header table' row header'
touchManagedPtr table
touchManagedPtr header
return ()
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableSetRowHeaderMethodInfo
instance (signature ~ (Int32 -> b -> m ()), MonadIO m, IsTable a, Atk.Object.IsObject b) => O.MethodInfo TableSetRowHeaderMethodInfo a signature where
overloadedMethod _ = tableSetRowHeader
#endif
foreign import ccall "atk_table_set_summary" atk_table_set_summary ::
Ptr Table ->
Ptr Atk.Object.Object ->
IO ()
tableSetSummary ::
(B.CallStack.HasCallStack, MonadIO m, IsTable a, Atk.Object.IsObject b) =>
a
-> b
-> m ()
tableSetSummary table accessible = liftIO $ do
table' <- unsafeManagedPtrCastPtr table
accessible' <- unsafeManagedPtrCastPtr accessible
atk_table_set_summary table' accessible'
touchManagedPtr table
touchManagedPtr accessible
return ()
#if defined(ENABLE_OVERLOADING) && !defined(__HADDOCK_VERSION__)
data TableSetSummaryMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsTable a, Atk.Object.IsObject b) => O.MethodInfo TableSetSummaryMethodInfo a signature where
overloadedMethod _ = tableSetSummary
#endif