From 2e95d5409279298a6c59492210001f468fcf47c3 Mon Sep 17 00:00:00 2001 From: simonpj Date: Mon, 18 Mar 2002 15:22:31 +0000 Subject: [PATCH] [project @ 2002-03-18 15:22:31 by simonpj] Remove spurious ? in linear implicit parameter printing --- ghc/compiler/typecheck/TcMonad.lhs | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/ghc/compiler/typecheck/TcMonad.lhs b/ghc/compiler/typecheck/TcMonad.lhs index 80ccae7..a351875 100644 --- a/ghc/compiler/typecheck/TcMonad.lhs +++ b/ghc/compiler/typecheck/TcMonad.lhs @@ -701,9 +701,9 @@ pprInstLoc (orig, locn, ctxt) pp_orig (OccurrenceOf id) = hsep [ptext SLIT("use of"), quotes (ppr id)] pp_orig (IPOcc name) - = hsep [ptext SLIT("use of implicit parameter"), quotes (char '?' <> ppr name)] + = hsep [ptext SLIT("use of implicit parameter"), quotes (ppr name)] pp_orig (IPBind name) - = hsep [ptext SLIT("binding for implicit parameter"), quotes (char '?' <> ppr name)] + = hsep [ptext SLIT("binding for implicit parameter"), quotes (ppr name)] pp_orig RecordUpdOrigin = ptext SLIT("a record update") pp_orig DataDeclOrigin -- 1.7.10.4