bindings-libffi 0.0.1 → 0.0.2
raw patch · 3 files changed
+15/−2 lines, 3 filesPVP ok
version bump matches the API change (PVP)
API changes (from Hackage documentation)
Files
- bindings-libffi.cabal +1/−1
- src/LibffiTypes.hs +9/−1
- src/types.c +5/−0
bindings-libffi.cabal view
@@ -3,7 +3,7 @@ homepage: http://bitbucket.org/mauricio/bindings synopsis: Check bindings-common package for directions.-version: 0.0.1+version: 0.0.2 license: BSD3 license-file: LICENSE maintainer: Maurício C. Antunes
src/LibffiTypes.hs view
@@ -29,8 +29,14 @@ type Ffi_abi = CInt -data Ffi_cif+data Ffi_cif = Ffi_cif +instance Storable Ffi_cif where+ sizeOf _ = fromIntegral size_of_ffi_cif+ alignment = sizeOf+ peek p = return Ffi_cif+ poke p v = return ()+ data Ffi_closure foreign import ccall "size_of_ffi_type" size_of_ffi_type@@ -44,3 +50,5 @@ :: Ptr Ffi_type -> Ptr CSize -> Ptr CUShort -> Ptr CUShort -> Ptr (Ptr (Ptr Ffi_type)) -> IO () +foreign import ccall "size_of_ffi_cif" size_of_ffi_cif+ :: CInt
src/types.c view
@@ -29,3 +29,8 @@ *p4 = p->elements; } +int size_of_ffi_cif (void)+{+ return sizeof (ffi_cif);+}+