import Data.Bits (Bits(..))
import Data.Word (Word16, Word32)
import Foreign.C.Error (throwErrnoIfMinus1)
-import Foreign.C.Types (CInt, CIntPtr, CLong, CTime, CUIntPtr)
+import Foreign.C.Types (CInt, CLong, CTime)
import Foreign.Marshal.Alloc (alloca)
import Foreign.Ptr (Ptr, nullPtr)
import Foreign.Storable (Storable(..))