{-# LANGUAGE ForeignFunctionInterface, TypeFamilies, MultiParamTypeClasses, FlexibleInstances, TypeSynonymInstances, EmptyDataDecls, ExistentialQuantification, ScopedTypeVariables #-} module HROOT.Class.TGraphAsymmErrors.RawType where -- import Foreign.Ptr import Foreign.ForeignPtr -- import Foreign.Marshal.Array import HROOT.TypeCast data RawTGraphAsymmErrors newtype TGraphAsymmErrors = TGraphAsymmErrors (ForeignPtr RawTGraphAsymmErrors) deriving (Eq, Ord, Show) instance FPtr TGraphAsymmErrors where type Raw TGraphAsymmErrors = RawTGraphAsymmErrors get_fptr (TGraphAsymmErrors fptr) = fptr cast_fptr_to_obj = TGraphAsymmErrors