[project @ 1999-01-28 11:29:23 by simonpj]

Changes for new z-encoding

ghc/lib/std/Main.hi-boot

@@ -7,5 +7,6 @@
 ---------------------------------------------------------------------------
  
 __interface Main 1 where
-__export Main main ;
+__export ! Main main ;
 1 main :: __forall [a] => PrelIOBase.IO a;
+

ghc/lib/std/PrelException.hi-boot

@@ -6,6 +6,6 @@
 ---------------------------------------------------------------------------
  
 __interface PrelErr 1 where
-__export PrelException ioError catch;
+__export ! PrelException ioError catch;
 1 ioError :: __forall [a] => PrelIOBase.IOError -> PrelIOBase.IO a ;
 1 catch :: __forall [a] => PrelIOBase.IO a -> (PrelIOBase.IOError -> PrelIOBase.IO a) -> PrelIOBase.IO a ;

ghc/lib/std/PrelPack.hi-boot

@@ -8,11 +8,11 @@
 ---------------------------------------------------------------------------
  
 __interface PrelPack 1 where
-__export PrelPack packCString# unpackCString# unpackNBytes# unpackAppendCString# unpackFoldrCString#;
+__export ! PrelPack packCStringzh unpackCStringzh unpackNByteszh unpackAppendCStringzh unpackFoldrCStringzh ;
 
-1 packCString# :: [PrelBase.Char] -> PrelGHC.ByteArray# ;
-1 unpackCString# :: PrelGHC.Addr# -> [PrelBase.Char] ;
-1 unpackNBytes# :: PrelGHC.Addr# -> PrelGHC.Int# -> [PrelBase.Char] ;
-1 unpackAppendCString# :: PrelGHC.Addr# -> [PrelBase.Char] -> [PrelBase.Char] ;
-1 unpackFoldrCString# :: __forall [a] => PrelGHC.Addr# -> (PrelBase.Char -> a -> a) -> a -> a ;
+1 packCStringzh :: [PrelBase.Char] -> PrelGHC.ByteArrayzh ;
+1 unpackCStringzh :: PrelGHC.Addrzh -> [PrelBase.Char] ;
+1 unpackNByteszh :: PrelGHC.Addrzh -> PrelGHC.Intzh -> [PrelBase.Char] ;
+1 unpackAppendCStringzh :: PrelGHC.Addrzh -> [PrelBase.Char] -> [PrelBase.Char] ;
+1 unpackFoldrCStringzh :: __forall [a] => PrelGHC.Addrzh -> (PrelBase.Char -> a -> a) -> a -> a ;