Source

snappy / Codec / Compression / Snappy / Internal.hs

Diff from to

File Codec/Compression/Snappy/Internal.hs

     ) where
 
 import Control.Monad (when)
-import Foreign.C.Types (CSize)
+import Foreign.C.Types (CSize(..))
 
 maxCompressedLength :: Int -> Int
 maxCompressedLength = fromIntegral . c_MaxCompressedLength . fromIntegral