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