module Halfs.BasicIO where import Data.Integral import Data.Maybe import Halfs.Utils import Halfs.FSState import Halfs.Inode import Halfs.FSRW import Halfs.BufferBlock getInodeWrite :: INInt -> Maybe FileType -> FSWrite Inode putPointersBin :: (FSRW m) => BufferBlock s -> Inode -> m ()