[project @ 1996-01-22 18:37:39 by partain]

[ghc-hetmet.git] / ghc / lib / prelude / Builtin.hi

diff --git a/ghc/lib/prelude/Builtin.hi b/ghc/lib/prelude/Builtin.hi
index b802737..ba441b9 100644 (file)
--- a/ghc/lib/prelude/Builtin.hi
+++ b/ghc/lib/prelude/Builtin.hi
@@ -11,5 +11,13 @@ error :: [Char] -> a
 parError# :: a
        {-# GHC_PRAGMA _A_ 0 _N_ _N_ _S_ _!_ _N_ _N_ #-}
 patError# :: [Char] -> a
-       {-# GHC_PRAGMA _A_ 1 _U_ 1 _N_ _S_ _!_ _N_ _N_ #-}
+       {-# GHC_PRAGMA _A_ 1 _U_ 2 _N_ _S_ _!_ _N_ _N_ #-}
+unpackAppendPS# :: Addr# -> [Char] -> [Char]
+       {-# GHC_PRAGMA _A_ 2 _U_ 22 _N_ _S_ "PL" _N_ _N_ #-}
+unpackFoldrPS# :: Addr# -> (Char -> a -> a) -> a -> a
+       {-# GHC_PRAGMA _A_ 3 _U_ 222 _N_ _S_ "PLL" _N_ _N_ #-}
+unpackPS# :: Addr# -> [Char]
+       {-# GHC_PRAGMA _A_ 1 _U_ 2 _N_ _S_ "P" _N_ _N_ #-}
+unpackPS2# :: Addr# -> Int# -> [Char]
+       {-# GHC_PRAGMA _A_ 2 _U_ 22 _N_ _S_ "PP" _N_ _N_ #-}