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