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