comply with Haskell 98 by not allowing extra commas in import/export lists

diff --git a/compiler/parser/Parser.y.pp b/compiler/parser/Parser.y.pp
index 3bb5ab4..1469a66 100644 (file)
--- a/compiler/parser/Parser.y.pp
+++ b/compiler/parser/Parser.y.pp
@@ -343,9 +343,8 @@ maybeexports :: { Maybe [LIE RdrName] }
        |  {- empty -}                          { Nothing }
 
 exportlist :: { [LIE RdrName] }
        |  {- empty -}                          { Nothing }
 
 exportlist :: { [LIE RdrName] }

-       :  exportlist ',' export                { $3 : $1 }
-       |  exportlist ','                       { $1 }
-       |  export                               { [$1]  }
+       :  export                               { [$1] }
+       |  export ',' exportlist                { $1 : $3 }

        |  {- empty -}                          { [] }
 
    -- No longer allow things like [] and (,,,) to be exported
        |  {- empty -}                          { [] }
 
    -- No longer allow things like [] and (,,,) to be exported