qtah-qt5-0.8.0: src/Graphics/UI/Qtah/Generated/Widgets/QGridLayout.hs
{-# LANGUAGE FlexibleContexts, FlexibleInstances, ForeignFunctionInterface, MonoLocalBinds, MultiParamTypeClasses, ScopedTypeVariables, TypeSynonymInstances, UndecidableInstances #-}
---------- GENERATED FILE, EDITS WILL BE LOST ----------
module Graphics.UI.Qtah.Generated.Widgets.QGridLayout (
castQGridLayoutToQLayout,
castQLayoutToQGridLayout,
castQGridLayoutToQObject,
castQObjectToQGridLayout,
castQGridLayoutToQLayoutItem,
castQLayoutItemToQGridLayout,
QGridLayoutValue (..),
QGridLayoutConstPtr (..),
cellRect,
columnCount,
columnMinimumWidth,
columnStretch,
getItemRow,
getItemColumn,
getItemRowSpan,
getItemColumnSpan,
horizontalSpacing,
itemAtPosition,
originCorner,
rowCount,
rowMinimumHeight,
rowStretch,
spacing,
verticalSpacing,
QGridLayoutPtr (..),
addItem,
addItemWithSpan,
addItemWithSpanAndAlignment,
addLayout,
addLayoutWithSpan,
addLayoutWithSpanAndAlignment,
addWidget,
addWidgetWithSpan,
addWidgetWithSpanAndAlignment,
setHorizontalSpacing,
setOriginCorner,
setColumnMinimumWidth,
setColumnStretch,
setRowMinimumHeight,
setRowStretch,
setVerticalSpacing,
QGridLayoutConst (..),
castQGridLayoutToConst,
QGridLayout (..),
castQGridLayoutToNonconst,
new,
newWithParent,
QGridLayoutSuper (..),
QGridLayoutSuperConst (..),
) where
import qualified Foreign as HoppyF
import qualified Foreign.C as HoppyFC
import qualified Foreign.Hoppy.Runtime as HoppyFHR
import qualified Graphics.UI.Qtah.Core.HRect as HRect
import qualified Graphics.UI.Qtah.Flags as QtahFlags
import qualified Graphics.UI.Qtah.Generated.Core.QObject as M94
import qualified Graphics.UI.Qtah.Generated.Core.QRect as M122
import qualified Graphics.UI.Qtah.Generated.Core.Types as M190
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
import qualified Prelude as QtahP
foreign import ccall "genpop__QGridLayout_new" new' :: HoppyP.IO (HoppyF.Ptr QGridLayout)
foreign import ccall "genpop__QGridLayout_newWithParent" newWithParent' :: HoppyF.Ptr M506.QWidget -> HoppyP.IO (HoppyF.Ptr QGridLayout)
foreign import ccall "genpop__QGridLayout_addItem" addItem' :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr M434.QLayoutItem -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_addItemWithSpan" addItemWithSpan' :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr M434.QLayoutItem -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_addItemWithSpanAndAlignment" addItemWithSpanAndAlignment' :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr M434.QLayoutItem -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_addLayout" addLayout' :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr M432.QLayout -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_addLayoutWithSpan" addLayoutWithSpan' :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr M432.QLayout -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_addLayoutWithSpanAndAlignment" addLayoutWithSpanAndAlignment' :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr M432.QLayout -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_addWidget" addWidget' :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr M506.QWidget -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_addWidgetWithSpan" addWidgetWithSpan' :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr M506.QWidget -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_addWidgetWithSpanAndAlignment" addWidgetWithSpanAndAlignment' :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr M506.QWidget -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_cellRect" cellRect' :: HoppyF.Ptr QGridLayoutConst -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr M122.QRectConst)
foreign import ccall "genpop__QGridLayout_columnCount" columnCount' :: HoppyF.Ptr QGridLayoutConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QGridLayout_columnMinimumWidth" columnMinimumWidth' :: HoppyF.Ptr QGridLayoutConst -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QGridLayout_columnStretch" columnStretch' :: HoppyF.Ptr QGridLayoutConst -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QGridLayout_getItemRow" getItemRow' :: HoppyF.Ptr QGridLayoutConst -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QGridLayout_getItemColumn" getItemColumn' :: HoppyF.Ptr QGridLayoutConst -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QGridLayout_getItemRowSpan" getItemRowSpan' :: HoppyF.Ptr QGridLayoutConst -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QGridLayout_getItemColumnSpan" getItemColumnSpan' :: HoppyF.Ptr QGridLayoutConst -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QGridLayout_horizontalSpacing" horizontalSpacing' :: HoppyF.Ptr QGridLayoutConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QGridLayout_setHorizontalSpacing" setHorizontalSpacing' :: HoppyF.Ptr QGridLayout -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_itemAtPosition" itemAtPosition' :: HoppyF.Ptr QGridLayoutConst -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO (HoppyF.Ptr M434.QLayoutItem)
foreign import ccall "genpop__QGridLayout_originCorner" originCorner' :: HoppyF.Ptr QGridLayoutConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QGridLayout_setOriginCorner" setOriginCorner' :: HoppyF.Ptr QGridLayout -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_rowCount" rowCount' :: HoppyF.Ptr QGridLayoutConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QGridLayout_rowMinimumHeight" rowMinimumHeight' :: HoppyF.Ptr QGridLayoutConst -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QGridLayout_rowStretch" rowStretch' :: HoppyF.Ptr QGridLayoutConst -> HoppyFC.CInt -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QGridLayout_setColumnMinimumWidth" setColumnMinimumWidth' :: HoppyF.Ptr QGridLayout -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_setColumnStretch" setColumnStretch' :: HoppyF.Ptr QGridLayout -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_setRowMinimumHeight" setRowMinimumHeight' :: HoppyF.Ptr QGridLayout -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_setRowStretch" setRowStretch' :: HoppyF.Ptr QGridLayout -> HoppyFC.CInt -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "genpop__QGridLayout_spacing" spacing' :: HoppyF.Ptr QGridLayoutConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QGridLayout_verticalSpacing" verticalSpacing' :: HoppyF.Ptr QGridLayoutConst -> HoppyP.IO HoppyFC.CInt
foreign import ccall "genpop__QGridLayout_setVerticalSpacing" setVerticalSpacing' :: HoppyF.Ptr QGridLayout -> HoppyFC.CInt -> HoppyP.IO ()
foreign import ccall "gencast__QGridLayout__QLayout" castQGridLayoutToQLayout :: HoppyF.Ptr QGridLayoutConst -> HoppyF.Ptr M432.QLayoutConst
foreign import ccall "gencast__QLayout__QGridLayout" castQLayoutToQGridLayout :: HoppyF.Ptr M432.QLayoutConst -> HoppyF.Ptr QGridLayoutConst
foreign import ccall "gencast__QGridLayout__QObject" castQGridLayoutToQObject :: HoppyF.Ptr QGridLayoutConst -> HoppyF.Ptr M94.QObjectConst
foreign import ccall "gencast__QObject__QGridLayout" castQObjectToQGridLayout :: HoppyF.Ptr M94.QObjectConst -> HoppyF.Ptr QGridLayoutConst
foreign import ccall "gencast__QGridLayout__QLayoutItem" castQGridLayoutToQLayoutItem :: HoppyF.Ptr QGridLayoutConst -> HoppyF.Ptr M434.QLayoutItemConst
foreign import ccall "gencast__QLayoutItem__QGridLayout" castQLayoutItemToQGridLayout :: HoppyF.Ptr M434.QLayoutItemConst -> HoppyF.Ptr QGridLayoutConst
foreign import ccall "gendel__QGridLayout" delete'QGridLayout :: HoppyF.Ptr QGridLayoutConst -> HoppyP.IO ()
foreign import ccall "&gendel__QGridLayout" deletePtr'QGridLayout :: HoppyF.FunPtr (HoppyF.Ptr QGridLayoutConst -> HoppyP.IO ())
class QGridLayoutValue a where
withQGridLayoutPtr :: a -> (QGridLayoutConst -> HoppyP.IO b) -> HoppyP.IO b
instance {-# OVERLAPPABLE #-} QGridLayoutConstPtr a => QGridLayoutValue a where
withQGridLayoutPtr = HoppyP.flip ($) . toQGridLayoutConst
class (M432.QLayoutConstPtr this) => QGridLayoutConstPtr this where
toQGridLayoutConst :: this -> QGridLayoutConst
cellRect :: (QGridLayoutValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO HRect.HRect)
cellRect arg'1 arg'2 arg'3 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(HoppyFHR.decodeAndDelete . M122.QRectConst) =<<
(cellRect' arg'1' arg'2' arg'3')
columnCount :: (QGridLayoutValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int)
columnCount arg'1 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(columnCount' arg'1')
columnMinimumWidth :: (QGridLayoutValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO HoppyP.Int)
columnMinimumWidth arg'1 arg'2 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(columnMinimumWidth' arg'1' arg'2')
columnStretch :: (QGridLayoutValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO HoppyP.Int)
columnStretch arg'1 arg'2 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(columnStretch' arg'1' arg'2')
getItemRow :: (QGridLayoutValue arg'1) => (arg'1) -> (HoppyP.Int) -> (HoppyP.IO HoppyP.Int)
getItemRow arg'1 arg'2 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(getItemRow' arg'1' arg'2')
getItemColumn :: (QGridLayoutValue arg'1) => (arg'1) -> (HoppyP.Int) -> (HoppyP.IO HoppyP.Int)
getItemColumn arg'1 arg'2 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(getItemColumn' arg'1' arg'2')
getItemRowSpan :: (QGridLayoutValue arg'1) => (arg'1) -> (HoppyP.Int) -> (HoppyP.IO HoppyP.Int)
getItemRowSpan arg'1 arg'2 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(getItemRowSpan' arg'1' arg'2')
getItemColumnSpan :: (QGridLayoutValue arg'1) => (arg'1) -> (HoppyP.Int) -> (HoppyP.IO HoppyP.Int)
getItemColumnSpan arg'1 arg'2 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(getItemColumnSpan' arg'1' arg'2')
horizontalSpacing :: (QGridLayoutValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int)
horizontalSpacing arg'1 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(horizontalSpacing' arg'1')
itemAtPosition :: (QGridLayoutValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO M434.QLayoutItem)
itemAtPosition arg'1 arg'2 arg'3 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
HoppyP.fmap M434.QLayoutItem
(itemAtPosition' arg'1' arg'2' arg'3')
originCorner :: (QGridLayoutValue this) => (this) {- ^ this -} -> (HoppyP.IO M190.QtCorner)
originCorner arg'1 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.toCppEnum
) =<<
(originCorner' arg'1')
rowCount :: (QGridLayoutValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int)
rowCount arg'1 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(rowCount' arg'1')
rowMinimumHeight :: (QGridLayoutValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO HoppyP.Int)
rowMinimumHeight arg'1 arg'2 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(rowMinimumHeight' arg'1' arg'2')
rowStretch :: (QGridLayoutValue this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO HoppyP.Int)
rowStretch arg'1 arg'2 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(rowStretch' arg'1' arg'2')
spacing :: (QGridLayoutValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int)
spacing arg'1 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(spacing' arg'1')
verticalSpacing :: (QGridLayoutValue this) => (this) {- ^ this -} -> (HoppyP.IO HoppyP.Int)
verticalSpacing arg'1 =
withQGridLayoutPtr arg'1 $ HoppyP.flip HoppyFHR.withCppPtr $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) =<<
(verticalSpacing' arg'1')
class (QGridLayoutConstPtr this, M432.QLayoutPtr this) => QGridLayoutPtr this where
toQGridLayout :: this -> QGridLayout
addItem :: (QGridLayoutPtr this, M434.QLayoutItemPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO ())
addItem arg'1 arg'2 arg'3 arg'4 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
HoppyFHR.withCppPtr (M434.toQLayoutItem arg'2) $ \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'4 >>= \arg'4' ->
(addItem' arg'1' arg'2' arg'3' arg'4')
addItemWithSpan :: (QGridLayoutPtr this, M434.QLayoutItemPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO ())
addItemWithSpan arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
HoppyFHR.withCppPtr (M434.toQLayoutItem arg'2) $ \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'4 >>= \arg'4' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'5 >>= \arg'5' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'6 >>= \arg'6' ->
(addItemWithSpan' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6')
addItemWithSpanAndAlignment :: (QGridLayoutPtr this, M434.QLayoutItemPtr arg'2, M190.IsQtAlignment arg'7) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (arg'7) -> (HoppyP.IO ())
addItemWithSpanAndAlignment arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 arg'7 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
HoppyFHR.withCppPtr (M434.toQLayoutItem arg'2) $ \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'4 >>= \arg'4' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'5 >>= \arg'5' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'6 >>= \arg'6' ->
(
QtahP.return . QtahFlags.flagsToNum . M190.toQtAlignment
) arg'7 >>= \arg'7' ->
(addItemWithSpanAndAlignment' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6' arg'7')
addLayout :: (QGridLayoutPtr this, M432.QLayoutPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO ())
addLayout arg'1 arg'2 arg'3 arg'4 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
HoppyFHR.withCppPtr (M432.toQLayout arg'2) $ \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'4 >>= \arg'4' ->
(addLayout' arg'1' arg'2' arg'3' arg'4')
addLayoutWithSpan :: (QGridLayoutPtr this, M432.QLayoutPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO ())
addLayoutWithSpan arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
HoppyFHR.withCppPtr (M432.toQLayout arg'2) $ \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'4 >>= \arg'4' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'5 >>= \arg'5' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'6 >>= \arg'6' ->
(addLayoutWithSpan' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6')
addLayoutWithSpanAndAlignment :: (QGridLayoutPtr this, M432.QLayoutPtr arg'2, M190.IsQtAlignment arg'7) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (arg'7) -> (HoppyP.IO ())
addLayoutWithSpanAndAlignment arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 arg'7 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
HoppyFHR.withCppPtr (M432.toQLayout arg'2) $ \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'4 >>= \arg'4' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'5 >>= \arg'5' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'6 >>= \arg'6' ->
(
QtahP.return . QtahFlags.flagsToNum . M190.toQtAlignment
) arg'7 >>= \arg'7' ->
(addLayoutWithSpanAndAlignment' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6' arg'7')
addWidget :: (QGridLayoutPtr this, M506.QWidgetPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO ())
addWidget arg'1 arg'2 arg'3 arg'4 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
HoppyFHR.withCppPtr (M506.toQWidget arg'2) $ \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'4 >>= \arg'4' ->
(addWidget' arg'1' arg'2' arg'3' arg'4')
addWidgetWithSpan :: (QGridLayoutPtr this, M506.QWidgetPtr arg'2) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO ())
addWidgetWithSpan arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
HoppyFHR.withCppPtr (M506.toQWidget arg'2) $ \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'4 >>= \arg'4' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'5 >>= \arg'5' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'6 >>= \arg'6' ->
(addWidgetWithSpan' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6')
addWidgetWithSpanAndAlignment :: (QGridLayoutPtr this, M506.QWidgetPtr arg'2, M190.IsQtAlignment arg'7) => (this) {- ^ this -} -> (arg'2) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.Int) -> (arg'7) -> (HoppyP.IO ())
addWidgetWithSpanAndAlignment arg'1 arg'2 arg'3 arg'4 arg'5 arg'6 arg'7 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
HoppyFHR.withCppPtr (M506.toQWidget arg'2) $ \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'4 >>= \arg'4' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'5 >>= \arg'5' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'6 >>= \arg'6' ->
(
QtahP.return . QtahFlags.flagsToNum . M190.toQtAlignment
) arg'7 >>= \arg'7' ->
(addWidgetWithSpanAndAlignment' arg'1' arg'2' arg'3' arg'4' arg'5' arg'6' arg'7')
setHorizontalSpacing :: (QGridLayoutPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ())
setHorizontalSpacing arg'1 arg'2 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(setHorizontalSpacing' arg'1' arg'2')
setOriginCorner :: (QGridLayoutPtr this) => (this) {- ^ this -} -> (M190.QtCorner) -> (HoppyP.IO ())
setOriginCorner arg'1 arg'2 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.fromCppEnum
) arg'2 >>= \arg'2' ->
(setOriginCorner' arg'1' arg'2')
setColumnMinimumWidth :: (QGridLayoutPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO ())
setColumnMinimumWidth arg'1 arg'2 arg'3 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(setColumnMinimumWidth' arg'1' arg'2' arg'3')
setColumnStretch :: (QGridLayoutPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO ())
setColumnStretch arg'1 arg'2 arg'3 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(setColumnStretch' arg'1' arg'2' arg'3')
setRowMinimumHeight :: (QGridLayoutPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO ())
setRowMinimumHeight arg'1 arg'2 arg'3 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(setRowMinimumHeight' arg'1' arg'2' arg'3')
setRowStretch :: (QGridLayoutPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.Int) -> (HoppyP.IO ())
setRowStretch arg'1 arg'2 arg'3 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'3 >>= \arg'3' ->
(setRowStretch' arg'1' arg'2' arg'3')
setVerticalSpacing :: (QGridLayoutPtr this) => (this) {- ^ this -} -> (HoppyP.Int) -> (HoppyP.IO ())
setVerticalSpacing arg'1 arg'2 =
HoppyFHR.withCppPtr (toQGridLayout arg'1) $ \arg'1' ->
(
HoppyP.return . HoppyFHR.coerceIntegral
) arg'2 >>= \arg'2' ->
(setVerticalSpacing' arg'1' arg'2')
data QGridLayoutConst =
QGridLayoutConst (HoppyF.Ptr QGridLayoutConst)
| QGridLayoutConstGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QGridLayoutConst)
deriving (HoppyP.Show)
instance HoppyP.Eq QGridLayoutConst where
x == y = HoppyFHR.toPtr x == HoppyFHR.toPtr y
instance HoppyP.Ord QGridLayoutConst where
compare x y = HoppyP.compare (HoppyFHR.toPtr x) (HoppyFHR.toPtr y)
castQGridLayoutToConst :: QGridLayout -> QGridLayoutConst
castQGridLayoutToConst (QGridLayout ptr') = QGridLayoutConst $ HoppyF.castPtr ptr'
castQGridLayoutToConst (QGridLayoutGc fptr' ptr') = QGridLayoutConstGc fptr' $ HoppyF.castPtr ptr'
instance HoppyFHR.CppPtr QGridLayoutConst where
nullptr = QGridLayoutConst HoppyF.nullPtr
withCppPtr (QGridLayoutConst ptr') f' = f' ptr'
withCppPtr (QGridLayoutConstGc fptr' ptr') f' = HoppyF.withForeignPtr fptr' $ \_ -> f' ptr'
toPtr (QGridLayoutConst ptr') = ptr'
toPtr (QGridLayoutConstGc _ ptr') = ptr'
touchCppPtr (QGridLayoutConst _) = HoppyP.return ()
touchCppPtr (QGridLayoutConstGc fptr' _) = HoppyF.touchForeignPtr fptr'
instance HoppyFHR.Deletable QGridLayoutConst where
delete (QGridLayoutConst ptr') = delete'QGridLayout ptr'
delete (QGridLayoutConstGc _ _) = HoppyP.fail $ HoppyP.concat ["Deletable.delete: Asked to delete a GC-managed ", "QGridLayoutConst", " object."]
toGc this'@(QGridLayoutConst ptr') = if ptr' == HoppyF.nullPtr then HoppyP.return this' else HoppyP.fmap (HoppyP.flip QGridLayoutConstGc ptr') $ HoppyF.newForeignPtr (HoppyF.castFunPtr deletePtr'QGridLayout :: HoppyF.FunPtr (HoppyF.Ptr () -> HoppyP.IO ())) (HoppyF.castPtr ptr' :: HoppyF.Ptr ())
toGc this'@(QGridLayoutConstGc {}) = HoppyP.return this'
instance QGridLayoutConstPtr QGridLayoutConst where
toQGridLayoutConst = HoppyP.id
instance M432.QLayoutConstPtr QGridLayoutConst where
toQLayoutConst (QGridLayoutConst ptr') = M432.QLayoutConst $ castQGridLayoutToQLayout ptr'
toQLayoutConst (QGridLayoutConstGc fptr' ptr') = M432.QLayoutConstGc fptr' $ castQGridLayoutToQLayout ptr'
instance M94.QObjectConstPtr QGridLayoutConst where
toQObjectConst (QGridLayoutConst ptr') = M94.QObjectConst $ castQGridLayoutToQObject ptr'
toQObjectConst (QGridLayoutConstGc fptr' ptr') = M94.QObjectConstGc fptr' $ castQGridLayoutToQObject ptr'
instance M434.QLayoutItemConstPtr QGridLayoutConst where
toQLayoutItemConst (QGridLayoutConst ptr') = M434.QLayoutItemConst $ castQGridLayoutToQLayoutItem ptr'
toQLayoutItemConst (QGridLayoutConstGc fptr' ptr') = M434.QLayoutItemConstGc fptr' $ castQGridLayoutToQLayoutItem ptr'
data QGridLayout =
QGridLayout (HoppyF.Ptr QGridLayout)
| QGridLayoutGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QGridLayout)
deriving (HoppyP.Show)
instance HoppyP.Eq QGridLayout where
x == y = HoppyFHR.toPtr x == HoppyFHR.toPtr y
instance HoppyP.Ord QGridLayout where
compare x y = HoppyP.compare (HoppyFHR.toPtr x) (HoppyFHR.toPtr y)
castQGridLayoutToNonconst :: QGridLayoutConst -> QGridLayout
castQGridLayoutToNonconst (QGridLayoutConst ptr') = QGridLayout $ HoppyF.castPtr ptr'
castQGridLayoutToNonconst (QGridLayoutConstGc fptr' ptr') = QGridLayoutGc fptr' $ HoppyF.castPtr ptr'
instance HoppyFHR.CppPtr QGridLayout where
nullptr = QGridLayout HoppyF.nullPtr
withCppPtr (QGridLayout ptr') f' = f' ptr'
withCppPtr (QGridLayoutGc fptr' ptr') f' = HoppyF.withForeignPtr fptr' $ \_ -> f' ptr'
toPtr (QGridLayout ptr') = ptr'
toPtr (QGridLayoutGc _ ptr') = ptr'
touchCppPtr (QGridLayout _) = HoppyP.return ()
touchCppPtr (QGridLayoutGc fptr' _) = HoppyF.touchForeignPtr fptr'
instance HoppyFHR.Deletable QGridLayout where
delete (QGridLayout ptr') = delete'QGridLayout $ (HoppyF.castPtr ptr' :: HoppyF.Ptr QGridLayoutConst)
delete (QGridLayoutGc _ _) = HoppyP.fail $ HoppyP.concat ["Deletable.delete: Asked to delete a GC-managed ", "QGridLayout", " object."]
toGc this'@(QGridLayout ptr') = if ptr' == HoppyF.nullPtr then HoppyP.return this' else HoppyP.fmap (HoppyP.flip QGridLayoutGc ptr') $ HoppyF.newForeignPtr (HoppyF.castFunPtr deletePtr'QGridLayout :: HoppyF.FunPtr (HoppyF.Ptr () -> HoppyP.IO ())) (HoppyF.castPtr ptr' :: HoppyF.Ptr ())
toGc this'@(QGridLayoutGc {}) = HoppyP.return this'
instance QGridLayoutConstPtr QGridLayout where
toQGridLayoutConst (QGridLayout ptr') = QGridLayoutConst $ (HoppyF.castPtr :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr QGridLayoutConst) ptr'
toQGridLayoutConst (QGridLayoutGc fptr' ptr') = QGridLayoutConstGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr QGridLayoutConst) ptr'
instance QGridLayoutPtr QGridLayout where
toQGridLayout = HoppyP.id
instance M432.QLayoutConstPtr QGridLayout where
toQLayoutConst (QGridLayout ptr') = M432.QLayoutConst $ castQGridLayoutToQLayout $ (HoppyF.castPtr :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr QGridLayoutConst) ptr'
toQLayoutConst (QGridLayoutGc fptr' ptr') = M432.QLayoutConstGc fptr' $ castQGridLayoutToQLayout $ (HoppyF.castPtr :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr QGridLayoutConst) ptr'
instance M432.QLayoutPtr QGridLayout where
toQLayout (QGridLayout ptr') = M432.QLayout $ (HoppyF.castPtr :: HoppyF.Ptr M432.QLayoutConst -> HoppyF.Ptr M432.QLayout) $ castQGridLayoutToQLayout $ (HoppyF.castPtr :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr QGridLayoutConst) ptr'
toQLayout (QGridLayoutGc fptr' ptr') = M432.QLayoutGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr M432.QLayoutConst -> HoppyF.Ptr M432.QLayout) $ castQGridLayoutToQLayout $ (HoppyF.castPtr :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr QGridLayoutConst) ptr'
instance M94.QObjectConstPtr QGridLayout where
toQObjectConst (QGridLayout ptr') = M94.QObjectConst $ castQGridLayoutToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr QGridLayoutConst) ptr'
toQObjectConst (QGridLayoutGc fptr' ptr') = M94.QObjectConstGc fptr' $ castQGridLayoutToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr QGridLayoutConst) ptr'
instance M94.QObjectPtr QGridLayout where
toQObject (QGridLayout ptr') = M94.QObject $ (HoppyF.castPtr :: HoppyF.Ptr M94.QObjectConst -> HoppyF.Ptr M94.QObject) $ castQGridLayoutToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr QGridLayoutConst) ptr'
toQObject (QGridLayoutGc fptr' ptr') = M94.QObjectGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr M94.QObjectConst -> HoppyF.Ptr M94.QObject) $ castQGridLayoutToQObject $ (HoppyF.castPtr :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr QGridLayoutConst) ptr'
instance M434.QLayoutItemConstPtr QGridLayout where
toQLayoutItemConst (QGridLayout ptr') = M434.QLayoutItemConst $ castQGridLayoutToQLayoutItem $ (HoppyF.castPtr :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr QGridLayoutConst) ptr'
toQLayoutItemConst (QGridLayoutGc fptr' ptr') = M434.QLayoutItemConstGc fptr' $ castQGridLayoutToQLayoutItem $ (HoppyF.castPtr :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr QGridLayoutConst) ptr'
instance M434.QLayoutItemPtr QGridLayout where
toQLayoutItem (QGridLayout ptr') = M434.QLayoutItem $ (HoppyF.castPtr :: HoppyF.Ptr M434.QLayoutItemConst -> HoppyF.Ptr M434.QLayoutItem) $ castQGridLayoutToQLayoutItem $ (HoppyF.castPtr :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr QGridLayoutConst) ptr'
toQLayoutItem (QGridLayoutGc fptr' ptr') = M434.QLayoutItemGc fptr' $ (HoppyF.castPtr :: HoppyF.Ptr M434.QLayoutItemConst -> HoppyF.Ptr M434.QLayoutItem) $ castQGridLayoutToQLayoutItem $ (HoppyF.castPtr :: HoppyF.Ptr QGridLayout -> HoppyF.Ptr QGridLayoutConst) ptr'
new :: (HoppyP.IO QGridLayout)
new =
HoppyP.fmap QGridLayout
(new')
newWithParent :: (M506.QWidgetPtr arg'1) => (arg'1) -> (HoppyP.IO QGridLayout)
newWithParent arg'1 =
HoppyFHR.withCppPtr (M506.toQWidget arg'1) $ \arg'1' ->
HoppyP.fmap QGridLayout
(newWithParent' arg'1')
class QGridLayoutSuper a where
downToQGridLayout :: a -> QGridLayout
instance QGridLayoutSuper M432.QLayout where
downToQGridLayout = castQGridLayoutToNonconst . cast' . M432.castQLayoutToConst
where
cast' (M432.QLayoutConst ptr') = QGridLayoutConst $ castQLayoutToQGridLayout ptr'
cast' (M432.QLayoutConstGc fptr' ptr') = QGridLayoutConstGc fptr' $ castQLayoutToQGridLayout ptr'
instance QGridLayoutSuper M94.QObject where
downToQGridLayout = castQGridLayoutToNonconst . cast' . M94.castQObjectToConst
where
cast' (M94.QObjectConst ptr') = QGridLayoutConst $ castQObjectToQGridLayout ptr'
cast' (M94.QObjectConstGc fptr' ptr') = QGridLayoutConstGc fptr' $ castQObjectToQGridLayout ptr'
instance QGridLayoutSuper M434.QLayoutItem where
downToQGridLayout = castQGridLayoutToNonconst . cast' . M434.castQLayoutItemToConst
where
cast' (M434.QLayoutItemConst ptr') = QGridLayoutConst $ castQLayoutItemToQGridLayout ptr'
cast' (M434.QLayoutItemConstGc fptr' ptr') = QGridLayoutConstGc fptr' $ castQLayoutItemToQGridLayout ptr'
class QGridLayoutSuperConst a where
downToQGridLayoutConst :: a -> QGridLayoutConst
instance QGridLayoutSuperConst M432.QLayoutConst where
downToQGridLayoutConst = cast'
where
cast' (M432.QLayoutConst ptr') = QGridLayoutConst $ castQLayoutToQGridLayout ptr'
cast' (M432.QLayoutConstGc fptr' ptr') = QGridLayoutConstGc fptr' $ castQLayoutToQGridLayout ptr'
instance QGridLayoutSuperConst M94.QObjectConst where
downToQGridLayoutConst = cast'
where
cast' (M94.QObjectConst ptr') = QGridLayoutConst $ castQObjectToQGridLayout ptr'
cast' (M94.QObjectConstGc fptr' ptr') = QGridLayoutConstGc fptr' $ castQObjectToQGridLayout ptr'
instance QGridLayoutSuperConst M434.QLayoutItemConst where
downToQGridLayoutConst = cast'
where
cast' (M434.QLayoutItemConst ptr') = QGridLayoutConst $ castQLayoutItemToQGridLayout ptr'
cast' (M434.QLayoutItemConstGc fptr' ptr') = QGridLayoutConstGc fptr' $ castQLayoutItemToQGridLayout ptr'
instance HoppyFHR.Assignable (HoppyF.Ptr (HoppyF.Ptr QGridLayout)) QGridLayout where
assign ptr' value' = HoppyF.poke ptr' $ HoppyFHR.toPtr value'
instance HoppyFHR.Decodable (HoppyF.Ptr (HoppyF.Ptr QGridLayout)) QGridLayout where
decode = HoppyP.fmap QGridLayout . HoppyF.peek