{-# LANGUAGE ForeignFunctionInterface, TypeFamilies, MultiParamTypeClasses, FlexibleInstances, TypeSynonymInstances, EmptyDataDecls, ExistentialQuantification, ScopedTypeVariables #-} module HROOT.Graf.TSPHE.RawType where import Foreign.Ptr import FFICXX.Runtime.Cast data RawTSPHE newtype TSPHE = TSPHE (Ptr RawTSPHE) deriving (TSPHE -> TSPHE -> Bool (TSPHE -> TSPHE -> Bool) -> (TSPHE -> TSPHE -> Bool) -> Eq TSPHE forall a. (a -> a -> Bool) -> (a -> a -> Bool) -> Eq a $c== :: TSPHE -> TSPHE -> Bool == :: TSPHE -> TSPHE -> Bool $c/= :: TSPHE -> TSPHE -> Bool /= :: TSPHE -> TSPHE -> Bool Eq, Eq TSPHE Eq TSPHE -> (TSPHE -> TSPHE -> Ordering) -> (TSPHE -> TSPHE -> Bool) -> (TSPHE -> TSPHE -> Bool) -> (TSPHE -> TSPHE -> Bool) -> (TSPHE -> TSPHE -> Bool) -> (TSPHE -> TSPHE -> TSPHE) -> (TSPHE -> TSPHE -> TSPHE) -> Ord TSPHE TSPHE -> TSPHE -> Bool TSPHE -> TSPHE -> Ordering TSPHE -> TSPHE -> TSPHE 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 :: TSPHE -> TSPHE -> Ordering compare :: TSPHE -> TSPHE -> Ordering $c< :: TSPHE -> TSPHE -> Bool < :: TSPHE -> TSPHE -> Bool $c<= :: TSPHE -> TSPHE -> Bool <= :: TSPHE -> TSPHE -> Bool $c> :: TSPHE -> TSPHE -> Bool > :: TSPHE -> TSPHE -> Bool $c>= :: TSPHE -> TSPHE -> Bool >= :: TSPHE -> TSPHE -> Bool $cmax :: TSPHE -> TSPHE -> TSPHE max :: TSPHE -> TSPHE -> TSPHE $cmin :: TSPHE -> TSPHE -> TSPHE min :: TSPHE -> TSPHE -> TSPHE Ord, Int -> TSPHE -> ShowS [TSPHE] -> ShowS TSPHE -> String (Int -> TSPHE -> ShowS) -> (TSPHE -> String) -> ([TSPHE] -> ShowS) -> Show TSPHE forall a. (Int -> a -> ShowS) -> (a -> String) -> ([a] -> ShowS) -> Show a $cshowsPrec :: Int -> TSPHE -> ShowS showsPrec :: Int -> TSPHE -> ShowS $cshow :: TSPHE -> String show :: TSPHE -> String $cshowList :: [TSPHE] -> ShowS showList :: [TSPHE] -> ShowS Show) instance () => FPtr (TSPHE) where type Raw TSPHE = RawTSPHE get_fptr :: TSPHE -> Ptr (Raw TSPHE) get_fptr (TSPHE Ptr RawTSPHE ptr) = Ptr (Raw TSPHE) Ptr RawTSPHE ptr cast_fptr_to_obj :: Ptr (Raw TSPHE) -> TSPHE cast_fptr_to_obj = Ptr (Raw TSPHE) -> TSPHE Ptr RawTSPHE -> TSPHE TSPHE