From: simonpj Date: Thu, 3 May 2001 09:35:28 +0000 (+0000) Subject: [project @ 2001-05-03 09:35:28 by simonpj] X-Git-Tag: Approximately_9120_patches~2011 X-Git-Url: http://git.megacz.com/?a=commitdiff_plain;h=2ee4c82ec8abc8c06e97510d93db105c2c72afd2;p=ghc-hetmet.git [project @ 2001-05-03 09:35:28 by simonpj] Correct pretty print of HsIPVar --- diff --git a/ghc/compiler/hsSyn/HsExpr.lhs b/ghc/compiler/hsSyn/HsExpr.lhs index 9400aef..e65e3fc 100644 --- a/ghc/compiler/hsSyn/HsExpr.lhs +++ b/ghc/compiler/hsSyn/HsExpr.lhs @@ -216,7 +216,7 @@ ppr_expr (HsVar v) | isOperator v = parens (ppr v) | otherwise = ppr v -ppr_expr (HsIPVar v) = {- char '?' <> -} ppr v +ppr_expr (HsIPVar v) = char '?' <> ppr v ppr_expr (HsLit lit) = ppr lit ppr_expr (HsOverLit lit) = ppr lit