minor refactor for consistency (maybe we should go the other way given sumSlice...)

This commit is contained in:
George Thomas 2026-03-25 01:50:36 +00:00
parent b788d6685d
commit 31ae16784a

View File

@ -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