[project @ 2003-06-06 16:04:23 by igloo]

[ghc-hetmet.git] / ghc / compiler / typecheck / TcExpr.lhs

diff --git a/ghc/compiler/typecheck/TcExpr.lhs b/ghc/compiler/typecheck/TcExpr.lhs
index 1ee7af1..f44b757 100644 (file)
--- a/ghc/compiler/typecheck/TcExpr.lhs
+++ b/ghc/compiler/typecheck/TcExpr.lhs
@@ -630,7 +630,7 @@ tcMonoExpr (HsReify (Reify flavour name)) res_ty
   where
     tycon_name = case flavour of
                   ReifyDecl -> DsMeta.decQTyConName
-                  ReifyType -> DsMeta.typQTyConName
+                  ReifyType -> DsMeta.typeQTyConName
                   ReifyFixity -> pprPanic "tcMonoExpr: cant do reifyFixity yet" (ppr name)
 #endif /* GHCI */
 \end{code}