From: simonpj <unknown>
Date: Fri, 21 Feb 2003 12:26:41 +0000 (+0000)
Subject: [project @ 2003-02-21 12:26:41 by simonpj]
X-Git-Tag: Approx_11550_changesets_converted~1116
X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;ds=inline;h=35057005992d0de03515ad070af8c7435e899cc6;p=ghc-hetmet.git

[project @ 2003-02-21 12:26:41 by simonpj]
Typo
---

diff --git a/ghc/compiler/typecheck/TcInstDcls.lhs b/ghc/compiler/typecheck/TcInstDcls.lhs
index d312cee..bc332aa 100644
--- a/ghc/compiler/typecheck/TcInstDcls.lhs
+++ b/ghc/compiler/typecheck/TcInstDcls.lhs
@@ -593,7 +593,7 @@ tcInstDecl2 (InstInfo { iDFunId = dfun_id, iBinds = binds })
 		 	 [(inst_tyvars', dfun_id, this_dict_id)] 
 		 	 inlines all_binds
     in
-    showLIE "instance" 		`thenM_`
+    showLIE (text "instance") 		`thenM_`
     returnM (main_bind `AndMonoBinds` prag_binds `AndMonoBinds` sc_binds_outer)