module Graphics.Rendering.FreeType.Internal.Stream
( FT_StreamRec_
, FT_Stream
, FT_StreamDesc
, FT_Stream_IoFunc
, FT_Stream_CloseFunc
, base
, size
, pos
, descriptor
, read
, close
, memory
, cursor
, limit
) where
import Prelude hiding (read)
import Foreign
import Foreign.C.Types
import Graphics.Rendering.FreeType.Internal.Memory
type FT_StreamDesc = CLong
type FT_Stream_IoFunc = FunPtr
(FT_Stream -> CULong -> Ptr CUChar -> CULong -> IO CULong)
type FT_Stream_CloseFunc = FunPtr (FT_Stream -> IO ())
data FT_StreamRec_
type FT_Stream = Ptr FT_StreamRec_
base :: FT_Stream -> Ptr (Ptr CUChar)
base = (\hsc_ptr -> hsc_ptr `plusPtr` 0)
size :: FT_Stream -> Ptr CULong
size = (\hsc_ptr -> hsc_ptr `plusPtr` 8)
pos :: FT_Stream -> Ptr CULong
pos = (\hsc_ptr -> hsc_ptr `plusPtr` 16)
descriptor :: FT_Stream -> Ptr FT_StreamDesc
descriptor = (\hsc_ptr -> hsc_ptr `plusPtr` 24)
read :: FT_Stream -> Ptr FT_Stream_IoFunc
read = (\hsc_ptr -> hsc_ptr `plusPtr` 40)
close :: FT_Stream -> Ptr FT_Stream_CloseFunc
close = (\hsc_ptr -> hsc_ptr `plusPtr` 48)
memory :: FT_Stream -> Ptr FT_Memory
memory = (\hsc_ptr -> hsc_ptr `plusPtr` 56)
cursor :: FT_Stream -> Ptr (Ptr CUChar)
cursor = (\hsc_ptr -> hsc_ptr `plusPtr` 64)
limit :: FT_Stream -> Ptr (Ptr CUChar)
limit = (\hsc_ptr -> hsc_ptr `plusPtr` 72)