{-# LANGUAGE FlexibleContexts, FlexibleInstances, ForeignFunctionInterface, MonoLocalBinds, MultiParamTypeClasses, ScopedTypeVariables, TypeSynonymInstances, UndecidableInstances #-} ---------- GENERATED FILE, EDITS WILL BE LOST ---------- module Graphics.UI.Qtah.Generated.Gui.QCursor ( QCursorValue (..), QCursorConstPtr (..), QCursorPtr (..), QCursorConst (..), castQCursorToConst, QCursor (..), castQCursorToNonconst, ) where import qualified Foreign as HoppyF import qualified Foreign.Hoppy.Runtime as HoppyFHR import qualified Prelude as HoppyP class QCursorValue a where withQCursorPtr :: a -> (QCursorConst -> HoppyP.IO b) -> HoppyP.IO b instance {-# OVERLAPPABLE #-} QCursorConstPtr a => QCursorValue a class (HoppyFHR.CppPtr this) => QCursorConstPtr this where toQCursorConst :: this -> QCursorConst class (QCursorConstPtr this) => QCursorPtr this where toQCursor :: this -> QCursor data QCursorConst = QCursorConst (HoppyF.Ptr QCursorConst) | QCursorConstGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QCursorConst) castQCursorToConst :: QCursor -> QCursorConst instance HoppyFHR.CppPtr QCursorConst instance HoppyFHR.Deletable QCursorConst instance HoppyFHR.Copyable QCursorConst QCursor instance QCursorConstPtr QCursorConst data QCursor = QCursor (HoppyF.Ptr QCursor) | QCursorGc (HoppyF.ForeignPtr ()) (HoppyF.Ptr QCursor) castQCursorToNonconst :: QCursorConst -> QCursor instance HoppyFHR.CppPtr QCursor instance HoppyFHR.Deletable QCursor instance HoppyFHR.Copyable QCursor QCursor instance QCursorConstPtr QCursor instance QCursorPtr QCursor instance HoppyFHR.Decodable (HoppyF.Ptr (HoppyF.Ptr QCursor)) QCursor instance HoppyFHR.Decodable QCursor ((QCursor)) instance HoppyFHR.Decodable QCursorConst ((QCursor))