[project @ 1997-09-24 09:08:21 by simonm]

[ghc-hetmet.git] / ghc / compiler / hsSyn / HsPragmas.lhs

diff --git a/ghc/compiler/hsSyn/HsPragmas.lhs b/ghc/compiler/hsSyn/HsPragmas.lhs
index 26075b3..cc3733e 100644 (file)
--- a/ghc/compiler/hsSyn/HsPragmas.lhs
+++ b/ghc/compiler/hsSyn/HsPragmas.lhs
@@ -91,7 +91,6 @@ data GenPragmas name
   = NoGenPragmas
   | GenPragmas (Maybe Int)             -- arity (maybe)
                (Maybe UpdateInfo)      -- update info (maybe)
-               DeforestInfo            -- deforest info
                (ImpStrictness name)    -- strictness, worker-wrapper
                (ImpUnfolding name)     -- unfolding (maybe)
                [([Maybe (HsType name)], -- Specialisations: types to which spec'd;