{-# LANGUAGE TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gtk.Objects.FlattenListModel
(
FlattenListModel(..) ,
IsFlattenListModel ,
toFlattenListModel ,
noFlattenListModel ,
#if defined(ENABLE_OVERLOADING)
ResolveFlattenListModelMethod ,
#endif
#if defined(ENABLE_OVERLOADING)
FlattenListModelGetModelMethodInfo ,
#endif
flattenListModelGetModel ,
flattenListModelNew ,
#if defined(ENABLE_OVERLOADING)
FlattenListModelSetModelMethodInfo ,
#endif
flattenListModelSetModel ,
#if defined(ENABLE_OVERLOADING)
FlattenListModelItemTypePropertyInfo ,
#endif
constructFlattenListModelItemType ,
#if defined(ENABLE_OVERLOADING)
flattenListModelItemType ,
#endif
getFlattenListModelItemType ,
#if defined(ENABLE_OVERLOADING)
FlattenListModelModelPropertyInfo ,
#endif
clearFlattenListModelModel ,
constructFlattenListModelModel ,
#if defined(ENABLE_OVERLOADING)
flattenListModelModel ,
#endif
getFlattenListModelModel ,
setFlattenListModelModel ,
) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gio.Interfaces.ListModel as Gio.ListModel
newtype FlattenListModel = FlattenListModel (ManagedPtr FlattenListModel)
deriving (FlattenListModel -> FlattenListModel -> Bool
(FlattenListModel -> FlattenListModel -> Bool)
-> (FlattenListModel -> FlattenListModel -> Bool)
-> Eq FlattenListModel
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
/= :: FlattenListModel -> FlattenListModel -> Bool
$c/= :: FlattenListModel -> FlattenListModel -> Bool
== :: FlattenListModel -> FlattenListModel -> Bool
$c== :: FlattenListModel -> FlattenListModel -> Bool
Eq)
foreign import ccall "gtk_flatten_list_model_get_type"
c_gtk_flatten_list_model_get_type :: IO GType
instance GObject FlattenListModel where
gobjectType :: IO GType
gobjectType = IO GType
c_gtk_flatten_list_model_get_type
instance B.GValue.IsGValue FlattenListModel where
toGValue :: FlattenListModel -> IO GValue
toGValue o :: FlattenListModel
o = do
GType
gtype <- IO GType
c_gtk_flatten_list_model_get_type
FlattenListModel
-> (Ptr FlattenListModel -> IO GValue) -> IO GValue
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr FlattenListModel
o (GType
-> (GValue -> Ptr FlattenListModel -> IO ())
-> Ptr FlattenListModel
-> IO GValue
forall a. GType -> (GValue -> a -> IO ()) -> a -> IO GValue
B.GValue.buildGValue GType
gtype GValue -> Ptr FlattenListModel -> IO ()
forall a. GObject a => GValue -> Ptr a -> IO ()
B.GValue.set_object)
fromGValue :: GValue -> IO FlattenListModel
fromGValue gv :: GValue
gv = do
Ptr FlattenListModel
ptr <- GValue -> IO (Ptr FlattenListModel)
forall b. GObject b => GValue -> IO (Ptr b)
B.GValue.get_object GValue
gv :: IO (Ptr FlattenListModel)
(ManagedPtr FlattenListModel -> FlattenListModel)
-> Ptr FlattenListModel -> IO FlattenListModel
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr FlattenListModel -> FlattenListModel
FlattenListModel Ptr FlattenListModel
ptr
class (GObject o, O.IsDescendantOf FlattenListModel o) => IsFlattenListModel o
instance (GObject o, O.IsDescendantOf FlattenListModel o) => IsFlattenListModel o
instance O.HasParentTypes FlattenListModel
type instance O.ParentTypes FlattenListModel = '[GObject.Object.Object, Gio.ListModel.ListModel]
toFlattenListModel :: (MonadIO m, IsFlattenListModel o) => o -> m FlattenListModel
toFlattenListModel :: o -> m FlattenListModel
toFlattenListModel = IO FlattenListModel -> m FlattenListModel
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO FlattenListModel -> m FlattenListModel)
-> (o -> IO FlattenListModel) -> o -> m FlattenListModel
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr FlattenListModel -> FlattenListModel)
-> o -> IO FlattenListModel
forall o o'.
(HasCallStack, GObject o, GObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
unsafeCastTo ManagedPtr FlattenListModel -> FlattenListModel
FlattenListModel
noFlattenListModel :: Maybe FlattenListModel
noFlattenListModel :: Maybe FlattenListModel
noFlattenListModel = Maybe FlattenListModel
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
type family ResolveFlattenListModelMethod (t :: Symbol) (o :: *) :: * where
ResolveFlattenListModelMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
ResolveFlattenListModelMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
ResolveFlattenListModelMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
ResolveFlattenListModelMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
ResolveFlattenListModelMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
ResolveFlattenListModelMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
ResolveFlattenListModelMethod "itemsChanged" o = Gio.ListModel.ListModelItemsChangedMethodInfo
ResolveFlattenListModelMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
ResolveFlattenListModelMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
ResolveFlattenListModelMethod "ref" o = GObject.Object.ObjectRefMethodInfo
ResolveFlattenListModelMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
ResolveFlattenListModelMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
ResolveFlattenListModelMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
ResolveFlattenListModelMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
ResolveFlattenListModelMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
ResolveFlattenListModelMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
ResolveFlattenListModelMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
ResolveFlattenListModelMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
ResolveFlattenListModelMethod "getItem" o = Gio.ListModel.ListModelGetItemMethodInfo
ResolveFlattenListModelMethod "getItemType" o = Gio.ListModel.ListModelGetItemTypeMethodInfo
ResolveFlattenListModelMethod "getModel" o = FlattenListModelGetModelMethodInfo
ResolveFlattenListModelMethod "getNItems" o = Gio.ListModel.ListModelGetNItemsMethodInfo
ResolveFlattenListModelMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
ResolveFlattenListModelMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
ResolveFlattenListModelMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
ResolveFlattenListModelMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
ResolveFlattenListModelMethod "setModel" o = FlattenListModelSetModelMethodInfo
ResolveFlattenListModelMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
ResolveFlattenListModelMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveFlattenListModelMethod t FlattenListModel, O.MethodInfo info FlattenListModel p) => OL.IsLabel t (FlattenListModel -> p) where
#if MIN_VERSION_base(4,10,0)
fromLabel = O.overloadedMethod @info
#else
fromLabel _ = O.overloadedMethod @info
#endif
#endif
getFlattenListModelItemType :: (MonadIO m, IsFlattenListModel o) => o -> m GType
getFlattenListModelItemType :: o -> m GType
getFlattenListModelItemType obj :: o
obj = IO GType -> m GType
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO GType -> m GType) -> IO GType -> m GType
forall a b. (a -> b) -> a -> b
$ o -> String -> IO GType
forall a. GObject a => a -> String -> IO GType
B.Properties.getObjectPropertyGType o
obj "item-type"
constructFlattenListModelItemType :: (IsFlattenListModel o) => GType -> IO (GValueConstruct o)
constructFlattenListModelItemType :: GType -> IO (GValueConstruct o)
constructFlattenListModelItemType val :: GType
val = String -> GType -> IO (GValueConstruct o)
forall o. String -> GType -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyGType "item-type" GType
val
#if defined(ENABLE_OVERLOADING)
data FlattenListModelItemTypePropertyInfo
instance AttrInfo FlattenListModelItemTypePropertyInfo where
type AttrAllowedOps FlattenListModelItemTypePropertyInfo = '[ 'AttrConstruct, 'AttrGet]
type AttrBaseTypeConstraint FlattenListModelItemTypePropertyInfo = IsFlattenListModel
type AttrSetTypeConstraint FlattenListModelItemTypePropertyInfo = (~) GType
type AttrTransferTypeConstraint FlattenListModelItemTypePropertyInfo = (~) GType
type AttrTransferType FlattenListModelItemTypePropertyInfo = GType
type AttrGetType FlattenListModelItemTypePropertyInfo = GType
type AttrLabel FlattenListModelItemTypePropertyInfo = "item-type"
type AttrOrigin FlattenListModelItemTypePropertyInfo = FlattenListModel
attrGet = getFlattenListModelItemType
attrSet = undefined
attrTransfer _ v = do
return v
attrConstruct = constructFlattenListModelItemType
attrClear = undefined
#endif
getFlattenListModelModel :: (MonadIO m, IsFlattenListModel o) => o -> m (Maybe Gio.ListModel.ListModel)
getFlattenListModelModel :: o -> m (Maybe ListModel)
getFlattenListModelModel obj :: o
obj = IO (Maybe ListModel) -> m (Maybe ListModel)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe ListModel) -> m (Maybe ListModel))
-> IO (Maybe ListModel) -> m (Maybe ListModel)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr ListModel -> ListModel)
-> IO (Maybe ListModel)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj "model" ManagedPtr ListModel -> ListModel
Gio.ListModel.ListModel
setFlattenListModelModel :: (MonadIO m, IsFlattenListModel o, Gio.ListModel.IsListModel a) => o -> a -> m ()
setFlattenListModelModel :: o -> a -> m ()
setFlattenListModelModel obj :: o
obj val :: a
val = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe a -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj "model" (a -> Maybe a
forall a. a -> Maybe a
Just a
val)
constructFlattenListModelModel :: (IsFlattenListModel o, Gio.ListModel.IsListModel a) => a -> IO (GValueConstruct o)
constructFlattenListModelModel :: a -> IO (GValueConstruct o)
constructFlattenListModelModel val :: a
val = String -> Maybe a -> IO (GValueConstruct o)
forall a o.
GObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyObject "model" (a -> Maybe a
forall a. a -> Maybe a
Just a
val)
clearFlattenListModelModel :: (MonadIO m, IsFlattenListModel o) => o -> m ()
clearFlattenListModelModel :: o -> m ()
clearFlattenListModelModel obj :: o
obj = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe ListModel -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj "model" (Maybe ListModel
forall a. Maybe a
Nothing :: Maybe Gio.ListModel.ListModel)
#if defined(ENABLE_OVERLOADING)
data FlattenListModelModelPropertyInfo
instance AttrInfo FlattenListModelModelPropertyInfo where
type AttrAllowedOps FlattenListModelModelPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
type AttrBaseTypeConstraint FlattenListModelModelPropertyInfo = IsFlattenListModel
type AttrSetTypeConstraint FlattenListModelModelPropertyInfo = Gio.ListModel.IsListModel
type AttrTransferTypeConstraint FlattenListModelModelPropertyInfo = Gio.ListModel.IsListModel
type AttrTransferType FlattenListModelModelPropertyInfo = Gio.ListModel.ListModel
type AttrGetType FlattenListModelModelPropertyInfo = (Maybe Gio.ListModel.ListModel)
type AttrLabel FlattenListModelModelPropertyInfo = "model"
type AttrOrigin FlattenListModelModelPropertyInfo = FlattenListModel
attrGet = getFlattenListModelModel
attrSet = setFlattenListModelModel
attrTransfer _ v = do
unsafeCastTo Gio.ListModel.ListModel v
attrConstruct = constructFlattenListModelModel
attrClear = clearFlattenListModelModel
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList FlattenListModel
type instance O.AttributeList FlattenListModel = FlattenListModelAttributeList
type FlattenListModelAttributeList = ('[ '("itemType", FlattenListModelItemTypePropertyInfo), '("model", FlattenListModelModelPropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
flattenListModelItemType :: AttrLabelProxy "itemType"
flattenListModelItemType = AttrLabelProxy
flattenListModelModel :: AttrLabelProxy "model"
flattenListModelModel = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList FlattenListModel = FlattenListModelSignalList
type FlattenListModelSignalList = ('[ '("itemsChanged", Gio.ListModel.ListModelItemsChangedSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "gtk_flatten_list_model_new" gtk_flatten_list_model_new ::
CGType ->
Ptr Gio.ListModel.ListModel ->
IO (Ptr FlattenListModel)
flattenListModelNew ::
(B.CallStack.HasCallStack, MonadIO m, Gio.ListModel.IsListModel a) =>
GType
-> Maybe (a)
-> m FlattenListModel
flattenListModelNew :: GType -> Maybe a -> m FlattenListModel
flattenListModelNew itemType :: GType
itemType model :: Maybe a
model = IO FlattenListModel -> m FlattenListModel
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO FlattenListModel -> m FlattenListModel)
-> IO FlattenListModel -> m FlattenListModel
forall a b. (a -> b) -> a -> b
$ do
let itemType' :: CGType
itemType' = GType -> CGType
gtypeToCGType GType
itemType
Ptr ListModel
maybeModel <- case Maybe a
model of
Nothing -> Ptr ListModel -> IO (Ptr ListModel)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr ListModel
forall a. Ptr a
nullPtr
Just jModel :: a
jModel -> do
Ptr ListModel
jModel' <- a -> IO (Ptr ListModel)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
jModel
Ptr ListModel -> IO (Ptr ListModel)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr ListModel
jModel'
Ptr FlattenListModel
result <- CGType -> Ptr ListModel -> IO (Ptr FlattenListModel)
gtk_flatten_list_model_new CGType
itemType' Ptr ListModel
maybeModel
Text -> Ptr FlattenListModel -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL "flattenListModelNew" Ptr FlattenListModel
result
FlattenListModel
result' <- ((ManagedPtr FlattenListModel -> FlattenListModel)
-> Ptr FlattenListModel -> IO FlattenListModel
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
wrapObject ManagedPtr FlattenListModel -> FlattenListModel
FlattenListModel) Ptr FlattenListModel
result
Maybe a -> (a -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe a
model a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
FlattenListModel -> IO FlattenListModel
forall (m :: * -> *) a. Monad m => a -> m a
return FlattenListModel
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "gtk_flatten_list_model_get_model" gtk_flatten_list_model_get_model ::
Ptr FlattenListModel ->
IO (Ptr Gio.ListModel.ListModel)
flattenListModelGetModel ::
(B.CallStack.HasCallStack, MonadIO m, IsFlattenListModel a) =>
a
-> m (Maybe Gio.ListModel.ListModel)
flattenListModelGetModel :: a -> m (Maybe ListModel)
flattenListModelGetModel self :: a
self = IO (Maybe ListModel) -> m (Maybe ListModel)
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe ListModel) -> m (Maybe ListModel))
-> IO (Maybe ListModel) -> m (Maybe ListModel)
forall a b. (a -> b) -> a -> b
$ do
Ptr FlattenListModel
self' <- a -> IO (Ptr FlattenListModel)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr ListModel
result <- Ptr FlattenListModel -> IO (Ptr ListModel)
gtk_flatten_list_model_get_model Ptr FlattenListModel
self'
Maybe ListModel
maybeResult <- Ptr ListModel
-> (Ptr ListModel -> IO ListModel) -> IO (Maybe ListModel)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr ListModel
result ((Ptr ListModel -> IO ListModel) -> IO (Maybe ListModel))
-> (Ptr ListModel -> IO ListModel) -> IO (Maybe ListModel)
forall a b. (a -> b) -> a -> b
$ \result' :: Ptr ListModel
result' -> do
ListModel
result'' <- ((ManagedPtr ListModel -> ListModel)
-> Ptr ListModel -> IO ListModel
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr ListModel -> ListModel
Gio.ListModel.ListModel) Ptr ListModel
result'
ListModel -> IO ListModel
forall (m :: * -> *) a. Monad m => a -> m a
return ListModel
result''
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe ListModel -> IO (Maybe ListModel)
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe ListModel
maybeResult
#if defined(ENABLE_OVERLOADING)
data FlattenListModelGetModelMethodInfo
instance (signature ~ (m (Maybe Gio.ListModel.ListModel)), MonadIO m, IsFlattenListModel a) => O.MethodInfo FlattenListModelGetModelMethodInfo a signature where
overloadedMethod = flattenListModelGetModel
#endif
foreign import ccall "gtk_flatten_list_model_set_model" gtk_flatten_list_model_set_model ::
Ptr FlattenListModel ->
Ptr Gio.ListModel.ListModel ->
IO ()
flattenListModelSetModel ::
(B.CallStack.HasCallStack, MonadIO m, IsFlattenListModel a, Gio.ListModel.IsListModel b) =>
a
-> Maybe (b)
-> m ()
flattenListModelSetModel :: a -> Maybe b -> m ()
flattenListModelSetModel self :: a
self model :: Maybe b
model = IO () -> m ()
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
Ptr FlattenListModel
self' <- a -> IO (Ptr FlattenListModel)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
Ptr ListModel
maybeModel <- case Maybe b
model of
Nothing -> Ptr ListModel -> IO (Ptr ListModel)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr ListModel
forall a. Ptr a
nullPtr
Just jModel :: b
jModel -> do
Ptr ListModel
jModel' <- b -> IO (Ptr ListModel)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jModel
Ptr ListModel -> IO (Ptr ListModel)
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr ListModel
jModel'
Ptr FlattenListModel -> Ptr ListModel -> IO ()
gtk_flatten_list_model_set_model Ptr FlattenListModel
self' Ptr ListModel
maybeModel
a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
Maybe b -> (b -> IO ()) -> IO ()
forall (m :: * -> *) a. Monad m => Maybe a -> (a -> m ()) -> m ()
whenJust Maybe b
model b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
() -> IO ()
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data FlattenListModelSetModelMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsFlattenListModel a, Gio.ListModel.IsListModel b) => O.MethodInfo FlattenListModelSetModelMethodInfo a signature where
overloadedMethod = flattenListModelSetModel
#endif