minor refactor for consistency (maybe we should go the other way given sumSlice...)
This commit is contained in:
parent
b788d6685d
commit
31ae16784a
@ -56,7 +56,7 @@ withBTree =
|
|||||||
Raw.Fork_Body (unsafeFromPtr lPtr) (unsafeFromPtr rPtr)
|
Raw.Fork_Body (unsafeFromPtr lPtr) (unsafeFromPtr rPtr)
|
||||||
|
|
||||||
hello :: ByteString -> IO ()
|
hello :: ByteString -> IO ()
|
||||||
hello s = useAsCString s $ Raw.hello . unsafeFromPtr
|
hello = flip useAsCString $ Raw.hello . unsafeFromPtr
|
||||||
|
|
||||||
helloStruct :: T -> IO ()
|
helloStruct :: T -> IO ()
|
||||||
helloStruct = flip with (Raw.hello_struct . unsafeFromPtr) . convertT
|
helloStruct = flip with (Raw.hello_struct . unsafeFromPtr) . convertT
|
||||||
|
|||||||
Loading…
x
Reference in New Issue
Block a user