[project @ 1996-01-11 14:06:51 by partain]

[ghc-hetmet.git] / ghc / compiler / simplStg / SatStgRhs.hi

diff --git a/ghc/compiler/simplStg/SatStgRhs.hi b/ghc/compiler/simplStg/SatStgRhs.hi
index de10f7c..899ff8e 100644 (file)
--- a/ghc/compiler/simplStg/SatStgRhs.hi
+++ b/ghc/compiler/simplStg/SatStgRhs.hi
@@ -4,5 +4,4 @@ import Id(Id)
 import SplitUniq(SplitUniqSupply)
 import StgSyn(StgBinding)
 satStgRhs :: [StgBinding Id Id] -> SplitUniqSupply -> [StgBinding Id Id]
-       {-# GHC_PRAGMA _A_ 2 _U_ 11 _N_ _S_ "S" _N_ _N_ #-}