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

2026-03-25 01:50:36 +00:00 · 2026-03-25 01:50:36 +00:00 · c735ffb4f3
commit c735ffb4f3
parent 8847012bbc
1 changed files with 1 additions and 1 deletions
--- a/lib/GarnetRs/Wrapped.hs
+++ b/lib/GarnetRs/Wrapped.hs
@ -57,7 +57,7 @@ withBTree =
                Raw.Fork_Body (unsafeFromPtr lPtr) (unsafeFromPtr rPtr)

 hello :: ByteString -> IO ()
-hello s = useAsCString s $ Raw.hello . unsafeFromPtr
+hello = flip useAsCString $ Raw.hello . unsafeFromPtr

 helloStruct :: T -> IO ()
 helloStruct = flip with (Raw.hello_struct . unsafeFromPtr) . convertT