[project @ 2002-11-21 17:43:43 by simonpj]

[ghc-hetmet.git] / ghc / compiler / main / HscMain.lhs

diff --git a/ghc/compiler/main/HscMain.lhs b/ghc/compiler/main/HscMain.lhs
index f5e239a..05dcfb4 100644 (file)
--- a/ghc/compiler/main/HscMain.lhs
+++ b/ghc/compiler/main/HscMain.lhs
@@ -638,7 +638,7 @@ compileExpr :: HscEnv
            -> TypecheckedHsExpr
            -> IO HValue
 
-compileExpr hsc_env pcs this_mod type_env rdr_env tc_expr
+compileExpr hsc_env pcs this_mod rdr_env type_env tc_expr
   = do { let dflags = hsc_dflags hsc_env
 
                -- Desugar it