From: simonpj <unknown>
Date: Wed, 30 Oct 2002 11:23:28 +0000 (+0000)
Subject: [project @ 2002-10-30 11:23:28 by simonpj]
X-Git-Tag: Approx_11550_changesets_converted~1489
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=8a82d1837c37081ce1c7fa25ee18270b68fca339;p=ghc-hetmet.git

[project @ 2002-10-30 11:23:28 by simonpj]
Remove CrossStage from Convert
---

diff --git a/ghc/compiler/hsSyn/Convert.lhs b/ghc/compiler/hsSyn/Convert.lhs
index 41018f7..c8cca66 100644
--- a/ghc/compiler/hsSyn/Convert.lhs
+++ b/ghc/compiler/hsSyn/Convert.lhs
@@ -178,7 +178,6 @@ cvtOverLit (Int i) = mkHsIntegral (fromInt i)
 
 cvtLit :: Lit -> HsLit
 cvtLit (Char c)	      = HsChar (ord c)
-cvtLit (CrossStage s) = error "What do we do about crossStage constants?"
 
 cvtp :: Meta.Pat -> Hs.Pat RdrName
 cvtp (Plit l)