Commit d40f5b78 authored by Ben Gamari's avatar Ben Gamari 🐢
Browse files

PmExpr: Fix CPP unacceptable too clang's CPP

parent 6ef351df
......@@ -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)
......
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment