-- Copyright 2024 Lennart Augustsson
-- See LICENSE file for full license.
module System.IO.Serialize(
  hSerialize, hDeserialize,
  writeSerialized,
  writeSerializedCompressed,
  readSerialized,
  ) where
import System.IO
import GHC.Stack

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

hSerialize   :: forall a . Handle -> a -> IO ()
hSerialize = errghc

hDeserialize :: forall a . Handle -> IO a
hDeserialize = errghc

errghc :: HasCallStack => a
errghc = error "System.IO.System: serialization not available with ghc"