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

[ghc-hetmet.git] / ghc / compiler / simplCore / LiberateCase.hi

diff --git a/ghc/compiler/simplCore/LiberateCase.hi b/ghc/compiler/simplCore/LiberateCase.hi
index e2b140b..5646aa0 100644 (file)
--- a/ghc/compiler/simplCore/LiberateCase.hi
+++ b/ghc/compiler/simplCore/LiberateCase.hi
@@ -3,5 +3,4 @@ interface LiberateCase where
 import CoreSyn(CoreBinding)
 import Id(Id)
 liberateCase :: Int -> [CoreBinding Id Id] -> [CoreBinding Id Id]
-       {-# GHC_PRAGMA _A_ 2 _U_ 21 _N_ _S_ "LS" _N_ _N_ #-}