summaryrefslogtreecommitdiff
path: root/libraries/compact/tests/compact_serialize.hs
diff options
context:
space:
mode:
Diffstat (limited to 'libraries/compact/tests/compact_serialize.hs')
-rw-r--r--libraries/compact/tests/compact_serialize.hs3
1 files changed, 2 insertions, 1 deletions
diff --git a/libraries/compact/tests/compact_serialize.hs b/libraries/compact/tests/compact_serialize.hs
index e4ba88ea9e..2b831e048c 100644
--- a/libraries/compact/tests/compact_serialize.hs
+++ b/libraries/compact/tests/compact_serialize.hs
@@ -10,6 +10,7 @@ import Foreign.Ptr
import Control.DeepSeq
import Data.Compact
+import Data.Compact.Internal
import Data.Compact.Serialized
assertFail :: String -> IO ()
@@ -23,7 +24,7 @@ assertEquals expected actual =
serialize :: NFData a => a -> IO (SerializedCompact a, [ByteString])
serialize val = do
- cnf <- newCompact 4096 val
+ cnf <- compactSized 4096 True val
bytestrref <- newIORef undefined
scref <- newIORef undefined