From: simonpj Date: Wed, 22 Aug 2001 15:27:08 +0000 (+0000) Subject: [project @ 2001-08-22 15:27:08 by simonpj] X-Git-Tag: Approximately_9120_patches~1125 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=90dd859eca65c68f19db8041b69575750ae18f77;p=ghc-hetmet.git [project @ 2001-08-22 15:27:08 by simonpj] Formatting only --- diff --git a/ghc/compiler/rename/Rename.lhs b/ghc/compiler/rename/Rename.lhs index 613ed08..49a4c8a 100644 --- a/ghc/compiler/rename/Rename.lhs +++ b/ghc/compiler/rename/Rename.lhs @@ -129,7 +129,7 @@ renameStmt dflags hit hst pcs this_module ic stmt -- Mod> let y = x + 3 -- We need to pass 'x' among the fvs to slurpImpDecls, so that -- the latter can see that T is a gate, and hence import the Num T - -- instance decl. (See the InTypEnv case in RnIfaces.slurpSourceRefs + -- instance decl. (See the InTypEnv case in RnIfaces.slurpSourceRefs.) doDump dflags binders stmt decls `thenRn_` returnRn (print_unqual, Just (binders, (stmt, decls)))