Commit 891857a3 authored by ian@well-typed.com's avatar ian@well-typed.com
Browse files

Fix parsing export lists

We were accepting
    module ExportCommaComma (id, reverse,,) where
where only 1 trailing comma should be permitted.
parent a44978b9
......@@ -469,7 +469,7 @@ exportlist :: { [LIE RdrName] }
| exportlist1 { $1 }
exportlist1 :: { [LIE RdrName] }
: expdoclist export expdoclist ',' exportlist { $1 ++ ($2 : $3) ++ $5 }
: expdoclist export expdoclist ',' exportlist1 { $1 ++ ($2 : $3) ++ $5 }
| expdoclist export expdoclist { $1 ++ ($2 : $3) }
| expdoclist { $1 }
......
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