{-# LANGUAGE ImplicitParams, RankNTypes, TypeApplications #-}
#if (MIN_VERSION_haskell_gi_overloading(1,0,0) && !defined(__HADDOCK_VERSION__))
#define ENABLE_OVERLOADING
#endif
module GI.Gtk.Objects.ColumnView
    ( 
    ColumnView(..)                          ,
    IsColumnView                            ,
    toColumnView                            ,
 
#if defined(ENABLE_OVERLOADING)
    ResolveColumnViewMethod                 ,
#endif
#if defined(ENABLE_OVERLOADING)
    ColumnViewAppendColumnMethodInfo        ,
#endif
    columnViewAppendColumn                  ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewGetColumnsMethodInfo          ,
#endif
    columnViewGetColumns                    ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewGetEnableRubberbandMethodInfo ,
#endif
    columnViewGetEnableRubberband           ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewGetModelMethodInfo            ,
#endif
    columnViewGetModel                      ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewGetReorderableMethodInfo      ,
#endif
    columnViewGetReorderable                ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewGetShowColumnSeparatorsMethodInfo,
#endif
    columnViewGetShowColumnSeparators       ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewGetShowRowSeparatorsMethodInfo,
#endif
    columnViewGetShowRowSeparators          ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewGetSingleClickActivateMethodInfo,
#endif
    columnViewGetSingleClickActivate        ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewGetSorterMethodInfo           ,
#endif
    columnViewGetSorter                     ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewInsertColumnMethodInfo        ,
#endif
    columnViewInsertColumn                  ,
    columnViewNew                           ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewRemoveColumnMethodInfo        ,
#endif
    columnViewRemoveColumn                  ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewSetEnableRubberbandMethodInfo ,
#endif
    columnViewSetEnableRubberband           ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewSetModelMethodInfo            ,
#endif
    columnViewSetModel                      ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewSetReorderableMethodInfo      ,
#endif
    columnViewSetReorderable                ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewSetShowColumnSeparatorsMethodInfo,
#endif
    columnViewSetShowColumnSeparators       ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewSetShowRowSeparatorsMethodInfo,
#endif
    columnViewSetShowRowSeparators          ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewSetSingleClickActivateMethodInfo,
#endif
    columnViewSetSingleClickActivate        ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewSortByColumnMethodInfo        ,
#endif
    columnViewSortByColumn                  ,
 
#if defined(ENABLE_OVERLOADING)
    ColumnViewColumnsPropertyInfo           ,
#endif
#if defined(ENABLE_OVERLOADING)
    columnViewColumns                       ,
#endif
    getColumnViewColumns                    ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewEnableRubberbandPropertyInfo  ,
#endif
#if defined(ENABLE_OVERLOADING)
    columnViewEnableRubberband              ,
#endif
    constructColumnViewEnableRubberband     ,
    getColumnViewEnableRubberband           ,
    setColumnViewEnableRubberband           ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewModelPropertyInfo             ,
#endif
    clearColumnViewModel                    ,
#if defined(ENABLE_OVERLOADING)
    columnViewModel                         ,
#endif
    constructColumnViewModel                ,
    getColumnViewModel                      ,
    setColumnViewModel                      ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewReorderablePropertyInfo       ,
#endif
#if defined(ENABLE_OVERLOADING)
    columnViewReorderable                   ,
#endif
    constructColumnViewReorderable          ,
    getColumnViewReorderable                ,
    setColumnViewReorderable                ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewShowColumnSeparatorsPropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
    columnViewShowColumnSeparators          ,
#endif
    constructColumnViewShowColumnSeparators ,
    getColumnViewShowColumnSeparators       ,
    setColumnViewShowColumnSeparators       ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewShowRowSeparatorsPropertyInfo ,
#endif
#if defined(ENABLE_OVERLOADING)
    columnViewShowRowSeparators             ,
#endif
    constructColumnViewShowRowSeparators    ,
    getColumnViewShowRowSeparators          ,
    setColumnViewShowRowSeparators          ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewSingleClickActivatePropertyInfo,
#endif
#if defined(ENABLE_OVERLOADING)
    columnViewSingleClickActivate           ,
#endif
    constructColumnViewSingleClickActivate  ,
    getColumnViewSingleClickActivate        ,
    setColumnViewSingleClickActivate        ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewSorterPropertyInfo            ,
#endif
#if defined(ENABLE_OVERLOADING)
    columnViewSorter                        ,
#endif
    getColumnViewSorter                     ,
 
    ColumnViewActivateCallback              ,
#if defined(ENABLE_OVERLOADING)
    ColumnViewActivateSignalInfo            ,
#endif
    afterColumnViewActivate                 ,
    onColumnViewActivate                    ,
    ) where
import Data.GI.Base.ShortPrelude
import qualified Data.GI.Base.ShortPrelude as SP
import qualified Data.GI.Base.Overloading as O
import qualified Prelude as P
import qualified Data.GI.Base.Attributes as GI.Attributes
import qualified Data.GI.Base.BasicTypes as B.Types
import qualified Data.GI.Base.ManagedPtr as B.ManagedPtr
import qualified Data.GI.Base.GArray as B.GArray
import qualified Data.GI.Base.GClosure as B.GClosure
import qualified Data.GI.Base.GError as B.GError
import qualified Data.GI.Base.GHashTable as B.GHT
import qualified Data.GI.Base.GVariant as B.GVariant
import qualified Data.GI.Base.GValue as B.GValue
import qualified Data.GI.Base.GParamSpec as B.GParamSpec
import qualified Data.GI.Base.CallStack as B.CallStack
import qualified Data.GI.Base.Properties as B.Properties
import qualified Data.GI.Base.Signals as B.Signals
import qualified Control.Monad.IO.Class as MIO
import qualified Data.Coerce as Coerce
import qualified Data.Text as T
import qualified Data.ByteString.Char8 as B
import qualified Data.Map as Map
import qualified Foreign.Ptr as FP
import qualified GHC.OverloadedLabels as OL
import qualified GHC.Records as R
import qualified GI.GObject.Objects.Object as GObject.Object
import qualified GI.Gio.Interfaces.ListModel as Gio.ListModel
import {-# SOURCE #-} qualified GI.Gtk.Enums as Gtk.Enums
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Accessible as Gtk.Accessible
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Buildable as Gtk.Buildable
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.ConstraintTarget as Gtk.ConstraintTarget
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.Scrollable as Gtk.Scrollable
import {-# SOURCE #-} qualified GI.Gtk.Interfaces.SelectionModel as Gtk.SelectionModel
import {-# SOURCE #-} qualified GI.Gtk.Objects.ColumnViewColumn as Gtk.ColumnViewColumn
import {-# SOURCE #-} qualified GI.Gtk.Objects.Sorter as Gtk.Sorter
import {-# SOURCE #-} qualified GI.Gtk.Objects.Widget as Gtk.Widget
newtype ColumnView = ColumnView (SP.ManagedPtr ColumnView)
    deriving (ColumnView -> ColumnView -> Bool
(ColumnView -> ColumnView -> Bool)
-> (ColumnView -> ColumnView -> Bool) -> Eq ColumnView
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: ColumnView -> ColumnView -> Bool
== :: ColumnView -> ColumnView -> Bool
$c/= :: ColumnView -> ColumnView -> Bool
/= :: ColumnView -> ColumnView -> Bool
Eq)
instance SP.ManagedPtrNewtype ColumnView where
    toManagedPtr :: ColumnView -> ManagedPtr ColumnView
toManagedPtr (ColumnView ManagedPtr ColumnView
p) = ManagedPtr ColumnView
p
foreign import ccall "gtk_column_view_get_type"
    c_gtk_column_view_get_type :: IO B.Types.GType
instance B.Types.TypedObject ColumnView where
    glibType :: IO GType
glibType = IO GType
c_gtk_column_view_get_type
instance B.Types.GObject ColumnView
class (SP.GObject o, O.IsDescendantOf ColumnView o) => IsColumnView o
instance (SP.GObject o, O.IsDescendantOf ColumnView o) => IsColumnView o
instance O.HasParentTypes ColumnView
type instance O.ParentTypes ColumnView = '[Gtk.Widget.Widget, GObject.Object.Object, Gtk.Accessible.Accessible, Gtk.Buildable.Buildable, Gtk.ConstraintTarget.ConstraintTarget, Gtk.Scrollable.Scrollable]
toColumnView :: (MIO.MonadIO m, IsColumnView o) => o -> m ColumnView
toColumnView :: forall (m :: * -> *) o.
(MonadIO m, IsColumnView o) =>
o -> m ColumnView
toColumnView = IO ColumnView -> m ColumnView
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO ColumnView -> m ColumnView)
-> (o -> IO ColumnView) -> o -> m ColumnView
forall b c a. (b -> c) -> (a -> b) -> a -> c
. (ManagedPtr ColumnView -> ColumnView) -> o -> IO ColumnView
forall o o'.
(HasCallStack, ManagedPtrNewtype o, TypedObject o,
 ManagedPtrNewtype o', TypedObject o') =>
(ManagedPtr o' -> o') -> o -> IO o'
B.ManagedPtr.unsafeCastTo ManagedPtr ColumnView -> ColumnView
ColumnView
instance B.GValue.IsGValue (Maybe ColumnView) where
    gvalueGType_ :: IO GType
gvalueGType_ = IO GType
c_gtk_column_view_get_type
    gvalueSet_ :: Ptr GValue -> Maybe ColumnView -> IO ()
gvalueSet_ Ptr GValue
gv Maybe ColumnView
P.Nothing = Ptr GValue -> Ptr ColumnView -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv (Ptr ColumnView
forall a. Ptr a
FP.nullPtr :: FP.Ptr ColumnView)
    gvalueSet_ Ptr GValue
gv (P.Just ColumnView
obj) = ColumnView -> (Ptr ColumnView -> IO ()) -> IO ()
forall a c.
(HasCallStack, ManagedPtrNewtype a) =>
a -> (Ptr a -> IO c) -> IO c
B.ManagedPtr.withManagedPtr ColumnView
obj (Ptr GValue -> Ptr ColumnView -> IO ()
forall a. GObject a => Ptr GValue -> Ptr a -> IO ()
B.GValue.set_object Ptr GValue
gv)
    gvalueGet_ :: Ptr GValue -> IO (Maybe ColumnView)
gvalueGet_ Ptr GValue
gv = do
        Ptr ColumnView
ptr <- Ptr GValue -> IO (Ptr ColumnView)
forall a. GObject a => Ptr GValue -> IO (Ptr a)
B.GValue.get_object Ptr GValue
gv :: IO (FP.Ptr ColumnView)
        if Ptr ColumnView
ptr Ptr ColumnView -> Ptr ColumnView -> Bool
forall a. Eq a => a -> a -> Bool
/= Ptr ColumnView
forall a. Ptr a
FP.nullPtr
        then ColumnView -> Maybe ColumnView
forall a. a -> Maybe a
P.Just (ColumnView -> Maybe ColumnView)
-> IO ColumnView -> IO (Maybe ColumnView)
forall (f :: * -> *) a b. Functor f => (a -> b) -> f a -> f b
<$> (ManagedPtr ColumnView -> ColumnView)
-> Ptr ColumnView -> IO ColumnView
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
B.ManagedPtr.newObject ManagedPtr ColumnView -> ColumnView
ColumnView Ptr ColumnView
ptr
        else Maybe ColumnView -> IO (Maybe ColumnView)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe ColumnView
forall a. Maybe a
P.Nothing
        
    
#if defined(ENABLE_OVERLOADING)
type family ResolveColumnViewMethod (t :: Symbol) (o :: *) :: * where
    ResolveColumnViewMethod "actionSetEnabled" o = Gtk.Widget.WidgetActionSetEnabledMethodInfo
    ResolveColumnViewMethod "activate" o = Gtk.Widget.WidgetActivateMethodInfo
    ResolveColumnViewMethod "activateAction" o = Gtk.Widget.WidgetActivateActionMethodInfo
    ResolveColumnViewMethod "activateDefault" o = Gtk.Widget.WidgetActivateDefaultMethodInfo
    ResolveColumnViewMethod "addController" o = Gtk.Widget.WidgetAddControllerMethodInfo
    ResolveColumnViewMethod "addCssClass" o = Gtk.Widget.WidgetAddCssClassMethodInfo
    ResolveColumnViewMethod "addMnemonicLabel" o = Gtk.Widget.WidgetAddMnemonicLabelMethodInfo
    ResolveColumnViewMethod "addTickCallback" o = Gtk.Widget.WidgetAddTickCallbackMethodInfo
    ResolveColumnViewMethod "allocate" o = Gtk.Widget.WidgetAllocateMethodInfo
    ResolveColumnViewMethod "appendColumn" o = ColumnViewAppendColumnMethodInfo
    ResolveColumnViewMethod "bindProperty" o = GObject.Object.ObjectBindPropertyMethodInfo
    ResolveColumnViewMethod "bindPropertyFull" o = GObject.Object.ObjectBindPropertyFullMethodInfo
    ResolveColumnViewMethod "childFocus" o = Gtk.Widget.WidgetChildFocusMethodInfo
    ResolveColumnViewMethod "computeBounds" o = Gtk.Widget.WidgetComputeBoundsMethodInfo
    ResolveColumnViewMethod "computeExpand" o = Gtk.Widget.WidgetComputeExpandMethodInfo
    ResolveColumnViewMethod "computePoint" o = Gtk.Widget.WidgetComputePointMethodInfo
    ResolveColumnViewMethod "computeTransform" o = Gtk.Widget.WidgetComputeTransformMethodInfo
    ResolveColumnViewMethod "contains" o = Gtk.Widget.WidgetContainsMethodInfo
    ResolveColumnViewMethod "createPangoContext" o = Gtk.Widget.WidgetCreatePangoContextMethodInfo
    ResolveColumnViewMethod "createPangoLayout" o = Gtk.Widget.WidgetCreatePangoLayoutMethodInfo
    ResolveColumnViewMethod "disposeTemplate" o = Gtk.Widget.WidgetDisposeTemplateMethodInfo
    ResolveColumnViewMethod "dragCheckThreshold" o = Gtk.Widget.WidgetDragCheckThresholdMethodInfo
    ResolveColumnViewMethod "errorBell" o = Gtk.Widget.WidgetErrorBellMethodInfo
    ResolveColumnViewMethod "forceFloating" o = GObject.Object.ObjectForceFloatingMethodInfo
    ResolveColumnViewMethod "freezeNotify" o = GObject.Object.ObjectFreezeNotifyMethodInfo
    ResolveColumnViewMethod "getv" o = GObject.Object.ObjectGetvMethodInfo
    ResolveColumnViewMethod "grabFocus" o = Gtk.Widget.WidgetGrabFocusMethodInfo
    ResolveColumnViewMethod "hasCssClass" o = Gtk.Widget.WidgetHasCssClassMethodInfo
    ResolveColumnViewMethod "hasDefault" o = Gtk.Widget.WidgetHasDefaultMethodInfo
    ResolveColumnViewMethod "hasFocus" o = Gtk.Widget.WidgetHasFocusMethodInfo
    ResolveColumnViewMethod "hasVisibleFocus" o = Gtk.Widget.WidgetHasVisibleFocusMethodInfo
    ResolveColumnViewMethod "hide" o = Gtk.Widget.WidgetHideMethodInfo
    ResolveColumnViewMethod "inDestruction" o = Gtk.Widget.WidgetInDestructionMethodInfo
    ResolveColumnViewMethod "initTemplate" o = Gtk.Widget.WidgetInitTemplateMethodInfo
    ResolveColumnViewMethod "insertActionGroup" o = Gtk.Widget.WidgetInsertActionGroupMethodInfo
    ResolveColumnViewMethod "insertAfter" o = Gtk.Widget.WidgetInsertAfterMethodInfo
    ResolveColumnViewMethod "insertBefore" o = Gtk.Widget.WidgetInsertBeforeMethodInfo
    ResolveColumnViewMethod "insertColumn" o = ColumnViewInsertColumnMethodInfo
    ResolveColumnViewMethod "isAncestor" o = Gtk.Widget.WidgetIsAncestorMethodInfo
    ResolveColumnViewMethod "isDrawable" o = Gtk.Widget.WidgetIsDrawableMethodInfo
    ResolveColumnViewMethod "isFloating" o = GObject.Object.ObjectIsFloatingMethodInfo
    ResolveColumnViewMethod "isFocus" o = Gtk.Widget.WidgetIsFocusMethodInfo
    ResolveColumnViewMethod "isSensitive" o = Gtk.Widget.WidgetIsSensitiveMethodInfo
    ResolveColumnViewMethod "isVisible" o = Gtk.Widget.WidgetIsVisibleMethodInfo
    ResolveColumnViewMethod "keynavFailed" o = Gtk.Widget.WidgetKeynavFailedMethodInfo
    ResolveColumnViewMethod "listMnemonicLabels" o = Gtk.Widget.WidgetListMnemonicLabelsMethodInfo
    ResolveColumnViewMethod "map" o = Gtk.Widget.WidgetMapMethodInfo
    ResolveColumnViewMethod "measure" o = Gtk.Widget.WidgetMeasureMethodInfo
    ResolveColumnViewMethod "mnemonicActivate" o = Gtk.Widget.WidgetMnemonicActivateMethodInfo
    ResolveColumnViewMethod "notify" o = GObject.Object.ObjectNotifyMethodInfo
    ResolveColumnViewMethod "notifyByPspec" o = GObject.Object.ObjectNotifyByPspecMethodInfo
    ResolveColumnViewMethod "observeChildren" o = Gtk.Widget.WidgetObserveChildrenMethodInfo
    ResolveColumnViewMethod "observeControllers" o = Gtk.Widget.WidgetObserveControllersMethodInfo
    ResolveColumnViewMethod "pick" o = Gtk.Widget.WidgetPickMethodInfo
    ResolveColumnViewMethod "queueAllocate" o = Gtk.Widget.WidgetQueueAllocateMethodInfo
    ResolveColumnViewMethod "queueDraw" o = Gtk.Widget.WidgetQueueDrawMethodInfo
    ResolveColumnViewMethod "queueResize" o = Gtk.Widget.WidgetQueueResizeMethodInfo
    ResolveColumnViewMethod "realize" o = Gtk.Widget.WidgetRealizeMethodInfo
    ResolveColumnViewMethod "ref" o = GObject.Object.ObjectRefMethodInfo
    ResolveColumnViewMethod "refSink" o = GObject.Object.ObjectRefSinkMethodInfo
    ResolveColumnViewMethod "removeColumn" o = ColumnViewRemoveColumnMethodInfo
    ResolveColumnViewMethod "removeController" o = Gtk.Widget.WidgetRemoveControllerMethodInfo
    ResolveColumnViewMethod "removeCssClass" o = Gtk.Widget.WidgetRemoveCssClassMethodInfo
    ResolveColumnViewMethod "removeMnemonicLabel" o = Gtk.Widget.WidgetRemoveMnemonicLabelMethodInfo
    ResolveColumnViewMethod "removeTickCallback" o = Gtk.Widget.WidgetRemoveTickCallbackMethodInfo
    ResolveColumnViewMethod "resetProperty" o = Gtk.Accessible.AccessibleResetPropertyMethodInfo
    ResolveColumnViewMethod "resetRelation" o = Gtk.Accessible.AccessibleResetRelationMethodInfo
    ResolveColumnViewMethod "resetState" o = Gtk.Accessible.AccessibleResetStateMethodInfo
    ResolveColumnViewMethod "runDispose" o = GObject.Object.ObjectRunDisposeMethodInfo
    ResolveColumnViewMethod "shouldLayout" o = Gtk.Widget.WidgetShouldLayoutMethodInfo
    ResolveColumnViewMethod "show" o = Gtk.Widget.WidgetShowMethodInfo
    ResolveColumnViewMethod "sizeAllocate" o = Gtk.Widget.WidgetSizeAllocateMethodInfo
    ResolveColumnViewMethod "snapshotChild" o = Gtk.Widget.WidgetSnapshotChildMethodInfo
    ResolveColumnViewMethod "sortByColumn" o = ColumnViewSortByColumnMethodInfo
    ResolveColumnViewMethod "stealData" o = GObject.Object.ObjectStealDataMethodInfo
    ResolveColumnViewMethod "stealQdata" o = GObject.Object.ObjectStealQdataMethodInfo
    ResolveColumnViewMethod "thawNotify" o = GObject.Object.ObjectThawNotifyMethodInfo
    ResolveColumnViewMethod "translateCoordinates" o = Gtk.Widget.WidgetTranslateCoordinatesMethodInfo
    ResolveColumnViewMethod "triggerTooltipQuery" o = Gtk.Widget.WidgetTriggerTooltipQueryMethodInfo
    ResolveColumnViewMethod "unmap" o = Gtk.Widget.WidgetUnmapMethodInfo
    ResolveColumnViewMethod "unparent" o = Gtk.Widget.WidgetUnparentMethodInfo
    ResolveColumnViewMethod "unrealize" o = Gtk.Widget.WidgetUnrealizeMethodInfo
    ResolveColumnViewMethod "unref" o = GObject.Object.ObjectUnrefMethodInfo
    ResolveColumnViewMethod "unsetStateFlags" o = Gtk.Widget.WidgetUnsetStateFlagsMethodInfo
    ResolveColumnViewMethod "updateProperty" o = Gtk.Accessible.AccessibleUpdatePropertyMethodInfo
    ResolveColumnViewMethod "updateRelation" o = Gtk.Accessible.AccessibleUpdateRelationMethodInfo
    ResolveColumnViewMethod "updateState" o = Gtk.Accessible.AccessibleUpdateStateMethodInfo
    ResolveColumnViewMethod "watchClosure" o = GObject.Object.ObjectWatchClosureMethodInfo
    ResolveColumnViewMethod "getAccessibleRole" o = Gtk.Accessible.AccessibleGetAccessibleRoleMethodInfo
    ResolveColumnViewMethod "getAllocatedBaseline" o = Gtk.Widget.WidgetGetAllocatedBaselineMethodInfo
    ResolveColumnViewMethod "getAllocatedHeight" o = Gtk.Widget.WidgetGetAllocatedHeightMethodInfo
    ResolveColumnViewMethod "getAllocatedWidth" o = Gtk.Widget.WidgetGetAllocatedWidthMethodInfo
    ResolveColumnViewMethod "getAllocation" o = Gtk.Widget.WidgetGetAllocationMethodInfo
    ResolveColumnViewMethod "getAncestor" o = Gtk.Widget.WidgetGetAncestorMethodInfo
    ResolveColumnViewMethod "getBorder" o = Gtk.Scrollable.ScrollableGetBorderMethodInfo
    ResolveColumnViewMethod "getBuildableId" o = Gtk.Buildable.BuildableGetBuildableIdMethodInfo
    ResolveColumnViewMethod "getCanFocus" o = Gtk.Widget.WidgetGetCanFocusMethodInfo
    ResolveColumnViewMethod "getCanTarget" o = Gtk.Widget.WidgetGetCanTargetMethodInfo
    ResolveColumnViewMethod "getChildVisible" o = Gtk.Widget.WidgetGetChildVisibleMethodInfo
    ResolveColumnViewMethod "getClipboard" o = Gtk.Widget.WidgetGetClipboardMethodInfo
    ResolveColumnViewMethod "getColumns" o = ColumnViewGetColumnsMethodInfo
    ResolveColumnViewMethod "getCssClasses" o = Gtk.Widget.WidgetGetCssClassesMethodInfo
    ResolveColumnViewMethod "getCssName" o = Gtk.Widget.WidgetGetCssNameMethodInfo
    ResolveColumnViewMethod "getCursor" o = Gtk.Widget.WidgetGetCursorMethodInfo
    ResolveColumnViewMethod "getData" o = GObject.Object.ObjectGetDataMethodInfo
    ResolveColumnViewMethod "getDirection" o = Gtk.Widget.WidgetGetDirectionMethodInfo
    ResolveColumnViewMethod "getDisplay" o = Gtk.Widget.WidgetGetDisplayMethodInfo
    ResolveColumnViewMethod "getEnableRubberband" o = ColumnViewGetEnableRubberbandMethodInfo
    ResolveColumnViewMethod "getFirstChild" o = Gtk.Widget.WidgetGetFirstChildMethodInfo
    ResolveColumnViewMethod "getFocusChild" o = Gtk.Widget.WidgetGetFocusChildMethodInfo
    ResolveColumnViewMethod "getFocusOnClick" o = Gtk.Widget.WidgetGetFocusOnClickMethodInfo
    ResolveColumnViewMethod "getFocusable" o = Gtk.Widget.WidgetGetFocusableMethodInfo
    ResolveColumnViewMethod "getFontMap" o = Gtk.Widget.WidgetGetFontMapMethodInfo
    ResolveColumnViewMethod "getFontOptions" o = Gtk.Widget.WidgetGetFontOptionsMethodInfo
    ResolveColumnViewMethod "getFrameClock" o = Gtk.Widget.WidgetGetFrameClockMethodInfo
    ResolveColumnViewMethod "getHadjustment" o = Gtk.Scrollable.ScrollableGetHadjustmentMethodInfo
    ResolveColumnViewMethod "getHalign" o = Gtk.Widget.WidgetGetHalignMethodInfo
    ResolveColumnViewMethod "getHasTooltip" o = Gtk.Widget.WidgetGetHasTooltipMethodInfo
    ResolveColumnViewMethod "getHeight" o = Gtk.Widget.WidgetGetHeightMethodInfo
    ResolveColumnViewMethod "getHexpand" o = Gtk.Widget.WidgetGetHexpandMethodInfo
    ResolveColumnViewMethod "getHexpandSet" o = Gtk.Widget.WidgetGetHexpandSetMethodInfo
    ResolveColumnViewMethod "getHscrollPolicy" o = Gtk.Scrollable.ScrollableGetHscrollPolicyMethodInfo
    ResolveColumnViewMethod "getLastChild" o = Gtk.Widget.WidgetGetLastChildMethodInfo
    ResolveColumnViewMethod "getLayoutManager" o = Gtk.Widget.WidgetGetLayoutManagerMethodInfo
    ResolveColumnViewMethod "getMapped" o = Gtk.Widget.WidgetGetMappedMethodInfo
    ResolveColumnViewMethod "getMarginBottom" o = Gtk.Widget.WidgetGetMarginBottomMethodInfo
    ResolveColumnViewMethod "getMarginEnd" o = Gtk.Widget.WidgetGetMarginEndMethodInfo
    ResolveColumnViewMethod "getMarginStart" o = Gtk.Widget.WidgetGetMarginStartMethodInfo
    ResolveColumnViewMethod "getMarginTop" o = Gtk.Widget.WidgetGetMarginTopMethodInfo
    ResolveColumnViewMethod "getModel" o = ColumnViewGetModelMethodInfo
    ResolveColumnViewMethod "getName" o = Gtk.Widget.WidgetGetNameMethodInfo
    ResolveColumnViewMethod "getNative" o = Gtk.Widget.WidgetGetNativeMethodInfo
    ResolveColumnViewMethod "getNextSibling" o = Gtk.Widget.WidgetGetNextSiblingMethodInfo
    ResolveColumnViewMethod "getOpacity" o = Gtk.Widget.WidgetGetOpacityMethodInfo
    ResolveColumnViewMethod "getOverflow" o = Gtk.Widget.WidgetGetOverflowMethodInfo
    ResolveColumnViewMethod "getPangoContext" o = Gtk.Widget.WidgetGetPangoContextMethodInfo
    ResolveColumnViewMethod "getParent" o = Gtk.Widget.WidgetGetParentMethodInfo
    ResolveColumnViewMethod "getPreferredSize" o = Gtk.Widget.WidgetGetPreferredSizeMethodInfo
    ResolveColumnViewMethod "getPrevSibling" o = Gtk.Widget.WidgetGetPrevSiblingMethodInfo
    ResolveColumnViewMethod "getPrimaryClipboard" o = Gtk.Widget.WidgetGetPrimaryClipboardMethodInfo
    ResolveColumnViewMethod "getProperty" o = GObject.Object.ObjectGetPropertyMethodInfo
    ResolveColumnViewMethod "getQdata" o = GObject.Object.ObjectGetQdataMethodInfo
    ResolveColumnViewMethod "getRealized" o = Gtk.Widget.WidgetGetRealizedMethodInfo
    ResolveColumnViewMethod "getReceivesDefault" o = Gtk.Widget.WidgetGetReceivesDefaultMethodInfo
    ResolveColumnViewMethod "getReorderable" o = ColumnViewGetReorderableMethodInfo
    ResolveColumnViewMethod "getRequestMode" o = Gtk.Widget.WidgetGetRequestModeMethodInfo
    ResolveColumnViewMethod "getRoot" o = Gtk.Widget.WidgetGetRootMethodInfo
    ResolveColumnViewMethod "getScaleFactor" o = Gtk.Widget.WidgetGetScaleFactorMethodInfo
    ResolveColumnViewMethod "getSensitive" o = Gtk.Widget.WidgetGetSensitiveMethodInfo
    ResolveColumnViewMethod "getSettings" o = Gtk.Widget.WidgetGetSettingsMethodInfo
    ResolveColumnViewMethod "getShowColumnSeparators" o = ColumnViewGetShowColumnSeparatorsMethodInfo
    ResolveColumnViewMethod "getShowRowSeparators" o = ColumnViewGetShowRowSeparatorsMethodInfo
    ResolveColumnViewMethod "getSingleClickActivate" o = ColumnViewGetSingleClickActivateMethodInfo
    ResolveColumnViewMethod "getSize" o = Gtk.Widget.WidgetGetSizeMethodInfo
    ResolveColumnViewMethod "getSizeRequest" o = Gtk.Widget.WidgetGetSizeRequestMethodInfo
    ResolveColumnViewMethod "getSorter" o = ColumnViewGetSorterMethodInfo
    ResolveColumnViewMethod "getStateFlags" o = Gtk.Widget.WidgetGetStateFlagsMethodInfo
    ResolveColumnViewMethod "getStyleContext" o = Gtk.Widget.WidgetGetStyleContextMethodInfo
    ResolveColumnViewMethod "getTemplateChild" o = Gtk.Widget.WidgetGetTemplateChildMethodInfo
    ResolveColumnViewMethod "getTooltipMarkup" o = Gtk.Widget.WidgetGetTooltipMarkupMethodInfo
    ResolveColumnViewMethod "getTooltipText" o = Gtk.Widget.WidgetGetTooltipTextMethodInfo
    ResolveColumnViewMethod "getVadjustment" o = Gtk.Scrollable.ScrollableGetVadjustmentMethodInfo
    ResolveColumnViewMethod "getValign" o = Gtk.Widget.WidgetGetValignMethodInfo
    ResolveColumnViewMethod "getVexpand" o = Gtk.Widget.WidgetGetVexpandMethodInfo
    ResolveColumnViewMethod "getVexpandSet" o = Gtk.Widget.WidgetGetVexpandSetMethodInfo
    ResolveColumnViewMethod "getVisible" o = Gtk.Widget.WidgetGetVisibleMethodInfo
    ResolveColumnViewMethod "getVscrollPolicy" o = Gtk.Scrollable.ScrollableGetVscrollPolicyMethodInfo
    ResolveColumnViewMethod "getWidth" o = Gtk.Widget.WidgetGetWidthMethodInfo
    ResolveColumnViewMethod "setCanFocus" o = Gtk.Widget.WidgetSetCanFocusMethodInfo
    ResolveColumnViewMethod "setCanTarget" o = Gtk.Widget.WidgetSetCanTargetMethodInfo
    ResolveColumnViewMethod "setChildVisible" o = Gtk.Widget.WidgetSetChildVisibleMethodInfo
    ResolveColumnViewMethod "setCssClasses" o = Gtk.Widget.WidgetSetCssClassesMethodInfo
    ResolveColumnViewMethod "setCursor" o = Gtk.Widget.WidgetSetCursorMethodInfo
    ResolveColumnViewMethod "setCursorFromName" o = Gtk.Widget.WidgetSetCursorFromNameMethodInfo
    ResolveColumnViewMethod "setData" o = GObject.Object.ObjectSetDataMethodInfo
    ResolveColumnViewMethod "setDataFull" o = GObject.Object.ObjectSetDataFullMethodInfo
    ResolveColumnViewMethod "setDirection" o = Gtk.Widget.WidgetSetDirectionMethodInfo
    ResolveColumnViewMethod "setEnableRubberband" o = ColumnViewSetEnableRubberbandMethodInfo
    ResolveColumnViewMethod "setFocusChild" o = Gtk.Widget.WidgetSetFocusChildMethodInfo
    ResolveColumnViewMethod "setFocusOnClick" o = Gtk.Widget.WidgetSetFocusOnClickMethodInfo
    ResolveColumnViewMethod "setFocusable" o = Gtk.Widget.WidgetSetFocusableMethodInfo
    ResolveColumnViewMethod "setFontMap" o = Gtk.Widget.WidgetSetFontMapMethodInfo
    ResolveColumnViewMethod "setFontOptions" o = Gtk.Widget.WidgetSetFontOptionsMethodInfo
    ResolveColumnViewMethod "setHadjustment" o = Gtk.Scrollable.ScrollableSetHadjustmentMethodInfo
    ResolveColumnViewMethod "setHalign" o = Gtk.Widget.WidgetSetHalignMethodInfo
    ResolveColumnViewMethod "setHasTooltip" o = Gtk.Widget.WidgetSetHasTooltipMethodInfo
    ResolveColumnViewMethod "setHexpand" o = Gtk.Widget.WidgetSetHexpandMethodInfo
    ResolveColumnViewMethod "setHexpandSet" o = Gtk.Widget.WidgetSetHexpandSetMethodInfo
    ResolveColumnViewMethod "setHscrollPolicy" o = Gtk.Scrollable.ScrollableSetHscrollPolicyMethodInfo
    ResolveColumnViewMethod "setLayoutManager" o = Gtk.Widget.WidgetSetLayoutManagerMethodInfo
    ResolveColumnViewMethod "setMarginBottom" o = Gtk.Widget.WidgetSetMarginBottomMethodInfo
    ResolveColumnViewMethod "setMarginEnd" o = Gtk.Widget.WidgetSetMarginEndMethodInfo
    ResolveColumnViewMethod "setMarginStart" o = Gtk.Widget.WidgetSetMarginStartMethodInfo
    ResolveColumnViewMethod "setMarginTop" o = Gtk.Widget.WidgetSetMarginTopMethodInfo
    ResolveColumnViewMethod "setModel" o = ColumnViewSetModelMethodInfo
    ResolveColumnViewMethod "setName" o = Gtk.Widget.WidgetSetNameMethodInfo
    ResolveColumnViewMethod "setOpacity" o = Gtk.Widget.WidgetSetOpacityMethodInfo
    ResolveColumnViewMethod "setOverflow" o = Gtk.Widget.WidgetSetOverflowMethodInfo
    ResolveColumnViewMethod "setParent" o = Gtk.Widget.WidgetSetParentMethodInfo
    ResolveColumnViewMethod "setProperty" o = GObject.Object.ObjectSetPropertyMethodInfo
    ResolveColumnViewMethod "setReceivesDefault" o = Gtk.Widget.WidgetSetReceivesDefaultMethodInfo
    ResolveColumnViewMethod "setReorderable" o = ColumnViewSetReorderableMethodInfo
    ResolveColumnViewMethod "setSensitive" o = Gtk.Widget.WidgetSetSensitiveMethodInfo
    ResolveColumnViewMethod "setShowColumnSeparators" o = ColumnViewSetShowColumnSeparatorsMethodInfo
    ResolveColumnViewMethod "setShowRowSeparators" o = ColumnViewSetShowRowSeparatorsMethodInfo
    ResolveColumnViewMethod "setSingleClickActivate" o = ColumnViewSetSingleClickActivateMethodInfo
    ResolveColumnViewMethod "setSizeRequest" o = Gtk.Widget.WidgetSetSizeRequestMethodInfo
    ResolveColumnViewMethod "setStateFlags" o = Gtk.Widget.WidgetSetStateFlagsMethodInfo
    ResolveColumnViewMethod "setTooltipMarkup" o = Gtk.Widget.WidgetSetTooltipMarkupMethodInfo
    ResolveColumnViewMethod "setTooltipText" o = Gtk.Widget.WidgetSetTooltipTextMethodInfo
    ResolveColumnViewMethod "setVadjustment" o = Gtk.Scrollable.ScrollableSetVadjustmentMethodInfo
    ResolveColumnViewMethod "setValign" o = Gtk.Widget.WidgetSetValignMethodInfo
    ResolveColumnViewMethod "setVexpand" o = Gtk.Widget.WidgetSetVexpandMethodInfo
    ResolveColumnViewMethod "setVexpandSet" o = Gtk.Widget.WidgetSetVexpandSetMethodInfo
    ResolveColumnViewMethod "setVisible" o = Gtk.Widget.WidgetSetVisibleMethodInfo
    ResolveColumnViewMethod "setVscrollPolicy" o = Gtk.Scrollable.ScrollableSetVscrollPolicyMethodInfo
    ResolveColumnViewMethod l o = O.MethodResolutionFailed l o
instance (info ~ ResolveColumnViewMethod t ColumnView, O.OverloadedMethod info ColumnView p) => OL.IsLabel t (ColumnView -> p) where
#if MIN_VERSION_base(4,10,0)
    fromLabel = O.overloadedMethod @info
#else
    fromLabel _ = O.overloadedMethod @info
#endif
#if MIN_VERSION_base(4,13,0)
instance (info ~ ResolveColumnViewMethod t ColumnView, O.OverloadedMethod info ColumnView p, R.HasField t ColumnView p) => R.HasField t ColumnView p where
    getField = O.overloadedMethod @info
#endif
instance (info ~ ResolveColumnViewMethod t ColumnView, O.OverloadedMethodInfo info ColumnView) => OL.IsLabel t (O.MethodProxy info ColumnView) where
#if MIN_VERSION_base(4,10,0)
    fromLabel = O.MethodProxy
#else
    fromLabel _ = O.MethodProxy
#endif
#endif
type ColumnViewActivateCallback =
    Word32
    
    -> IO ()
type C_ColumnViewActivateCallback =
    Ptr ColumnView ->                       
    Word32 ->
    Ptr () ->                               
    IO ()
foreign import ccall "wrapper"
    mk_ColumnViewActivateCallback :: C_ColumnViewActivateCallback -> IO (FunPtr C_ColumnViewActivateCallback)
wrap_ColumnViewActivateCallback :: 
    GObject a => (a -> ColumnViewActivateCallback) ->
    C_ColumnViewActivateCallback
wrap_ColumnViewActivateCallback :: forall a.
GObject a =>
(a -> ColumnViewActivateCallback) -> C_ColumnViewActivateCallback
wrap_ColumnViewActivateCallback a -> ColumnViewActivateCallback
gi'cb Ptr ColumnView
gi'selfPtr Word32
position Ptr ()
_ = do
    Ptr ColumnView -> (ColumnView -> IO ()) -> IO ()
forall a b.
(HasCallStack, ManagedPtrNewtype a) =>
Ptr a -> (a -> IO b) -> IO b
B.ManagedPtr.withTransient Ptr ColumnView
gi'selfPtr ((ColumnView -> IO ()) -> IO ()) -> (ColumnView -> IO ()) -> IO ()
forall a b. (a -> b) -> a -> b
$ \ColumnView
gi'self -> a -> ColumnViewActivateCallback
gi'cb (ColumnView -> a
forall a b. Coercible a b => a -> b
Coerce.coerce ColumnView
gi'self)  Word32
position
onColumnViewActivate :: (IsColumnView a, MonadIO m) => a -> ((?self :: a) => ColumnViewActivateCallback) -> m SignalHandlerId
onColumnViewActivate :: forall a (m :: * -> *).
(IsColumnView a, MonadIO m) =>
a
-> ((?self::a) => ColumnViewActivateCallback) -> m SignalHandlerId
onColumnViewActivate a
obj (?self::a) => ColumnViewActivateCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
    let wrapped :: a -> ColumnViewActivateCallback
wrapped a
self = let ?self = a
?self::a
self in (?self::a) => ColumnViewActivateCallback
ColumnViewActivateCallback
cb
    let wrapped' :: C_ColumnViewActivateCallback
wrapped' = (a -> ColumnViewActivateCallback) -> C_ColumnViewActivateCallback
forall a.
GObject a =>
(a -> ColumnViewActivateCallback) -> C_ColumnViewActivateCallback
wrap_ColumnViewActivateCallback a -> ColumnViewActivateCallback
wrapped
    FunPtr C_ColumnViewActivateCallback
wrapped'' <- C_ColumnViewActivateCallback
-> IO (FunPtr C_ColumnViewActivateCallback)
mk_ColumnViewActivateCallback C_ColumnViewActivateCallback
wrapped'
    a
-> Text
-> FunPtr C_ColumnViewActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"activate" FunPtr C_ColumnViewActivateCallback
wrapped'' SignalConnectMode
SignalConnectBefore Maybe Text
forall a. Maybe a
Nothing
afterColumnViewActivate :: (IsColumnView a, MonadIO m) => a -> ((?self :: a) => ColumnViewActivateCallback) -> m SignalHandlerId
afterColumnViewActivate :: forall a (m :: * -> *).
(IsColumnView a, MonadIO m) =>
a
-> ((?self::a) => ColumnViewActivateCallback) -> m SignalHandlerId
afterColumnViewActivate a
obj (?self::a) => ColumnViewActivateCallback
cb = IO SignalHandlerId -> m SignalHandlerId
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO SignalHandlerId -> m SignalHandlerId)
-> IO SignalHandlerId -> m SignalHandlerId
forall a b. (a -> b) -> a -> b
$ do
    let wrapped :: a -> ColumnViewActivateCallback
wrapped a
self = let ?self = a
?self::a
self in (?self::a) => ColumnViewActivateCallback
ColumnViewActivateCallback
cb
    let wrapped' :: C_ColumnViewActivateCallback
wrapped' = (a -> ColumnViewActivateCallback) -> C_ColumnViewActivateCallback
forall a.
GObject a =>
(a -> ColumnViewActivateCallback) -> C_ColumnViewActivateCallback
wrap_ColumnViewActivateCallback a -> ColumnViewActivateCallback
wrapped
    FunPtr C_ColumnViewActivateCallback
wrapped'' <- C_ColumnViewActivateCallback
-> IO (FunPtr C_ColumnViewActivateCallback)
mk_ColumnViewActivateCallback C_ColumnViewActivateCallback
wrapped'
    a
-> Text
-> FunPtr C_ColumnViewActivateCallback
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
forall o a.
GObject o =>
o
-> Text
-> FunPtr a
-> SignalConnectMode
-> Maybe Text
-> IO SignalHandlerId
connectSignalFunPtr a
obj Text
"activate" FunPtr C_ColumnViewActivateCallback
wrapped'' SignalConnectMode
SignalConnectAfter Maybe Text
forall a. Maybe a
Nothing
#if defined(ENABLE_OVERLOADING)
data ColumnViewActivateSignalInfo
instance SignalInfo ColumnViewActivateSignalInfo where
    type HaskellCallbackType ColumnViewActivateSignalInfo = ColumnViewActivateCallback
    connectSignal obj cb connectMode detail = do
        let cb' = wrap_ColumnViewActivateCallback cb
        cb'' <- mk_ColumnViewActivateCallback cb'
        connectSignalFunPtr obj "activate" cb'' connectMode detail
    dbgSignalInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView::activate"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#g:signal:activate"})
#endif
   
   
   
getColumnViewColumns :: (MonadIO m, IsColumnView o) => o -> m Gio.ListModel.ListModel
getColumnViewColumns :: forall (m :: * -> *) o.
(MonadIO m, IsColumnView o) =>
o -> m ListModel
getColumnViewColumns o
obj = IO ListModel -> m ListModel
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO ListModel -> m ListModel) -> IO ListModel -> m ListModel
forall a b. (a -> b) -> a -> b
$ Text -> IO (Maybe ListModel) -> IO ListModel
forall a. HasCallStack => Text -> IO (Maybe a) -> IO a
checkUnexpectedNothing Text
"getColumnViewColumns" (IO (Maybe ListModel) -> IO ListModel)
-> IO (Maybe ListModel) -> IO 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 String
"columns" ManagedPtr ListModel -> ListModel
Gio.ListModel.ListModel
#if defined(ENABLE_OVERLOADING)
data ColumnViewColumnsPropertyInfo
instance AttrInfo ColumnViewColumnsPropertyInfo where
    type AttrAllowedOps ColumnViewColumnsPropertyInfo = '[ 'AttrGet, 'AttrClear]
    type AttrBaseTypeConstraint ColumnViewColumnsPropertyInfo = IsColumnView
    type AttrSetTypeConstraint ColumnViewColumnsPropertyInfo = (~) ()
    type AttrTransferTypeConstraint ColumnViewColumnsPropertyInfo = (~) ()
    type AttrTransferType ColumnViewColumnsPropertyInfo = ()
    type AttrGetType ColumnViewColumnsPropertyInfo = Gio.ListModel.ListModel
    type AttrLabel ColumnViewColumnsPropertyInfo = "columns"
    type AttrOrigin ColumnViewColumnsPropertyInfo = ColumnView
    attrGet = getColumnViewColumns
    attrSet = undefined
    attrTransfer _ = undefined
    attrConstruct = undefined
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columns"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#g:attr:columns"
        })
#endif
   
   
   
getColumnViewEnableRubberband :: (MonadIO m, IsColumnView o) => o -> m Bool
getColumnViewEnableRubberband :: forall (m :: * -> *) o. (MonadIO m, IsColumnView o) => o -> m Bool
getColumnViewEnableRubberband o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"enable-rubberband"
setColumnViewEnableRubberband :: (MonadIO m, IsColumnView o) => o -> Bool -> m ()
setColumnViewEnableRubberband :: forall (m :: * -> *) o.
(MonadIO m, IsColumnView o) =>
o -> Bool -> m ()
setColumnViewEnableRubberband o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"enable-rubberband" Bool
val
constructColumnViewEnableRubberband :: (IsColumnView o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructColumnViewEnableRubberband :: forall o (m :: * -> *).
(IsColumnView o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructColumnViewEnableRubberband Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
    IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"enable-rubberband" Bool
val
#if defined(ENABLE_OVERLOADING)
data ColumnViewEnableRubberbandPropertyInfo
instance AttrInfo ColumnViewEnableRubberbandPropertyInfo where
    type AttrAllowedOps ColumnViewEnableRubberbandPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint ColumnViewEnableRubberbandPropertyInfo = IsColumnView
    type AttrSetTypeConstraint ColumnViewEnableRubberbandPropertyInfo = (~) Bool
    type AttrTransferTypeConstraint ColumnViewEnableRubberbandPropertyInfo = (~) Bool
    type AttrTransferType ColumnViewEnableRubberbandPropertyInfo = Bool
    type AttrGetType ColumnViewEnableRubberbandPropertyInfo = Bool
    type AttrLabel ColumnViewEnableRubberbandPropertyInfo = "enable-rubberband"
    type AttrOrigin ColumnViewEnableRubberbandPropertyInfo = ColumnView
    attrGet = getColumnViewEnableRubberband
    attrSet = setColumnViewEnableRubberband
    attrTransfer _ v = do
        return v
    attrConstruct = constructColumnViewEnableRubberband
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.enableRubberband"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#g:attr:enableRubberband"
        })
#endif
   
   
   
getColumnViewModel :: (MonadIO m, IsColumnView o) => o -> m (Maybe Gtk.SelectionModel.SelectionModel)
getColumnViewModel :: forall (m :: * -> *) o.
(MonadIO m, IsColumnView o) =>
o -> m (Maybe SelectionModel)
getColumnViewModel o
obj = IO (Maybe SelectionModel) -> m (Maybe SelectionModel)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe SelectionModel) -> m (Maybe SelectionModel))
-> IO (Maybe SelectionModel) -> m (Maybe SelectionModel)
forall a b. (a -> b) -> a -> b
$ o
-> String
-> (ManagedPtr SelectionModel -> SelectionModel)
-> IO (Maybe SelectionModel)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj String
"model" ManagedPtr SelectionModel -> SelectionModel
Gtk.SelectionModel.SelectionModel
setColumnViewModel :: (MonadIO m, IsColumnView o, Gtk.SelectionModel.IsSelectionModel a) => o -> a -> m ()
setColumnViewModel :: forall (m :: * -> *) o a.
(MonadIO m, IsColumnView o, IsSelectionModel a) =>
o -> a -> m ()
setColumnViewModel o
obj a
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    o -> String -> Maybe a -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"model" (a -> Maybe a
forall a. a -> Maybe a
Just a
val)
constructColumnViewModel :: (IsColumnView o, MIO.MonadIO m, Gtk.SelectionModel.IsSelectionModel a) => a -> m (GValueConstruct o)
constructColumnViewModel :: forall o (m :: * -> *) a.
(IsColumnView o, MonadIO m, IsSelectionModel a) =>
a -> m (GValueConstruct o)
constructColumnViewModel a
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
    IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Maybe a -> IO (GValueConstruct o)
forall a o.
GObject a =>
String -> Maybe a -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyObject String
"model" (a -> Maybe a
forall a. a -> Maybe a
P.Just a
val)
clearColumnViewModel :: (MonadIO m, IsColumnView o) => o -> m ()
clearColumnViewModel :: forall (m :: * -> *) o. (MonadIO m, IsColumnView o) => o -> m ()
clearColumnViewModel o
obj = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ o -> String -> Maybe SelectionModel -> IO ()
forall a b.
(GObject a, GObject b) =>
a -> String -> Maybe b -> IO ()
B.Properties.setObjectPropertyObject o
obj String
"model" (Maybe SelectionModel
forall a. Maybe a
Nothing :: Maybe Gtk.SelectionModel.SelectionModel)
#if defined(ENABLE_OVERLOADING)
data ColumnViewModelPropertyInfo
instance AttrInfo ColumnViewModelPropertyInfo where
    type AttrAllowedOps ColumnViewModelPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet, 'AttrClear]
    type AttrBaseTypeConstraint ColumnViewModelPropertyInfo = IsColumnView
    type AttrSetTypeConstraint ColumnViewModelPropertyInfo = Gtk.SelectionModel.IsSelectionModel
    type AttrTransferTypeConstraint ColumnViewModelPropertyInfo = Gtk.SelectionModel.IsSelectionModel
    type AttrTransferType ColumnViewModelPropertyInfo = Gtk.SelectionModel.SelectionModel
    type AttrGetType ColumnViewModelPropertyInfo = (Maybe Gtk.SelectionModel.SelectionModel)
    type AttrLabel ColumnViewModelPropertyInfo = "model"
    type AttrOrigin ColumnViewModelPropertyInfo = ColumnView
    attrGet = getColumnViewModel
    attrSet = setColumnViewModel
    attrTransfer _ v = do
        unsafeCastTo Gtk.SelectionModel.SelectionModel v
    attrConstruct = constructColumnViewModel
    attrClear = clearColumnViewModel
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.model"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#g:attr:model"
        })
#endif
   
   
   
getColumnViewReorderable :: (MonadIO m, IsColumnView o) => o -> m Bool
getColumnViewReorderable :: forall (m :: * -> *) o. (MonadIO m, IsColumnView o) => o -> m Bool
getColumnViewReorderable o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"reorderable"
setColumnViewReorderable :: (MonadIO m, IsColumnView o) => o -> Bool -> m ()
setColumnViewReorderable :: forall (m :: * -> *) o.
(MonadIO m, IsColumnView o) =>
o -> Bool -> m ()
setColumnViewReorderable o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"reorderable" Bool
val
constructColumnViewReorderable :: (IsColumnView o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructColumnViewReorderable :: forall o (m :: * -> *).
(IsColumnView o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructColumnViewReorderable Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
    IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"reorderable" Bool
val
#if defined(ENABLE_OVERLOADING)
data ColumnViewReorderablePropertyInfo
instance AttrInfo ColumnViewReorderablePropertyInfo where
    type AttrAllowedOps ColumnViewReorderablePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint ColumnViewReorderablePropertyInfo = IsColumnView
    type AttrSetTypeConstraint ColumnViewReorderablePropertyInfo = (~) Bool
    type AttrTransferTypeConstraint ColumnViewReorderablePropertyInfo = (~) Bool
    type AttrTransferType ColumnViewReorderablePropertyInfo = Bool
    type AttrGetType ColumnViewReorderablePropertyInfo = Bool
    type AttrLabel ColumnViewReorderablePropertyInfo = "reorderable"
    type AttrOrigin ColumnViewReorderablePropertyInfo = ColumnView
    attrGet = getColumnViewReorderable
    attrSet = setColumnViewReorderable
    attrTransfer _ v = do
        return v
    attrConstruct = constructColumnViewReorderable
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.reorderable"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#g:attr:reorderable"
        })
#endif
   
   
   
getColumnViewShowColumnSeparators :: (MonadIO m, IsColumnView o) => o -> m Bool
getColumnViewShowColumnSeparators :: forall (m :: * -> *) o. (MonadIO m, IsColumnView o) => o -> m Bool
getColumnViewShowColumnSeparators o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"show-column-separators"
setColumnViewShowColumnSeparators :: (MonadIO m, IsColumnView o) => o -> Bool -> m ()
setColumnViewShowColumnSeparators :: forall (m :: * -> *) o.
(MonadIO m, IsColumnView o) =>
o -> Bool -> m ()
setColumnViewShowColumnSeparators o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"show-column-separators" Bool
val
constructColumnViewShowColumnSeparators :: (IsColumnView o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructColumnViewShowColumnSeparators :: forall o (m :: * -> *).
(IsColumnView o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructColumnViewShowColumnSeparators Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
    IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"show-column-separators" Bool
val
#if defined(ENABLE_OVERLOADING)
data ColumnViewShowColumnSeparatorsPropertyInfo
instance AttrInfo ColumnViewShowColumnSeparatorsPropertyInfo where
    type AttrAllowedOps ColumnViewShowColumnSeparatorsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint ColumnViewShowColumnSeparatorsPropertyInfo = IsColumnView
    type AttrSetTypeConstraint ColumnViewShowColumnSeparatorsPropertyInfo = (~) Bool
    type AttrTransferTypeConstraint ColumnViewShowColumnSeparatorsPropertyInfo = (~) Bool
    type AttrTransferType ColumnViewShowColumnSeparatorsPropertyInfo = Bool
    type AttrGetType ColumnViewShowColumnSeparatorsPropertyInfo = Bool
    type AttrLabel ColumnViewShowColumnSeparatorsPropertyInfo = "show-column-separators"
    type AttrOrigin ColumnViewShowColumnSeparatorsPropertyInfo = ColumnView
    attrGet = getColumnViewShowColumnSeparators
    attrSet = setColumnViewShowColumnSeparators
    attrTransfer _ v = do
        return v
    attrConstruct = constructColumnViewShowColumnSeparators
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.showColumnSeparators"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#g:attr:showColumnSeparators"
        })
#endif
   
   
   
getColumnViewShowRowSeparators :: (MonadIO m, IsColumnView o) => o -> m Bool
getColumnViewShowRowSeparators :: forall (m :: * -> *) o. (MonadIO m, IsColumnView o) => o -> m Bool
getColumnViewShowRowSeparators o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"show-row-separators"
setColumnViewShowRowSeparators :: (MonadIO m, IsColumnView o) => o -> Bool -> m ()
setColumnViewShowRowSeparators :: forall (m :: * -> *) o.
(MonadIO m, IsColumnView o) =>
o -> Bool -> m ()
setColumnViewShowRowSeparators o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"show-row-separators" Bool
val
constructColumnViewShowRowSeparators :: (IsColumnView o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructColumnViewShowRowSeparators :: forall o (m :: * -> *).
(IsColumnView o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructColumnViewShowRowSeparators Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
    IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"show-row-separators" Bool
val
#if defined(ENABLE_OVERLOADING)
data ColumnViewShowRowSeparatorsPropertyInfo
instance AttrInfo ColumnViewShowRowSeparatorsPropertyInfo where
    type AttrAllowedOps ColumnViewShowRowSeparatorsPropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint ColumnViewShowRowSeparatorsPropertyInfo = IsColumnView
    type AttrSetTypeConstraint ColumnViewShowRowSeparatorsPropertyInfo = (~) Bool
    type AttrTransferTypeConstraint ColumnViewShowRowSeparatorsPropertyInfo = (~) Bool
    type AttrTransferType ColumnViewShowRowSeparatorsPropertyInfo = Bool
    type AttrGetType ColumnViewShowRowSeparatorsPropertyInfo = Bool
    type AttrLabel ColumnViewShowRowSeparatorsPropertyInfo = "show-row-separators"
    type AttrOrigin ColumnViewShowRowSeparatorsPropertyInfo = ColumnView
    attrGet = getColumnViewShowRowSeparators
    attrSet = setColumnViewShowRowSeparators
    attrTransfer _ v = do
        return v
    attrConstruct = constructColumnViewShowRowSeparators
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.showRowSeparators"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#g:attr:showRowSeparators"
        })
#endif
   
   
   
getColumnViewSingleClickActivate :: (MonadIO m, IsColumnView o) => o -> m Bool
getColumnViewSingleClickActivate :: forall (m :: * -> *) o. (MonadIO m, IsColumnView o) => o -> m Bool
getColumnViewSingleClickActivate o
obj = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ o -> String -> IO Bool
forall a. GObject a => a -> String -> IO Bool
B.Properties.getObjectPropertyBool o
obj String
"single-click-activate"
setColumnViewSingleClickActivate :: (MonadIO m, IsColumnView o) => o -> Bool -> m ()
setColumnViewSingleClickActivate :: forall (m :: * -> *) o.
(MonadIO m, IsColumnView o) =>
o -> Bool -> m ()
setColumnViewSingleClickActivate o
obj Bool
val = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    o -> String -> Bool -> IO ()
forall a. GObject a => a -> String -> Bool -> IO ()
B.Properties.setObjectPropertyBool o
obj String
"single-click-activate" Bool
val
constructColumnViewSingleClickActivate :: (IsColumnView o, MIO.MonadIO m) => Bool -> m (GValueConstruct o)
constructColumnViewSingleClickActivate :: forall o (m :: * -> *).
(IsColumnView o, MonadIO m) =>
Bool -> m (GValueConstruct o)
constructColumnViewSingleClickActivate Bool
val = IO (GValueConstruct o) -> m (GValueConstruct o)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> m (GValueConstruct o))
-> IO (GValueConstruct o) -> m (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ do
    IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a. IO a -> IO a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (GValueConstruct o) -> IO (GValueConstruct o))
-> IO (GValueConstruct o) -> IO (GValueConstruct o)
forall a b. (a -> b) -> a -> b
$ String -> Bool -> IO (GValueConstruct o)
forall o. String -> Bool -> IO (GValueConstruct o)
B.Properties.constructObjectPropertyBool String
"single-click-activate" Bool
val
#if defined(ENABLE_OVERLOADING)
data ColumnViewSingleClickActivatePropertyInfo
instance AttrInfo ColumnViewSingleClickActivatePropertyInfo where
    type AttrAllowedOps ColumnViewSingleClickActivatePropertyInfo = '[ 'AttrSet, 'AttrConstruct, 'AttrGet]
    type AttrBaseTypeConstraint ColumnViewSingleClickActivatePropertyInfo = IsColumnView
    type AttrSetTypeConstraint ColumnViewSingleClickActivatePropertyInfo = (~) Bool
    type AttrTransferTypeConstraint ColumnViewSingleClickActivatePropertyInfo = (~) Bool
    type AttrTransferType ColumnViewSingleClickActivatePropertyInfo = Bool
    type AttrGetType ColumnViewSingleClickActivatePropertyInfo = Bool
    type AttrLabel ColumnViewSingleClickActivatePropertyInfo = "single-click-activate"
    type AttrOrigin ColumnViewSingleClickActivatePropertyInfo = ColumnView
    attrGet = getColumnViewSingleClickActivate
    attrSet = setColumnViewSingleClickActivate
    attrTransfer _ v = do
        return v
    attrConstruct = constructColumnViewSingleClickActivate
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.singleClickActivate"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#g:attr:singleClickActivate"
        })
#endif
   
   
   
getColumnViewSorter :: (MonadIO m, IsColumnView o) => o -> m (Maybe Gtk.Sorter.Sorter)
getColumnViewSorter :: forall (m :: * -> *) o.
(MonadIO m, IsColumnView o) =>
o -> m (Maybe Sorter)
getColumnViewSorter o
obj = IO (Maybe Sorter) -> m (Maybe Sorter)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
MIO.liftIO (IO (Maybe Sorter) -> m (Maybe Sorter))
-> IO (Maybe Sorter) -> m (Maybe Sorter)
forall a b. (a -> b) -> a -> b
$ o -> String -> (ManagedPtr Sorter -> Sorter) -> IO (Maybe Sorter)
forall a b.
(GObject a, GObject b) =>
a -> String -> (ManagedPtr b -> b) -> IO (Maybe b)
B.Properties.getObjectPropertyObject o
obj String
"sorter" ManagedPtr Sorter -> Sorter
Gtk.Sorter.Sorter
#if defined(ENABLE_OVERLOADING)
data ColumnViewSorterPropertyInfo
instance AttrInfo ColumnViewSorterPropertyInfo where
    type AttrAllowedOps ColumnViewSorterPropertyInfo = '[ 'AttrGet, 'AttrClear]
    type AttrBaseTypeConstraint ColumnViewSorterPropertyInfo = IsColumnView
    type AttrSetTypeConstraint ColumnViewSorterPropertyInfo = (~) ()
    type AttrTransferTypeConstraint ColumnViewSorterPropertyInfo = (~) ()
    type AttrTransferType ColumnViewSorterPropertyInfo = ()
    type AttrGetType ColumnViewSorterPropertyInfo = (Maybe Gtk.Sorter.Sorter)
    type AttrLabel ColumnViewSorterPropertyInfo = "sorter"
    type AttrOrigin ColumnViewSorterPropertyInfo = ColumnView
    attrGet = getColumnViewSorter
    attrSet = undefined
    attrTransfer _ = undefined
    attrConstruct = undefined
    attrClear = undefined
    dbgAttrInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.sorter"
        , O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#g:attr:sorter"
        })
#endif
#if defined(ENABLE_OVERLOADING)
instance O.HasAttributeList ColumnView
type instance O.AttributeList ColumnView = ColumnViewAttributeList
type ColumnViewAttributeList = ('[ '("accessibleRole", Gtk.Accessible.AccessibleAccessibleRolePropertyInfo), '("canFocus", Gtk.Widget.WidgetCanFocusPropertyInfo), '("canTarget", Gtk.Widget.WidgetCanTargetPropertyInfo), '("columns", ColumnViewColumnsPropertyInfo), '("cssClasses", Gtk.Widget.WidgetCssClassesPropertyInfo), '("cssName", Gtk.Widget.WidgetCssNamePropertyInfo), '("cursor", Gtk.Widget.WidgetCursorPropertyInfo), '("enableRubberband", ColumnViewEnableRubberbandPropertyInfo), '("focusOnClick", Gtk.Widget.WidgetFocusOnClickPropertyInfo), '("focusable", Gtk.Widget.WidgetFocusablePropertyInfo), '("hadjustment", Gtk.Scrollable.ScrollableHadjustmentPropertyInfo), '("halign", Gtk.Widget.WidgetHalignPropertyInfo), '("hasDefault", Gtk.Widget.WidgetHasDefaultPropertyInfo), '("hasFocus", Gtk.Widget.WidgetHasFocusPropertyInfo), '("hasTooltip", Gtk.Widget.WidgetHasTooltipPropertyInfo), '("heightRequest", Gtk.Widget.WidgetHeightRequestPropertyInfo), '("hexpand", Gtk.Widget.WidgetHexpandPropertyInfo), '("hexpandSet", Gtk.Widget.WidgetHexpandSetPropertyInfo), '("hscrollPolicy", Gtk.Scrollable.ScrollableHscrollPolicyPropertyInfo), '("layoutManager", Gtk.Widget.WidgetLayoutManagerPropertyInfo), '("marginBottom", Gtk.Widget.WidgetMarginBottomPropertyInfo), '("marginEnd", Gtk.Widget.WidgetMarginEndPropertyInfo), '("marginStart", Gtk.Widget.WidgetMarginStartPropertyInfo), '("marginTop", Gtk.Widget.WidgetMarginTopPropertyInfo), '("model", ColumnViewModelPropertyInfo), '("name", Gtk.Widget.WidgetNamePropertyInfo), '("opacity", Gtk.Widget.WidgetOpacityPropertyInfo), '("overflow", Gtk.Widget.WidgetOverflowPropertyInfo), '("parent", Gtk.Widget.WidgetParentPropertyInfo), '("receivesDefault", Gtk.Widget.WidgetReceivesDefaultPropertyInfo), '("reorderable", ColumnViewReorderablePropertyInfo), '("root", Gtk.Widget.WidgetRootPropertyInfo), '("scaleFactor", Gtk.Widget.WidgetScaleFactorPropertyInfo), '("sensitive", Gtk.Widget.WidgetSensitivePropertyInfo), '("showColumnSeparators", ColumnViewShowColumnSeparatorsPropertyInfo), '("showRowSeparators", ColumnViewShowRowSeparatorsPropertyInfo), '("singleClickActivate", ColumnViewSingleClickActivatePropertyInfo), '("sorter", ColumnViewSorterPropertyInfo), '("tooltipMarkup", Gtk.Widget.WidgetTooltipMarkupPropertyInfo), '("tooltipText", Gtk.Widget.WidgetTooltipTextPropertyInfo), '("vadjustment", Gtk.Scrollable.ScrollableVadjustmentPropertyInfo), '("valign", Gtk.Widget.WidgetValignPropertyInfo), '("vexpand", Gtk.Widget.WidgetVexpandPropertyInfo), '("vexpandSet", Gtk.Widget.WidgetVexpandSetPropertyInfo), '("visible", Gtk.Widget.WidgetVisiblePropertyInfo), '("vscrollPolicy", Gtk.Scrollable.ScrollableVscrollPolicyPropertyInfo), '("widthRequest", Gtk.Widget.WidgetWidthRequestPropertyInfo)] :: [(Symbol, *)])
#endif
#if defined(ENABLE_OVERLOADING)
columnViewColumns :: AttrLabelProxy "columns"
columnViewColumns = AttrLabelProxy
columnViewEnableRubberband :: AttrLabelProxy "enableRubberband"
columnViewEnableRubberband = AttrLabelProxy
columnViewModel :: AttrLabelProxy "model"
columnViewModel = AttrLabelProxy
columnViewReorderable :: AttrLabelProxy "reorderable"
columnViewReorderable = AttrLabelProxy
columnViewShowColumnSeparators :: AttrLabelProxy "showColumnSeparators"
columnViewShowColumnSeparators = AttrLabelProxy
columnViewShowRowSeparators :: AttrLabelProxy "showRowSeparators"
columnViewShowRowSeparators = AttrLabelProxy
columnViewSingleClickActivate :: AttrLabelProxy "singleClickActivate"
columnViewSingleClickActivate = AttrLabelProxy
columnViewSorter :: AttrLabelProxy "sorter"
columnViewSorter = AttrLabelProxy
#endif
#if defined(ENABLE_OVERLOADING)
type instance O.SignalList ColumnView = ColumnViewSignalList
type ColumnViewSignalList = ('[ '("activate", ColumnViewActivateSignalInfo), '("destroy", Gtk.Widget.WidgetDestroySignalInfo), '("directionChanged", Gtk.Widget.WidgetDirectionChangedSignalInfo), '("hide", Gtk.Widget.WidgetHideSignalInfo), '("keynavFailed", Gtk.Widget.WidgetKeynavFailedSignalInfo), '("map", Gtk.Widget.WidgetMapSignalInfo), '("mnemonicActivate", Gtk.Widget.WidgetMnemonicActivateSignalInfo), '("moveFocus", Gtk.Widget.WidgetMoveFocusSignalInfo), '("notify", GObject.Object.ObjectNotifySignalInfo), '("queryTooltip", Gtk.Widget.WidgetQueryTooltipSignalInfo), '("realize", Gtk.Widget.WidgetRealizeSignalInfo), '("show", Gtk.Widget.WidgetShowSignalInfo), '("stateFlagsChanged", Gtk.Widget.WidgetStateFlagsChangedSignalInfo), '("unmap", Gtk.Widget.WidgetUnmapSignalInfo), '("unrealize", Gtk.Widget.WidgetUnrealizeSignalInfo)] :: [(Symbol, *)])
#endif
foreign import ccall "gtk_column_view_new" gtk_column_view_new :: 
    Ptr Gtk.SelectionModel.SelectionModel -> 
    IO (Ptr ColumnView)
columnViewNew ::
    (B.CallStack.HasCallStack, MonadIO m, Gtk.SelectionModel.IsSelectionModel a) =>
    Maybe (a)
    
    -> m ColumnView
    
columnViewNew :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsSelectionModel a) =>
Maybe a -> m ColumnView
columnViewNew Maybe a
model = IO ColumnView -> m ColumnView
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO ColumnView -> m ColumnView) -> IO ColumnView -> m ColumnView
forall a b. (a -> b) -> a -> b
$ do
    Ptr SelectionModel
maybeModel <- case Maybe a
model of
        Maybe a
Nothing -> Ptr SelectionModel -> IO (Ptr SelectionModel)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr SelectionModel
forall a. Ptr a
nullPtr
        Just a
jModel -> do
            Ptr SelectionModel
jModel' <- a -> IO (Ptr SelectionModel)
forall a b. (HasCallStack, GObject a) => a -> IO (Ptr b)
B.ManagedPtr.disownObject a
jModel
            Ptr SelectionModel -> IO (Ptr SelectionModel)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr SelectionModel
jModel'
    Ptr ColumnView
result <- Ptr SelectionModel -> IO (Ptr ColumnView)
gtk_column_view_new Ptr SelectionModel
maybeModel
    Text -> Ptr ColumnView -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"columnViewNew" Ptr ColumnView
result
    ColumnView
result' <- ((ManagedPtr ColumnView -> ColumnView)
-> Ptr ColumnView -> IO ColumnView
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr ColumnView -> ColumnView
ColumnView) Ptr ColumnView
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
    ColumnView -> IO ColumnView
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ColumnView
result'
#if defined(ENABLE_OVERLOADING)
#endif
foreign import ccall "gtk_column_view_append_column" gtk_column_view_append_column :: 
    Ptr ColumnView ->                       
    Ptr Gtk.ColumnViewColumn.ColumnViewColumn -> 
    IO ()
columnViewAppendColumn ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a, Gtk.ColumnViewColumn.IsColumnViewColumn b) =>
    a
    
    -> b
    
    
    -> m ()
columnViewAppendColumn :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsColumnView a, IsColumnViewColumn b) =>
a -> b -> m ()
columnViewAppendColumn a
self b
column = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    Ptr ColumnViewColumn
column' <- b -> IO (Ptr ColumnViewColumn)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
column
    Ptr ColumnView -> Ptr ColumnViewColumn -> IO ()
gtk_column_view_append_column Ptr ColumnView
self' Ptr ColumnViewColumn
column'
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
column
    () -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ColumnViewAppendColumnMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsColumnView a, Gtk.ColumnViewColumn.IsColumnViewColumn b) => O.OverloadedMethod ColumnViewAppendColumnMethodInfo a signature where
    overloadedMethod = columnViewAppendColumn
instance O.OverloadedMethodInfo ColumnViewAppendColumnMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewAppendColumn",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewAppendColumn"
        })
#endif
foreign import ccall "gtk_column_view_get_columns" gtk_column_view_get_columns :: 
    Ptr ColumnView ->                       
    IO (Ptr Gio.ListModel.ListModel)
columnViewGetColumns ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a) =>
    a
    
    -> m Gio.ListModel.ListModel
    
columnViewGetColumns :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsColumnView a) =>
a -> m ListModel
columnViewGetColumns a
self = IO ListModel -> m ListModel
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO ListModel -> m ListModel) -> IO ListModel -> m ListModel
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    Ptr ListModel
result <- Ptr ColumnView -> IO (Ptr ListModel)
gtk_column_view_get_columns Ptr ColumnView
self'
    Text -> Ptr ListModel -> IO ()
forall a. HasCallStack => Text -> Ptr a -> IO ()
checkUnexpectedReturnNULL Text
"columnViewGetColumns" Ptr ListModel
result
    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
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    ListModel -> IO ListModel
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ListModel
result'
#if defined(ENABLE_OVERLOADING)
data ColumnViewGetColumnsMethodInfo
instance (signature ~ (m Gio.ListModel.ListModel), MonadIO m, IsColumnView a) => O.OverloadedMethod ColumnViewGetColumnsMethodInfo a signature where
    overloadedMethod = columnViewGetColumns
instance O.OverloadedMethodInfo ColumnViewGetColumnsMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewGetColumns",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewGetColumns"
        })
#endif
foreign import ccall "gtk_column_view_get_enable_rubberband" gtk_column_view_get_enable_rubberband :: 
    Ptr ColumnView ->                       
    IO CInt
columnViewGetEnableRubberband ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a) =>
    a
    
    -> m Bool
    
columnViewGetEnableRubberband :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsColumnView a) =>
a -> m Bool
columnViewGetEnableRubberband a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CInt
result <- Ptr ColumnView -> IO CInt
gtk_column_view_get_enable_rubberband Ptr ColumnView
self'
    let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data ColumnViewGetEnableRubberbandMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsColumnView a) => O.OverloadedMethod ColumnViewGetEnableRubberbandMethodInfo a signature where
    overloadedMethod = columnViewGetEnableRubberband
instance O.OverloadedMethodInfo ColumnViewGetEnableRubberbandMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewGetEnableRubberband",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewGetEnableRubberband"
        })
#endif
foreign import ccall "gtk_column_view_get_model" gtk_column_view_get_model :: 
    Ptr ColumnView ->                       
    IO (Ptr Gtk.SelectionModel.SelectionModel)
columnViewGetModel ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a) =>
    a
    
    -> m (Maybe Gtk.SelectionModel.SelectionModel)
    
columnViewGetModel :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsColumnView a) =>
a -> m (Maybe SelectionModel)
columnViewGetModel a
self = IO (Maybe SelectionModel) -> m (Maybe SelectionModel)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe SelectionModel) -> m (Maybe SelectionModel))
-> IO (Maybe SelectionModel) -> m (Maybe SelectionModel)
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    Ptr SelectionModel
result <- Ptr ColumnView -> IO (Ptr SelectionModel)
gtk_column_view_get_model Ptr ColumnView
self'
    Maybe SelectionModel
maybeResult <- Ptr SelectionModel
-> (Ptr SelectionModel -> IO SelectionModel)
-> IO (Maybe SelectionModel)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr SelectionModel
result ((Ptr SelectionModel -> IO SelectionModel)
 -> IO (Maybe SelectionModel))
-> (Ptr SelectionModel -> IO SelectionModel)
-> IO (Maybe SelectionModel)
forall a b. (a -> b) -> a -> b
$ \Ptr SelectionModel
result' -> do
        SelectionModel
result'' <- ((ManagedPtr SelectionModel -> SelectionModel)
-> Ptr SelectionModel -> IO SelectionModel
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr SelectionModel -> SelectionModel
Gtk.SelectionModel.SelectionModel) Ptr SelectionModel
result'
        SelectionModel -> IO SelectionModel
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return SelectionModel
result''
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    Maybe SelectionModel -> IO (Maybe SelectionModel)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe SelectionModel
maybeResult
#if defined(ENABLE_OVERLOADING)
data ColumnViewGetModelMethodInfo
instance (signature ~ (m (Maybe Gtk.SelectionModel.SelectionModel)), MonadIO m, IsColumnView a) => O.OverloadedMethod ColumnViewGetModelMethodInfo a signature where
    overloadedMethod = columnViewGetModel
instance O.OverloadedMethodInfo ColumnViewGetModelMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewGetModel",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewGetModel"
        })
#endif
foreign import ccall "gtk_column_view_get_reorderable" gtk_column_view_get_reorderable :: 
    Ptr ColumnView ->                       
    IO CInt
columnViewGetReorderable ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a) =>
    a
    
    -> m Bool
    
columnViewGetReorderable :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsColumnView a) =>
a -> m Bool
columnViewGetReorderable a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CInt
result <- Ptr ColumnView -> IO CInt
gtk_column_view_get_reorderable Ptr ColumnView
self'
    let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data ColumnViewGetReorderableMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsColumnView a) => O.OverloadedMethod ColumnViewGetReorderableMethodInfo a signature where
    overloadedMethod = columnViewGetReorderable
instance O.OverloadedMethodInfo ColumnViewGetReorderableMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewGetReorderable",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewGetReorderable"
        })
#endif
foreign import ccall "gtk_column_view_get_show_column_separators" gtk_column_view_get_show_column_separators :: 
    Ptr ColumnView ->                       
    IO CInt
columnViewGetShowColumnSeparators ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a) =>
    a
    
    -> m Bool
    
columnViewGetShowColumnSeparators :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsColumnView a) =>
a -> m Bool
columnViewGetShowColumnSeparators a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CInt
result <- Ptr ColumnView -> IO CInt
gtk_column_view_get_show_column_separators Ptr ColumnView
self'
    let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data ColumnViewGetShowColumnSeparatorsMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsColumnView a) => O.OverloadedMethod ColumnViewGetShowColumnSeparatorsMethodInfo a signature where
    overloadedMethod = columnViewGetShowColumnSeparators
instance O.OverloadedMethodInfo ColumnViewGetShowColumnSeparatorsMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewGetShowColumnSeparators",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewGetShowColumnSeparators"
        })
#endif
foreign import ccall "gtk_column_view_get_show_row_separators" gtk_column_view_get_show_row_separators :: 
    Ptr ColumnView ->                       
    IO CInt
columnViewGetShowRowSeparators ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a) =>
    a
    
    -> m Bool
    
columnViewGetShowRowSeparators :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsColumnView a) =>
a -> m Bool
columnViewGetShowRowSeparators a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CInt
result <- Ptr ColumnView -> IO CInt
gtk_column_view_get_show_row_separators Ptr ColumnView
self'
    let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data ColumnViewGetShowRowSeparatorsMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsColumnView a) => O.OverloadedMethod ColumnViewGetShowRowSeparatorsMethodInfo a signature where
    overloadedMethod = columnViewGetShowRowSeparators
instance O.OverloadedMethodInfo ColumnViewGetShowRowSeparatorsMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewGetShowRowSeparators",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewGetShowRowSeparators"
        })
#endif
foreign import ccall "gtk_column_view_get_single_click_activate" gtk_column_view_get_single_click_activate :: 
    Ptr ColumnView ->                       
    IO CInt
columnViewGetSingleClickActivate ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a) =>
    a
    
    -> m Bool
    
columnViewGetSingleClickActivate :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsColumnView a) =>
a -> m Bool
columnViewGetSingleClickActivate a
self = IO Bool -> m Bool
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO Bool -> m Bool) -> IO Bool -> m Bool
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    CInt
result <- Ptr ColumnView -> IO CInt
gtk_column_view_get_single_click_activate Ptr ColumnView
self'
    let result' :: Bool
result' = (CInt -> CInt -> Bool
forall a. Eq a => a -> a -> Bool
/= CInt
0) CInt
result
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    Bool -> IO Bool
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Bool
result'
#if defined(ENABLE_OVERLOADING)
data ColumnViewGetSingleClickActivateMethodInfo
instance (signature ~ (m Bool), MonadIO m, IsColumnView a) => O.OverloadedMethod ColumnViewGetSingleClickActivateMethodInfo a signature where
    overloadedMethod = columnViewGetSingleClickActivate
instance O.OverloadedMethodInfo ColumnViewGetSingleClickActivateMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewGetSingleClickActivate",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewGetSingleClickActivate"
        })
#endif
foreign import ccall "gtk_column_view_get_sorter" gtk_column_view_get_sorter :: 
    Ptr ColumnView ->                       
    IO (Ptr Gtk.Sorter.Sorter)
columnViewGetSorter ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a) =>
    a
    
    -> m (Maybe Gtk.Sorter.Sorter)
    
columnViewGetSorter :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsColumnView a) =>
a -> m (Maybe Sorter)
columnViewGetSorter a
self = IO (Maybe Sorter) -> m (Maybe Sorter)
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO (Maybe Sorter) -> m (Maybe Sorter))
-> IO (Maybe Sorter) -> m (Maybe Sorter)
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    Ptr Sorter
result <- Ptr ColumnView -> IO (Ptr Sorter)
gtk_column_view_get_sorter Ptr ColumnView
self'
    Maybe Sorter
maybeResult <- Ptr Sorter -> (Ptr Sorter -> IO Sorter) -> IO (Maybe Sorter)
forall a b. Ptr a -> (Ptr a -> IO b) -> IO (Maybe b)
convertIfNonNull Ptr Sorter
result ((Ptr Sorter -> IO Sorter) -> IO (Maybe Sorter))
-> (Ptr Sorter -> IO Sorter) -> IO (Maybe Sorter)
forall a b. (a -> b) -> a -> b
$ \Ptr Sorter
result' -> do
        Sorter
result'' <- ((ManagedPtr Sorter -> Sorter) -> Ptr Sorter -> IO Sorter
forall a b.
(HasCallStack, GObject a, GObject b) =>
(ManagedPtr a -> a) -> Ptr b -> IO a
newObject ManagedPtr Sorter -> Sorter
Gtk.Sorter.Sorter) Ptr Sorter
result'
        Sorter -> IO Sorter
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Sorter
result''
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    Maybe Sorter -> IO (Maybe Sorter)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Maybe Sorter
maybeResult
#if defined(ENABLE_OVERLOADING)
data ColumnViewGetSorterMethodInfo
instance (signature ~ (m (Maybe Gtk.Sorter.Sorter)), MonadIO m, IsColumnView a) => O.OverloadedMethod ColumnViewGetSorterMethodInfo a signature where
    overloadedMethod = columnViewGetSorter
instance O.OverloadedMethodInfo ColumnViewGetSorterMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewGetSorter",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewGetSorter"
        })
#endif
foreign import ccall "gtk_column_view_insert_column" gtk_column_view_insert_column :: 
    Ptr ColumnView ->                       
    Word32 ->                               
    Ptr Gtk.ColumnViewColumn.ColumnViewColumn -> 
    IO ()
columnViewInsertColumn ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a, Gtk.ColumnViewColumn.IsColumnViewColumn b) =>
    a
    
    -> Word32
    
    -> b
    
    -> m ()
columnViewInsertColumn :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsColumnView a, IsColumnViewColumn b) =>
a -> Word32 -> b -> m ()
columnViewInsertColumn a
self Word32
position b
column = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    Ptr ColumnViewColumn
column' <- b -> IO (Ptr ColumnViewColumn)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
column
    Ptr ColumnView -> Word32 -> Ptr ColumnViewColumn -> IO ()
gtk_column_view_insert_column Ptr ColumnView
self' Word32
position Ptr ColumnViewColumn
column'
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
column
    () -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ColumnViewInsertColumnMethodInfo
instance (signature ~ (Word32 -> b -> m ()), MonadIO m, IsColumnView a, Gtk.ColumnViewColumn.IsColumnViewColumn b) => O.OverloadedMethod ColumnViewInsertColumnMethodInfo a signature where
    overloadedMethod = columnViewInsertColumn
instance O.OverloadedMethodInfo ColumnViewInsertColumnMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewInsertColumn",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewInsertColumn"
        })
#endif
foreign import ccall "gtk_column_view_remove_column" gtk_column_view_remove_column :: 
    Ptr ColumnView ->                       
    Ptr Gtk.ColumnViewColumn.ColumnViewColumn -> 
    IO ()
columnViewRemoveColumn ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a, Gtk.ColumnViewColumn.IsColumnViewColumn b) =>
    a
    
    -> b
    
    -> m ()
columnViewRemoveColumn :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsColumnView a, IsColumnViewColumn b) =>
a -> b -> m ()
columnViewRemoveColumn a
self b
column = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    Ptr ColumnViewColumn
column' <- b -> IO (Ptr ColumnViewColumn)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
column
    Ptr ColumnView -> Ptr ColumnViewColumn -> IO ()
gtk_column_view_remove_column Ptr ColumnView
self' Ptr ColumnViewColumn
column'
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr b
column
    () -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ColumnViewRemoveColumnMethodInfo
instance (signature ~ (b -> m ()), MonadIO m, IsColumnView a, Gtk.ColumnViewColumn.IsColumnViewColumn b) => O.OverloadedMethod ColumnViewRemoveColumnMethodInfo a signature where
    overloadedMethod = columnViewRemoveColumn
instance O.OverloadedMethodInfo ColumnViewRemoveColumnMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewRemoveColumn",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewRemoveColumn"
        })
#endif
foreign import ccall "gtk_column_view_set_enable_rubberband" gtk_column_view_set_enable_rubberband :: 
    Ptr ColumnView ->                       
    CInt ->                                 
    IO ()
columnViewSetEnableRubberband ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a) =>
    a
    
    -> Bool
    
    -> m ()
columnViewSetEnableRubberband :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsColumnView a) =>
a -> Bool -> m ()
columnViewSetEnableRubberband a
self Bool
enableRubberband = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    let enableRubberband' :: CInt
enableRubberband' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
enableRubberband
    Ptr ColumnView -> CInt -> IO ()
gtk_column_view_set_enable_rubberband Ptr ColumnView
self' CInt
enableRubberband'
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    () -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ColumnViewSetEnableRubberbandMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsColumnView a) => O.OverloadedMethod ColumnViewSetEnableRubberbandMethodInfo a signature where
    overloadedMethod = columnViewSetEnableRubberband
instance O.OverloadedMethodInfo ColumnViewSetEnableRubberbandMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewSetEnableRubberband",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewSetEnableRubberband"
        })
#endif
foreign import ccall "gtk_column_view_set_model" gtk_column_view_set_model :: 
    Ptr ColumnView ->                       
    Ptr Gtk.SelectionModel.SelectionModel -> 
    IO ()
columnViewSetModel ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a, Gtk.SelectionModel.IsSelectionModel b) =>
    a
    
    -> Maybe (b)
    
    -> m ()
columnViewSetModel :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsColumnView a, IsSelectionModel b) =>
a -> Maybe b -> m ()
columnViewSetModel a
self Maybe b
model = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    Ptr SelectionModel
maybeModel <- case Maybe b
model of
        Maybe b
Nothing -> Ptr SelectionModel -> IO (Ptr SelectionModel)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr SelectionModel
forall a. Ptr a
nullPtr
        Just b
jModel -> do
            Ptr SelectionModel
jModel' <- b -> IO (Ptr SelectionModel)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jModel
            Ptr SelectionModel -> IO (Ptr SelectionModel)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr SelectionModel
jModel'
    Ptr ColumnView -> Ptr SelectionModel -> IO ()
gtk_column_view_set_model Ptr ColumnView
self' Ptr SelectionModel
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 a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ColumnViewSetModelMethodInfo
instance (signature ~ (Maybe (b) -> m ()), MonadIO m, IsColumnView a, Gtk.SelectionModel.IsSelectionModel b) => O.OverloadedMethod ColumnViewSetModelMethodInfo a signature where
    overloadedMethod = columnViewSetModel
instance O.OverloadedMethodInfo ColumnViewSetModelMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewSetModel",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewSetModel"
        })
#endif
foreign import ccall "gtk_column_view_set_reorderable" gtk_column_view_set_reorderable :: 
    Ptr ColumnView ->                       
    CInt ->                                 
    IO ()
columnViewSetReorderable ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a) =>
    a
    
    -> Bool
    
    -> m ()
columnViewSetReorderable :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsColumnView a) =>
a -> Bool -> m ()
columnViewSetReorderable a
self Bool
reorderable = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    let reorderable' :: CInt
reorderable' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
reorderable
    Ptr ColumnView -> CInt -> IO ()
gtk_column_view_set_reorderable Ptr ColumnView
self' CInt
reorderable'
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    () -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ColumnViewSetReorderableMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsColumnView a) => O.OverloadedMethod ColumnViewSetReorderableMethodInfo a signature where
    overloadedMethod = columnViewSetReorderable
instance O.OverloadedMethodInfo ColumnViewSetReorderableMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewSetReorderable",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewSetReorderable"
        })
#endif
foreign import ccall "gtk_column_view_set_show_column_separators" gtk_column_view_set_show_column_separators :: 
    Ptr ColumnView ->                       
    CInt ->                                 
    IO ()
columnViewSetShowColumnSeparators ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a) =>
    a
    
    -> Bool
    
    -> m ()
columnViewSetShowColumnSeparators :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsColumnView a) =>
a -> Bool -> m ()
columnViewSetShowColumnSeparators a
self Bool
showColumnSeparators = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    let showColumnSeparators' :: CInt
showColumnSeparators' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
showColumnSeparators
    Ptr ColumnView -> CInt -> IO ()
gtk_column_view_set_show_column_separators Ptr ColumnView
self' CInt
showColumnSeparators'
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    () -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ColumnViewSetShowColumnSeparatorsMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsColumnView a) => O.OverloadedMethod ColumnViewSetShowColumnSeparatorsMethodInfo a signature where
    overloadedMethod = columnViewSetShowColumnSeparators
instance O.OverloadedMethodInfo ColumnViewSetShowColumnSeparatorsMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewSetShowColumnSeparators",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewSetShowColumnSeparators"
        })
#endif
foreign import ccall "gtk_column_view_set_show_row_separators" gtk_column_view_set_show_row_separators :: 
    Ptr ColumnView ->                       
    CInt ->                                 
    IO ()
columnViewSetShowRowSeparators ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a) =>
    a
    
    -> Bool
    
    -> m ()
columnViewSetShowRowSeparators :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsColumnView a) =>
a -> Bool -> m ()
columnViewSetShowRowSeparators a
self Bool
showRowSeparators = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    let showRowSeparators' :: CInt
showRowSeparators' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
showRowSeparators
    Ptr ColumnView -> CInt -> IO ()
gtk_column_view_set_show_row_separators Ptr ColumnView
self' CInt
showRowSeparators'
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    () -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ColumnViewSetShowRowSeparatorsMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsColumnView a) => O.OverloadedMethod ColumnViewSetShowRowSeparatorsMethodInfo a signature where
    overloadedMethod = columnViewSetShowRowSeparators
instance O.OverloadedMethodInfo ColumnViewSetShowRowSeparatorsMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewSetShowRowSeparators",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewSetShowRowSeparators"
        })
#endif
foreign import ccall "gtk_column_view_set_single_click_activate" gtk_column_view_set_single_click_activate :: 
    Ptr ColumnView ->                       
    CInt ->                                 
    IO ()
columnViewSetSingleClickActivate ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a) =>
    a
    
    -> Bool
    
    -> m ()
columnViewSetSingleClickActivate :: forall (m :: * -> *) a.
(HasCallStack, MonadIO m, IsColumnView a) =>
a -> Bool -> m ()
columnViewSetSingleClickActivate a
self Bool
singleClickActivate = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    let singleClickActivate' :: CInt
singleClickActivate' = (Int -> CInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CInt) -> (Bool -> Int) -> Bool -> CInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. Bool -> Int
forall a. Enum a => a -> Int
fromEnum) Bool
singleClickActivate
    Ptr ColumnView -> CInt -> IO ()
gtk_column_view_set_single_click_activate Ptr ColumnView
self' CInt
singleClickActivate'
    a -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr a
self
    () -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ColumnViewSetSingleClickActivateMethodInfo
instance (signature ~ (Bool -> m ()), MonadIO m, IsColumnView a) => O.OverloadedMethod ColumnViewSetSingleClickActivateMethodInfo a signature where
    overloadedMethod = columnViewSetSingleClickActivate
instance O.OverloadedMethodInfo ColumnViewSetSingleClickActivateMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewSetSingleClickActivate",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewSetSingleClickActivate"
        })
#endif
foreign import ccall "gtk_column_view_sort_by_column" gtk_column_view_sort_by_column :: 
    Ptr ColumnView ->                       
    Ptr Gtk.ColumnViewColumn.ColumnViewColumn -> 
    CUInt ->                                
    IO ()
columnViewSortByColumn ::
    (B.CallStack.HasCallStack, MonadIO m, IsColumnView a, Gtk.ColumnViewColumn.IsColumnViewColumn b) =>
    a
    
    -> Maybe (b)
    
    -> Gtk.Enums.SortType
    
    -> m ()
columnViewSortByColumn :: forall (m :: * -> *) a b.
(HasCallStack, MonadIO m, IsColumnView a, IsColumnViewColumn b) =>
a -> Maybe b -> SortType -> m ()
columnViewSortByColumn a
self Maybe b
column SortType
direction = IO () -> m ()
forall a. IO a -> m a
forall (m :: * -> *) a. MonadIO m => IO a -> m a
liftIO (IO () -> m ()) -> IO () -> m ()
forall a b. (a -> b) -> a -> b
$ do
    Ptr ColumnView
self' <- a -> IO (Ptr ColumnView)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr a
self
    Ptr ColumnViewColumn
maybeColumn <- case Maybe b
column of
        Maybe b
Nothing -> Ptr ColumnViewColumn -> IO (Ptr ColumnViewColumn)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr ColumnViewColumn
forall a. Ptr a
nullPtr
        Just b
jColumn -> do
            Ptr ColumnViewColumn
jColumn' <- b -> IO (Ptr ColumnViewColumn)
forall a b. (HasCallStack, ManagedPtrNewtype a) => a -> IO (Ptr b)
unsafeManagedPtrCastPtr b
jColumn
            Ptr ColumnViewColumn -> IO (Ptr ColumnViewColumn)
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return Ptr ColumnViewColumn
jColumn'
    let direction' :: CUInt
direction' = (Int -> CUInt
forall a b. (Integral a, Num b) => a -> b
fromIntegral (Int -> CUInt) -> (SortType -> Int) -> SortType -> CUInt
forall b c a. (b -> c) -> (a -> b) -> a -> c
. SortType -> Int
forall a. Enum a => a -> Int
fromEnum) SortType
direction
    Ptr ColumnView -> Ptr ColumnViewColumn -> CUInt -> IO ()
gtk_column_view_sort_by_column Ptr ColumnView
self' Ptr ColumnViewColumn
maybeColumn CUInt
direction'
    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
column b -> IO ()
forall a. ManagedPtrNewtype a => a -> IO ()
touchManagedPtr
    () -> IO ()
forall a. a -> IO a
forall (m :: * -> *) a. Monad m => a -> m a
return ()
#if defined(ENABLE_OVERLOADING)
data ColumnViewSortByColumnMethodInfo
instance (signature ~ (Maybe (b) -> Gtk.Enums.SortType -> m ()), MonadIO m, IsColumnView a, Gtk.ColumnViewColumn.IsColumnViewColumn b) => O.OverloadedMethod ColumnViewSortByColumnMethodInfo a signature where
    overloadedMethod = columnViewSortByColumn
instance O.OverloadedMethodInfo ColumnViewSortByColumnMethodInfo a where
    overloadedMethodInfo = P.Just (O.ResolvedSymbolInfo {
        O.resolvedSymbolName = "GI.Gtk.Objects.ColumnView.columnViewSortByColumn",
        O.resolvedSymbolURL = "https://hackage.haskell.org/package/gi-gtk-4.0.6/docs/GI-Gtk-Objects-ColumnView.html#v:columnViewSortByColumn"
        })
#endif