X-Git-Url: http://git.megacz.com/?a=blobdiff_plain;f=ghc%2Fcompiler%2FsimplStg%2FSatStgRhs.hi;fp=ghc%2Fcompiler%2FsimplStg%2FSatStgRhs.hi;h=899ff8e45effd0a87598ea141f8261219a9dcd30;hb=10521d8418fd3a1cf32882718b5bd28992db36fd;hp=de10f7c4245e3eb2d44ecb7f9bbb1e9dcfb8697a;hpb=7fa716e248a1f11fa686965f57aebbb83b74fa7b;p=ghc-hetmet.git

diff --git a/ghc/compiler/simplStg/SatStgRhs.hi b/ghc/compiler/simplStg/SatStgRhs.hi
index de10f7c..899ff8e 100644
--- 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_ #-}