summaryrefslogtreecommitdiff
path: root/compiler/parser/ParserCore.y
diff options
context:
space:
mode:
Diffstat (limited to 'compiler/parser/ParserCore.y')
-rw-r--r--compiler/parser/ParserCore.y2
1 files changed, 1 insertions, 1 deletions
diff --git a/compiler/parser/ParserCore.y b/compiler/parser/ParserCore.y
index 8bf94539fa..3f2b32a8b3 100644
--- a/compiler/parser/ParserCore.y
+++ b/compiler/parser/ParserCore.y
@@ -269,7 +269,7 @@ exp :: { IfaceExpr }
| '%let' let_bind '%in' exp { IfaceLet $2 $4 }
-- gaw 2004
| '%case' '(' ty ')' aexp '%of' id_bndr
- '{' alts1 '}' { IfaceCase $5 (fst $7) $3 $9 }
+ '{' alts1 '}' { IfaceCase $5 (fst $7) $9 }
| '%cast' aexp aty { IfaceCast $2 $3 }
-- No InlineMe any more
-- | '%note' STRING exp