module HROOT.Class.TGraphErrors.Interface where
import Data.Word
import Foreign.ForeignPtr
import HROOT.TypeCast
import HROOT.Class.TGraphErrors.RawType
import HROOT.Class.TGraph.Interface
class (ITGraph a) => ITGraphErrors a where
instance Existable TGraphErrors where
data Exist TGraphErrors = forall a. (FPtr a, ITGraphErrors a) => ETGraphErrors a
upcastTGraphErrors :: (FPtr a, ITGraphErrors a) => a -> TGraphErrors
upcastTGraphErrors h = let fh = get_fptr h
fh2 :: ForeignPtr RawTGraphErrors = castForeignPtr fh
in cast_fptr_to_obj fh2