Commit c75d5fc8 authored by simonpj@microsoft.com's avatar simonpj@microsoft.com

Make view patterns right-associate

So that you can write

   f (v1 -> v2 -> pat)
parent 77166b17
......@@ -1417,7 +1417,7 @@ texp :: { LHsExpr RdrName }
| qopm infixexp { LL $ SectionR $1 $2 }
-- View patterns get parenthesized above
| exp '->' exp { LL $ EViewPat $1 $3 }
| exp '->' texp { LL $ EViewPat $1 $3 }
-- Always at least one comma
tup_exprs :: { [HsTupArg RdrName] }
......
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