{-# LANGUAGE ForeignFunctionInterface, TypeFamilies,
  MultiParamTypeClasses, FlexibleInstances, TypeSynonymInstances,
  EmptyDataDecls, ExistentialQuantification, ScopedTypeVariables #-}
module HROOT.Hist.TGraphErrors.RawType where
import Foreign.Ptr
import FFICXX.Runtime.Cast

data RawTGraphErrors

newtype TGraphErrors = TGraphErrors (Ptr RawTGraphErrors)
                         deriving (TGraphErrors -> TGraphErrors -> Bool
(TGraphErrors -> TGraphErrors -> Bool)
-> (TGraphErrors -> TGraphErrors -> Bool) -> Eq TGraphErrors
forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a
$c== :: TGraphErrors -> TGraphErrors -> Bool
== :: TGraphErrors -> TGraphErrors -> Bool
$c/= :: TGraphErrors -> TGraphErrors -> Bool
/= :: TGraphErrors -> TGraphErrors -> Bool
Eq, Eq TGraphErrors
Eq TGraphErrors
-> (TGraphErrors -> TGraphErrors -> Ordering)
-> (TGraphErrors -> TGraphErrors -> Bool)
-> (TGraphErrors -> TGraphErrors -> Bool)
-> (TGraphErrors -> TGraphErrors -> Bool)
-> (TGraphErrors -> TGraphErrors -> Bool)
-> (TGraphErrors -> TGraphErrors -> TGraphErrors)
-> (TGraphErrors -> TGraphErrors -> TGraphErrors)
-> Ord TGraphErrors
TGraphErrors -> TGraphErrors -> Bool
TGraphErrors -> TGraphErrors -> Ordering
TGraphErrors -> TGraphErrors -> TGraphErrors
forall a.
Eq a
-> (a -> a -> Ordering)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> Bool)
-> (a -> a -> a)
-> (a -> a -> a)
-> Ord a
$ccompare :: TGraphErrors -> TGraphErrors -> Ordering
compare :: TGraphErrors -> TGraphErrors -> Ordering
$c< :: TGraphErrors -> TGraphErrors -> Bool
< :: TGraphErrors -> TGraphErrors -> Bool
$c<= :: TGraphErrors -> TGraphErrors -> Bool
<= :: TGraphErrors -> TGraphErrors -> Bool
$c> :: TGraphErrors -> TGraphErrors -> Bool
> :: TGraphErrors -> TGraphErrors -> Bool
$c>= :: TGraphErrors -> TGraphErrors -> Bool
>= :: TGraphErrors -> TGraphErrors -> Bool
$cmax :: TGraphErrors -> TGraphErrors -> TGraphErrors
max :: TGraphErrors -> TGraphErrors -> TGraphErrors
$cmin :: TGraphErrors -> TGraphErrors -> TGraphErrors
min :: TGraphErrors -> TGraphErrors -> TGraphErrors
Ord, Int -> TGraphErrors -> ShowS
[TGraphErrors] -> ShowS
TGraphErrors -> String
(Int -> TGraphErrors -> ShowS)
-> (TGraphErrors -> String)
-> ([TGraphErrors] -> ShowS)
-> Show TGraphErrors
forall a.
(Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a
$cshowsPrec :: Int -> TGraphErrors -> ShowS
showsPrec :: Int -> TGraphErrors -> ShowS
$cshow :: TGraphErrors -> String
show :: TGraphErrors -> String
$cshowList :: [TGraphErrors] -> ShowS
showList :: [TGraphErrors] -> ShowS
Show)

instance () => FPtr (TGraphErrors) where
        type Raw TGraphErrors = RawTGraphErrors
        get_fptr :: TGraphErrors -> Ptr (Raw TGraphErrors)
get_fptr (TGraphErrors Ptr RawTGraphErrors
ptr) = Ptr (Raw TGraphErrors)
Ptr RawTGraphErrors
ptr
        cast_fptr_to_obj :: Ptr (Raw TGraphErrors) -> TGraphErrors
cast_fptr_to_obj = Ptr (Raw TGraphErrors) -> TGraphErrors
Ptr RawTGraphErrors -> TGraphErrors
TGraphErrors