ref: 1a9dd10f9d2918382b938bda9079652d6b392e0c
parent: b6907a66fed4202b37293c18b7802ed01c239fad
author: Lennart Augustsson <lennart@augustsson.net>
date: Sat Aug 31 17:41:03 EDT 2024
Add function.
--- a/ghc/System/IO/Serialize.hs
+++ b/ghc/System/IO/Serialize.hs
@@ -5,6 +5,7 @@
hSerialize, hDeserialize,
writeSerialized,
-}
+ writeSerialized,
writeSerializedCompressed,
readSerialized,
) where
@@ -22,6 +23,10 @@
writeSerializedCompressed :: forall a . HasCallStack => FilePath -> a -> IO ()
writeSerializedCompressed = errghc
+
+writeSerialized :: forall a . HasCallStack => FilePath -> a -> IO ()
+writeSerialized = errghc
+
readSerialized :: forall a . HasCallStack => FilePath -> IO a
readSerialized = errghc
--
⑨