Use collection_trailing_sep_e for packages decl, to allow trailing commas there

compiler/parse/src/header.rs

@@ -9,13 +9,13 @@ use crate::string_literal;
 use bumpalo::collections::Vec;
 use roc_region::all::Loc;
 
-#[derive(Clone, PartialEq, Eq, Debug, Hash)]
+#[derive(Copy, Clone, PartialEq, Eq, Debug, Hash)]
 pub struct PackageName<'a> {
     pub account: &'a str,
     pub pkg: &'a str,
 }
 
-#[derive(Clone, PartialEq, Eq, Debug, Hash)]
+#[derive(Copy, Clone, PartialEq, Eq, Debug, Hash)]
 pub enum Version<'a> {
     Exact(&'a str),
     Range {
@@ -32,7 +32,7 @@ pub enum VersionComparison {
     DisallowsEqual,
 }
 
-#[derive(Clone, PartialEq, Debug)]
+#[derive(Copy, Clone, PartialEq, Debug)]
 pub enum PackageOrPath<'a> {
     Package(PackageName<'a>, Version<'a>),
     Path(StrLiteral<'a>),
@@ -240,7 +240,7 @@ pub enum TypedIdent<'a> {
     SpaceAfter(&'a TypedIdent<'a>, &'a [CommentOrNewline<'a>]),
 }
 
-#[derive(Clone, Debug, PartialEq)]
+#[derive(Copy, Clone, Debug, PartialEq)]
 pub enum PackageEntry<'a> {
     Entry {
         shorthand: &'a str,

compiler/parse/src/module.rs

@@ -586,6 +586,7 @@ struct Packages<'a> {
 
     before_packages_keyword: &'a [CommentOrNewline<'a>],
     after_packages_keyword: &'a [CommentOrNewline<'a>],
+    final_comments: &'a [CommentOrNewline<'a>],
 }
 
 #[inline(always)]
@@ -602,21 +603,24 @@ fn packages<'a>() -> impl Parser<'a, Packages<'a>, EPackages<'a>> {
                 EPackages::IndentPackages,
                 EPackages::IndentListStart
             ),
-            collection_e!(
+            collection_trailing_sep_e!(
                 word1(b'{', EPackages::ListStart),
                 specialize(EPackages::PackageEntry, loc!(package_entry())),
                 word1(b',', EPackages::ListEnd),
                 word1(b'}', EPackages::ListEnd),
                 min_indent,
+                EPackages::Open,
                 EPackages::Space,
-                EPackages::IndentListEnd
+                EPackages::IndentListEnd,
+                PackageEntry::SpaceBefore
             )
         ),
-        |((before_packages_keyword, after_packages_keyword), entries)| {
+        |((before_packages_keyword, after_packages_keyword), (entries, final_comments))| {
             Packages {
                 entries,
                 before_packages_keyword,
                 after_packages_keyword,
+                final_comments,
             }
         }
     )

compiler/parse/src/parser.rs

@@ -265,6 +265,7 @@ pub enum ETypedIdent<'a> {
 
 #[derive(Debug, Clone, PartialEq, Eq)]
 pub enum EPackages<'a> {
+    Open(Row, Col),
     Space(BadInputError, Row, Col),
     Packages(Row, Col),
     IndentPackages(Row, Col),