[commit: ghc] master: PmExpr: Fix CPP unacceptable too clang's CPP (d40f5b7)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/d40f5b78708273255b3d433ed6a225f674c7238e/ghc

>---------------------------------------------------------------

commit d40f5b78708273255b3d433ed6a225f674c7238e
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Fri Dec 4 05:05:06 2015 -0500

    PmExpr: Fix CPP unacceptable too clang's CPP


>---------------------------------------------------------------

d40f5b78708273255b3d433ed6a225f674c7238e
 compiler/deSugar/PmExpr.hs | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/compiler/deSugar/PmExpr.hs b/compiler/deSugar/PmExpr.hs
index f426bb4..78a51e6 100644
--- a/compiler/deSugar/PmExpr.hs
+++ b/compiler/deSugar/PmExpr.hs
@@ -357,7 +357,7 @@ pprPmExprCon con args
     list = list_elements args
 
     list_elements [x,y]
-      | PmExprCon c es <- y,  nilDataCon == c = ASSERT (null es) [x,y]
+      | PmExprCon c es <- y,  nilDataCon == c = ASSERT(null es) [x,y]
       | PmExprCon c es <- y, consDataCon == c = x : list_elements es
       | otherwise = [x,y]
     list_elements list  = pprPanic "list_elements:" (ppr list)