From: Michael D. Adams Date: Fri, 18 May 2007 13:24:32 +0000 (+0000) Subject: Fixed missing space in pretty printer for CmmJump X-Git-Tag: Before_type_family_merge~649 X-Git-Url: http://git.megacz.com/?p=ghc-hetmet.git;a=commitdiff_plain;h=a20e8369c11f0f71444f2b849e47eaab6fff1315 Fixed missing space in pretty printer for CmmJump --- diff --git a/compiler/cmm/PprCmm.hs b/compiler/cmm/PprCmm.hs index b718ec9..06d68c0 100644 --- a/compiler/cmm/PprCmm.hs +++ b/compiler/cmm/PprCmm.hs @@ -206,6 +206,7 @@ genJump expr args = else case expr of CmmLoad (CmmReg _) _ -> pprExpr expr _ -> parens (pprExpr expr) + , space , parens ( commafy $ map ppr args ) , semi ]