{-# LANGUAGE FlexibleContexts, FlexibleInstances, ForeignFunctionInterface, MonoLocalBinds, MultiParamTypeClasses, ScopedTypeVariables, TypeSynonymInstances, UndecidableInstances #-} ---------- GENERATED FILE, EDITS WILL BE LOST ---------- module Graphics.UI.Qtah.Generated.Widgets.QStackedLayout ( castQStackedLayoutToQLayout, castQLayoutToQStackedLayout, castQStackedLayoutToQObject, castQObjectToQStackedLayout, castQStackedLayoutToQLayoutItem, castQLayoutItemToQStackedLayout, QStackedLayoutValue (..), QStackedLayoutConstPtr (..), count, currentIndex, currentWidget, stackingMode, widget, QStackedLayoutPtr (..), addWidget, setCurrentIndex, setCurrentWidget, insertWidget, setStackingMode, emitCurrentChanged, emitWidgetRemoved, QStackedLayoutConst (..), castQStackedLayoutToConst, QStackedLayout (..), castQStackedLayoutToNonconst, new, newWithParent, newWithLayout, QStackedLayoutSuper (..), QStackedLayoutSuperConst (..), QStackedLayoutStackingMode (..), ) where import qualified Foreign as HoppyF import qualified Foreign.C as HoppyFC import qualified Foreign.Hoppy.Runtime as HoppyFHR import qualified Graphics.UI.Qtah.Generated.Core.QObject as M94 import qualified Graphics.UI.Qtah.Generated.Widgets.QLayout as M432 import qualified Graphics.UI.Qtah.Generated.Widgets.QLayoutItem as M434 import qualified Graphics.UI.Qtah.Generated.Widgets.QWidget as M506 import Prelude (($), (.), (=<<), (==), (>>=)) import qualified Prelude as HoppyP foreign import ccall "genpop__QStackedLayout_new" new' :: HoppyP.IO (HoppyF.Ptr QStackedLayout) foreign import ccall "genpop__QStackedLayout_newWithParent" newWithParent' :: HoppyF.Ptr M506.QWidget -> HoppyP.IO (HoppyF.Ptr QStackedLayout) foreign import ccall "genpop__QStackedLayout_newWithLayout" newWithLayout' :: HoppyF.Ptr M432.QLayout -> HoppyP.IO (HoppyF.Ptr QStackedLayout) foreign import ccall "genpop__QStackedLayout_addWidget" addWidget' :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr M506.QWidget -> HoppyP.IO HoppyFC.CInt foreign import ccall "genpop__QStackedLayout_count" count' :: HoppyF.Ptr QStackedLayoutConst -> HoppyP.IO HoppyFC.CInt foreign import ccall "genpop__QStackedLayout_currentIndex" currentIndex' :: HoppyF.Ptr QStackedLayoutConst -> HoppyP.IO HoppyFC.CInt foreign import ccall "genpop__QStackedLayout_setCurrentIndex" setCurrentIndex' :: HoppyF.Ptr QStackedLayout -> HoppyFC.CInt -> HoppyP.IO () foreign import ccall "genpop__QStackedLayout_currentWidget" currentWidget' :: HoppyF.Ptr QStackedLayoutConst -> HoppyP.IO (HoppyF.Ptr M506.QWidget) foreign import ccall "genpop__QStackedLayout_setCurrentWidget" setCurrentWidget' :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr M506.QWidget -> HoppyP.IO () foreign import ccall "genpop__QStackedLayout_insertWidget" insertWidget' :: HoppyF.Ptr QStackedLayout -> HoppyFC.CInt -> HoppyF.Ptr M506.QWidget -> HoppyP.IO HoppyFC.CInt foreign import ccall "genpop__QStackedLayout_stackingMode" stackingMode' :: HoppyF.Ptr QStackedLayoutConst -> HoppyP.IO HoppyFC.CInt foreign import ccall "genpop__QStackedLayout_setStackingMode" setStackingMode' :: HoppyF.Ptr QStackedLayout -> HoppyFC.CInt -> HoppyP.IO () foreign import ccall "genpop__QStackedLayout_widget" widget' :: HoppyF.Ptr QStackedLayoutConst -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr M506.QWidget) foreign import ccall "genpop__QStackedLayout_emitCurrentChanged" emitCurrentChanged' :: HoppyF.Ptr QStackedLayout -> HoppyFC.CInt -> HoppyP.IO () foreign import ccall "genpop__QStackedLayout_emitWidgetRemoved" emitWidgetRemoved' :: HoppyF.Ptr QStackedLayout -> HoppyFC.CInt -> HoppyP.IO () foreign import ccall "gencast__QStackedLayout__QLayout" castQStackedLayoutToQLayout :: HoppyF.Ptr QStackedLayoutConst -> HoppyF.Ptr M432.QLayoutConst foreign import ccall "gencast__QLayout__QStackedLayout" castQLayoutToQStackedLayout :: HoppyF.Ptr M432.QLayoutConst -> HoppyF.Ptr QStackedLayoutConst foreign import ccall "gencast__QStackedLayout__QObject" castQStackedLayoutToQObject :: HoppyF.Ptr QStackedLayoutConst -> HoppyF.Ptr M94.QObjectConst foreign import ccall "gencast__QObject__QStackedLayout" castQObjectToQStackedLayout :: HoppyF.Ptr M94.QObjectConst -> HoppyF.Ptr QStackedLayoutConst foreign import ccall "gencast__QStackedLayout__QLayoutItem" castQStackedLayoutToQLayoutItem :: HoppyF.Ptr QStackedLayoutConst -> HoppyF.Ptr M434.QLayoutItemConst foreign import ccall "gencast__QLayoutItem__QStackedLayout" castQLayoutItemToQStackedLayout :: HoppyF.Ptr M434.QLayoutItemConst -> HoppyF.Ptr QStackedLayoutConst foreign import ccall "gendel__QStackedLayout" delete'QStackedLayout :: HoppyF.Ptr QStackedLayoutConst -> HoppyP.IO () foreign import ccall "&gendel__QStackedLayout" deletePtr'QStackedLayout :: HoppyF.FunPtr (HoppyF.Ptr QStackedLayoutConst -> HoppyP.IO ()) class QStackedLayoutValue a where withQStackedLayoutPtr :: a -> (QStackedLayoutConst -> HoppyP.IO b) -> HoppyP.IO b instance {-# OVERLAPPABLE #-} QStackedLayoutConstPtr a => QStackedLayoutValue a where withQStackedLayoutPtr = HoppyP.flip ($) . toQStackedLayoutConst class (M432.QLayoutConstPtr this) => QStackedLayoutConstPtr this where toQStackedLayoutConst :: this -> QStackedLayoutConst count :: (QStackedLayoutValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int) count arg'1 = withQStackedLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) =<< (count' arg'1') currentIndex :: (QStackedLayoutValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int) currentIndex arg'1 = withQStackedLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) =<< (currentIndex' arg'1') currentWidget :: (QStackedLayoutValue this) => (this) {- ^ this -} -> (HoppyP.IO M506.QWidget) currentWidget arg'1 = withQStackedLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> HoppyP.fmap M506.QWidget (currentWidget' arg'1') stackingMode :: (QStackedLayoutValue this) => (this) {- ^ this -} -> (HoppyP.IO QStackedLayoutStackingMode) stackingMode arg'1 = withQStackedLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.toCppEnum ) =<< (stackingMode' arg'1') widget :: (QStackedLayoutValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO M506.QWidget) widget arg'1 arg'2 = withQStackedLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> HoppyP.fmap M506.QWidget (widget' arg'1' arg'2') class (QStackedLayoutConstPtr this, M432.QLayoutPtr this) => QStackedLayoutPtr this where toQStackedLayout :: this -> QStackedLayout addWidget :: (QStackedLayoutPtr this, M506.QWidgetPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO HoppyP.Int) addWidget arg'1 arg'2 = HoppyFHR.withCppPtr (toQStackedLayout arg'1) $ \arg'1' -> HoppyFHR.withCppPtr (M506.toQWidget arg'2) $ \arg'2' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) =<< (addWidget' arg'1' arg'2') setCurrentIndex :: (QStackedLayoutPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ()) setCurrentIndex arg'1 arg'2 = HoppyFHR.withCppPtr (toQStackedLayout arg'1) $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> (setCurrentIndex' arg'1' arg'2') setCurrentWidget :: (QStackedLayoutPtr this, M506.QWidgetPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.IO ()) setCurrentWidget arg'1 arg'2 = HoppyFHR.withCppPtr (toQStackedLayout arg'1) $ \arg'1' -> HoppyFHR.withCppPtr (M506.toQWidget arg'2) $ \arg'2' -> (setCurrentWidget' arg'1' arg'2') insertWidget :: (QStackedLayoutPtr this, M506.QWidgetPtr arg'3) => (this) {- ^ this -} -> (HoppyP.Int) -> (arg'3) -> (HoppyP.IO HoppyP.Int) insertWidget arg'1 arg'2 arg'3 = HoppyFHR.withCppPtr (toQStackedLayout arg'1) $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> HoppyFHR.withCppPtr (M506.toQWidget arg'3) $ \arg'3' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) =<< (insertWidget' arg'1' arg'2' arg'3') setStackingMode :: (QStackedLayoutPtr this) => (this) {- ^ this -} -> (QStackedLayoutStackingMode) -> (HoppyP.IO ()) setStackingMode arg'1 arg'2 = HoppyFHR.withCppPtr (toQStackedLayout arg'1) $ \arg'1' -> ( HoppyP.return . HoppyFHR.fromCppEnum ) arg'2 >>= \arg'2' -> (setStackingMode' arg'1' arg'2') emitCurrentChanged :: (QStackedLayoutPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ()) emitCurrentChanged arg'1 arg'2 = HoppyFHR.withCppPtr (toQStackedLayout arg'1) $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> (emitCurrentChanged' arg'1' arg'2') emitWidgetRemoved :: (QStackedLayoutPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ()) emitWidgetRemoved arg'1 arg'2 = HoppyFHR.withCppPtr (toQStackedLayout arg'1) $ \arg'1' -> ( HoppyP.return . HoppyFHR.coerceIntegral ) arg'2 >>= \arg'2' -> (emitWidgetRemoved' arg'1' arg'2') data QStackedLayoutConst = QStackedLayoutConst (HoppyF.Ptr QStackedLayoutConst) | QStackedLayoutConstGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QStackedLayoutConst) deriving (HoppyP.Show) instance HoppyP.Eq QStackedLayoutConst where x == y = HoppyFHR.toPtr x == HoppyFHR.toPtr y instance HoppyP.Ord QStackedLayoutConst where compare x y = HoppyP.compare (HoppyFHR.toPtr x) (HoppyFHR.toPtr y) castQStackedLayoutToConst :: QStackedLayout -> QStackedLayoutConst castQStackedLayoutToConst (QStackedLayout ptr') = QStackedLayoutConst $ HoppyF.castPtr ptr' castQStackedLayoutToConst (QStackedLayoutGc fptr' ptr') = QStackedLayoutConstGc fptr' $ HoppyF.castPtr ptr' instance HoppyFHR.CppPtr QStackedLayoutConst where nullptr = QStackedLayoutConst HoppyF.nullPtr withCppPtr (QStackedLayoutConst ptr') f' = f' ptr' withCppPtr (QStackedLayoutConstGc fptr' ptr') f' = HoppyF.withForeignPtr fptr' $ \_ -> f' ptr' toPtr (QStackedLayoutConst ptr') = ptr' toPtr (QStackedLayoutConstGc _ ptr') = ptr' touchCppPtr (QStackedLayoutConst _) = HoppyP.return () touchCppPtr (QStackedLayoutConstGc fptr' _) = HoppyF.touchForeignPtr fptr' instance HoppyFHR.Deletable QStackedLayoutConst where delete (QStackedLayoutConst ptr') = delete'QStackedLayout ptr' delete (QStackedLayoutConstGc _ _) = HoppyP.fail $ HoppyP.concat ["Deletable.delete: Asked to delete a GC-managed ", "QStackedLayoutConst", " object."] toGc this'@(QStackedLayoutConst ptr') = if ptr' == HoppyF.nullPtr then HoppyP.return this' else HoppyP.fmap (HoppyP.flip QStackedLayoutConstGc ptr') $ HoppyF.newForeignPtr (HoppyF.castFunPtr deletePtr'QStackedLayout :: HoppyF.FunPtr (HoppyF.Ptr () -> HoppyP.IO ())) (HoppyF.castPtr ptr' :: HoppyF.Ptr ()) toGc this'@(QStackedLayoutConstGc {}) = HoppyP.return this' instance QStackedLayoutConstPtr QStackedLayoutConst where toQStackedLayoutConst = HoppyP.id instance M432.QLayoutConstPtr QStackedLayoutConst where toQLayoutConst (QStackedLayoutConst ptr') = M432.QLayoutConst $ castQStackedLayoutToQLayout ptr' toQLayoutConst (QStackedLayoutConstGc fptr' ptr') = M432.QLayoutConstGc fptr' $ castQStackedLayoutToQLayout ptr' instance M94.QObjectConstPtr QStackedLayoutConst where toQObjectConst (QStackedLayoutConst ptr') = M94.QObjectConst $ castQStackedLayoutToQObject ptr' toQObjectConst (QStackedLayoutConstGc fptr' ptr') = M94.QObjectConstGc fptr' $ castQStackedLayoutToQObject ptr' instance M434.QLayoutItemConstPtr QStackedLayoutConst where toQLayoutItemConst (QStackedLayoutConst ptr') = M434.QLayoutItemConst $ castQStackedLayoutToQLayoutItem ptr' toQLayoutItemConst (QStackedLayoutConstGc fptr' ptr') = M434.QLayoutItemConstGc fptr' $ castQStackedLayoutToQLayoutItem ptr' data QStackedLayout = QStackedLayout (HoppyF.Ptr QStackedLayout) | QStackedLayoutGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QStackedLayout) deriving (HoppyP.Show) instance HoppyP.Eq QStackedLayout where x == y = HoppyFHR.toPtr x == HoppyFHR.toPtr y instance HoppyP.Ord QStackedLayout where compare x y = HoppyP.compare (HoppyFHR.toPtr x) (HoppyFHR.toPtr y) castQStackedLayoutToNonconst :: QStackedLayoutConst -> QStackedLayout castQStackedLayoutToNonconst (QStackedLayoutConst ptr') = QStackedLayout $ HoppyF.castPtr ptr' castQStackedLayoutToNonconst (QStackedLayoutConstGc fptr' ptr') = QStackedLayoutGc fptr' $ HoppyF.castPtr ptr' instance HoppyFHR.CppPtr QStackedLayout where nullptr = QStackedLayout HoppyF.nullPtr withCppPtr (QStackedLayout ptr') f' = f' ptr' withCppPtr (QStackedLayoutGc fptr' ptr') f' = HoppyF.withForeignPtr fptr' $ \_ -> f' ptr' toPtr (QStackedLayout ptr') = ptr' toPtr (QStackedLayoutGc _ ptr') = ptr' touchCppPtr (QStackedLayout _) = HoppyP.return () touchCppPtr (QStackedLayoutGc fptr' _) = HoppyF.touchForeignPtr fptr' instance HoppyFHR.Deletable QStackedLayout where delete (QStackedLayout ptr') = delete'QStackedLayout $ (HoppyF.castPtr ptr' :: HoppyF.Ptr QStackedLayoutConst) delete (QStackedLayoutGc _ _) = HoppyP.fail $ HoppyP.concat ["Deletable.delete: Asked to delete a GC-managed ", "QStackedLayout", " object."] toGc this'@(QStackedLayout ptr') = if ptr' == HoppyF.nullPtr then HoppyP.return this' else HoppyP.fmap (HoppyP.flip QStackedLayoutGc ptr') $ HoppyF.newForeignPtr (HoppyF.castFunPtr deletePtr'QStackedLayout :: HoppyF.FunPtr (HoppyF.Ptr () -> HoppyP.IO ())) (HoppyF.castPtr ptr' :: HoppyF.Ptr ()) toGc this'@(QStackedLayoutGc {}) = HoppyP.return this' instance QStackedLayoutConstPtr QStackedLayout where toQStackedLayoutConst (QStackedLayout ptr') = QStackedLayoutConst $ (HoppyF.castPtr :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr QStackedLayoutConst) ptr' toQStackedLayoutConst (QStackedLayoutGc fptr' ptr') = QStackedLayoutConstGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr QStackedLayoutConst) ptr' instance QStackedLayoutPtr QStackedLayout where toQStackedLayout = HoppyP.id instance M432.QLayoutConstPtr QStackedLayout where toQLayoutConst (QStackedLayout ptr') = M432.QLayoutConst $ castQStackedLayoutToQLayout $ (HoppyF.castPtr :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr QStackedLayoutConst) ptr' toQLayoutConst (QStackedLayoutGc fptr' ptr') = M432.QLayoutConstGc fptr' $ castQStackedLayoutToQLayout $ (HoppyF.castPtr :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr QStackedLayoutConst) ptr' instance M432.QLayoutPtr QStackedLayout where toQLayout (QStackedLayout ptr') = M432.QLayout $ (HoppyF.castPtr :: HoppyF.Ptr M432.QLayoutConst -> HoppyF.Ptr M432.QLayout) $ castQStackedLayoutToQLayout $ (HoppyF.castPtr :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr QStackedLayoutConst) ptr' toQLayout (QStackedLayoutGc fptr' ptr') = M432.QLayoutGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr M432.QLayoutConst -> HoppyF.Ptr M432.QLayout) $ castQStackedLayoutToQLayout $ (HoppyF.castPtr :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr QStackedLayoutConst) ptr' instance M94.QObjectConstPtr QStackedLayout where toQObjectConst (QStackedLayout ptr') = M94.QObjectConst $ castQStackedLayoutToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr QStackedLayoutConst) ptr' toQObjectConst (QStackedLayoutGc fptr' ptr') = M94.QObjectConstGc fptr' $ castQStackedLayoutToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr QStackedLayoutConst) ptr' instance M94.QObjectPtr QStackedLayout where toQObject (QStackedLayout ptr') = M94.QObject $ (HoppyF.castPtr :: HoppyF.Ptr M94.QObjectConst -> HoppyF.Ptr M94.QObject) $ castQStackedLayoutToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr QStackedLayoutConst) ptr' toQObject (QStackedLayoutGc fptr' ptr') = M94.QObjectGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr M94.QObjectConst -> HoppyF.Ptr M94.QObject) $ castQStackedLayoutToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr QStackedLayoutConst) ptr' instance M434.QLayoutItemConstPtr QStackedLayout where toQLayoutItemConst (QStackedLayout ptr') = M434.QLayoutItemConst $ castQStackedLayoutToQLayoutItem $ (HoppyF.castPtr :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr QStackedLayoutConst) ptr' toQLayoutItemConst (QStackedLayoutGc fptr' ptr') = M434.QLayoutItemConstGc fptr' $ castQStackedLayoutToQLayoutItem $ (HoppyF.castPtr :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr QStackedLayoutConst) ptr' instance M434.QLayoutItemPtr QStackedLayout where toQLayoutItem (QStackedLayout ptr') = M434.QLayoutItem $ (HoppyF.castPtr :: HoppyF.Ptr M434.QLayoutItemConst -> HoppyF.Ptr M434.QLayoutItem) $ castQStackedLayoutToQLayoutItem $ (HoppyF.castPtr :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr QStackedLayoutConst) ptr' toQLayoutItem (QStackedLayoutGc fptr' ptr') = M434.QLayoutItemGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr M434.QLayoutItemConst -> HoppyF.Ptr M434.QLayoutItem) $ castQStackedLayoutToQLayoutItem $ (HoppyF.castPtr :: HoppyF.Ptr QStackedLayout -> HoppyF.Ptr QStackedLayoutConst) ptr' new :: (HoppyP.IO QStackedLayout) new = HoppyP.fmap QStackedLayout (new') newWithParent :: (M506.QWidgetPtr arg'1) => (arg'1) -> (HoppyP.IO QStackedLayout) newWithParent arg'1 = HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' -> HoppyP.fmap QStackedLayout (newWithParent' arg'1') newWithLayout :: (M432.QLayoutPtr arg'1) => (arg'1) -> (HoppyP.IO QStackedLayout) newWithLayout arg'1 = HoppyFHR.withCppPtr (M432.toQLayout arg'1) $ \arg'1' -> HoppyP.fmap QStackedLayout (newWithLayout' arg'1') class QStackedLayoutSuper a where downToQStackedLayout :: a -> QStackedLayout instance QStackedLayoutSuper M432.QLayout where downToQStackedLayout = castQStackedLayoutToNonconst . cast' . M432.castQLayoutToConst where cast' (M432.QLayoutConst ptr') = QStackedLayoutConst $ castQLayoutToQStackedLayout ptr' cast' (M432.QLayoutConstGc fptr' ptr') = QStackedLayoutConstGc fptr' $ castQLayoutToQStackedLayout ptr' instance QStackedLayoutSuper M94.QObject where downToQStackedLayout = castQStackedLayoutToNonconst . cast' . M94.castQObjectToConst where cast' (M94.QObjectConst ptr') = QStackedLayoutConst $ castQObjectToQStackedLayout ptr' cast' (M94.QObjectConstGc fptr' ptr') = QStackedLayoutConstGc fptr' $ castQObjectToQStackedLayout ptr' instance QStackedLayoutSuper M434.QLayoutItem where downToQStackedLayout = castQStackedLayoutToNonconst . cast' . M434.castQLayoutItemToConst where cast' (M434.QLayoutItemConst ptr') = QStackedLayoutConst $ castQLayoutItemToQStackedLayout ptr' cast' (M434.QLayoutItemConstGc fptr' ptr') = QStackedLayoutConstGc fptr' $ castQLayoutItemToQStackedLayout ptr' class QStackedLayoutSuperConst a where downToQStackedLayoutConst :: a -> QStackedLayoutConst instance QStackedLayoutSuperConst M432.QLayoutConst where downToQStackedLayoutConst = cast' where cast' (M432.QLayoutConst ptr') = QStackedLayoutConst $ castQLayoutToQStackedLayout ptr' cast' (M432.QLayoutConstGc fptr' ptr') = QStackedLayoutConstGc fptr' $ castQLayoutToQStackedLayout ptr' instance QStackedLayoutSuperConst M94.QObjectConst where downToQStackedLayoutConst = cast' where cast' (M94.QObjectConst ptr') = QStackedLayoutConst $ castQObjectToQStackedLayout ptr' cast' (M94.QObjectConstGc fptr' ptr') = QStackedLayoutConstGc fptr' $ castQObjectToQStackedLayout ptr' instance QStackedLayoutSuperConst M434.QLayoutItemConst where downToQStackedLayoutConst = cast' where cast' (M434.QLayoutItemConst ptr') = QStackedLayoutConst $ castQLayoutItemToQStackedLayout ptr' cast' (M434.QLayoutItemConstGc fptr' ptr') = QStackedLayoutConstGc fptr' $ castQLayoutItemToQStackedLayout ptr' instance HoppyFHR.Assignable (HoppyF.Ptr (HoppyF.Ptr QStackedLayout)) QStackedLayout where assign ptr' value' = HoppyF.poke ptr' $ HoppyFHR.toPtr value' instance HoppyFHR.Decodable (HoppyF.Ptr (HoppyF.Ptr QStackedLayout)) QStackedLayout where decode = HoppyP.fmap QStackedLayout . HoppyF.peek data QStackedLayoutStackingMode = StackOne | StackAll | UnknownQStackedLayoutStackingMode (HoppyFC.CInt) deriving (HoppyP.Show) instance HoppyFHR.CppEnum (HoppyFC.CInt) QStackedLayoutStackingMode where fromCppEnum StackOne = 0 fromCppEnum StackAll = 1 fromCppEnum (UnknownQStackedLayoutStackingMode n) = n toCppEnum (0) = StackOne toCppEnum (1) = StackAll toCppEnum n = UnknownQStackedLayoutStackingMode n instance HoppyP.Eq QStackedLayoutStackingMode where x == y = HoppyFHR.fromCppEnum x == HoppyFHR.fromCppEnum y instance HoppyP.Ord QStackedLayoutStackingMode where compare x y = HoppyP.compare (HoppyFHR.fromCppEnum x) (HoppyFHR.fromCppEnum y)