module Halfs.FileHandle where

import Data.Integral

data FileMode = ReadMode | WriteMode | AppendMode

data FileHandle
    = FileHandle {fhInodeNum :: INInt
                 ,fhSeekPos  :: INLong
                 ,fhMode     :: FileMode
                 }