From acc7346eb5d6e6000b3a4b0e2f7ea00933dff2a4 Mon Sep 17 00:00:00 2001 From: simonpj Date: Wed, 2 Nov 2005 17:39:57 +0000 Subject: [PATCH] [project @ 2005-11-02 17:39:57 by simonpj] Trace output only --- ghc/compiler/iface/TcIface.lhs | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) diff --git a/ghc/compiler/iface/TcIface.lhs b/ghc/compiler/iface/TcIface.lhs index 9feeda6..e10958b 100644 --- a/ghc/compiler/iface/TcIface.lhs +++ b/ghc/compiler/iface/TcIface.lhs @@ -114,7 +114,7 @@ tcImportDecl name = do { initIfaceTcRn (loadWiredInHomeIface name) ; return thing } | otherwise - = do { traceIf (text "tcLookupGlobal" <+> ppr name) + = do { traceIf (text "tcImportDecl" <+> ppr name) ; mb_thing <- initIfaceTcRn (importDecl name) ; case mb_thing of Succeeded thing -> return thing -- 1.7.10.4