shithub: MicroHs

Download patch

ref: b49bc9662fc1da26f879558e87e64c8ef40ab13d
parent: 8ab49934ef1f8fd52d6beffb6024c95dcd7a8c5a
author: Lennart Augustsson <lennart@augustsson.net>
date: Sat Mar 2 22:16:34 EST 2024

Add missing file

--- /dev/null
+++ b/ghc/System/IO/Serialize.hs
@@ -1,0 +1,22 @@
+-- Copyright 2024 Lennart Augustsson
+-- See LICENSE file for full license.
+module System.IO.Serialize(
+  hSerialize, hDeserialize,
+  writeSerialized, writeSerializedCompressed,
+  readSerialized,
+  ) where
+import System.IO
+
+hSerialize   :: forall a . Handle -> a -> IO ()
+hSerialize = errghc
+hDeserialize :: forall a . Handle -> IO a
+hDeserialize = errghc
+writeSerialized :: forall a . FilePath -> a -> IO ()
+writeSerialized = errghc
+writeSerializedCompressed :: forall a . FilePath -> a -> IO ()
+writeSerializedCompressed = errghc
+readSerialized :: forall a . FilePath -> IO a
+readSerialized = errghc
+
+errghc :: a
+errghc = error "System.IO.System: serialization not available with ghc"
--