projects
/
ghc-hetmet.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
|
inline
| side by side (from parent 1:
9803760
)
Fixed missing space in pretty printer for CmmJump
author
Michael D. Adams
<t-madams@microsoft.com>
Fri, 18 May 2007 13:24:32 +0000
(13:24 +0000)
committer
Michael D. Adams
<t-madams@microsoft.com>
Fri, 18 May 2007 13:24:32 +0000
(13:24 +0000)
compiler/cmm/PprCmm.hs
patch
|
blob
|
history
diff --git
a/compiler/cmm/PprCmm.hs
b/compiler/cmm/PprCmm.hs
index
b718ec9
..
06d68c0
100644
(file)
--- 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)
else case expr of
CmmLoad (CmmReg _) _ -> pprExpr expr
_ -> parens (pprExpr expr)
+ , space
, parens ( commafy $ map ppr args )
, semi ]
, parens ( commafy $ map ppr args )
, semi ]