blob: cf31e3d9a844551b79259bbb8698b8cac2c218cc (
plain) (
blame)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
|
{-# LANGUAGE CPP #-}
module IntLib (crc) where
import Foreign.Ptr
import Foreign.C.Types
#include <zlib.h>
#include "foo.h"
foreign import ccall crc32 :: CLong -> Ptr () -> CInt -> IO ()
crc = crc32 0 nullPtr 0
z = #{size struct gz_header_s}
|