Use workspaces and move everything into compiler/

compiler/parse/src/header.rs

@@ -0,0 +1,73 @@
+use crate::ast::CommentOrNewline;
+use bumpalo::collections::Vec;
+use inlinable_string::InlinableString;
+use roc_region::all::Loc;
+
+#[derive(Clone, Copy, PartialEq, Eq, Debug, Hash)]
+pub struct ModuleName<'a>(&'a str);
+
+impl<'a> Into<&'a str> for ModuleName<'a> {
+    fn into(self) -> &'a str {
+        self.0
+    }
+}
+
+impl<'a> Into<InlinableString> for ModuleName<'a> {
+    fn into(self) -> InlinableString {
+        self.0.into()
+    }
+}
+
+impl<'a> ModuleName<'a> {
+    pub fn new(name: &'a str) -> Self {
+        ModuleName(name)
+    }
+
+    pub fn as_str(&'a self) -> &'a str {
+        self.0
+    }
+}
+
+// TODO is this all duplicated from parse::ast?
+#[derive(Clone, Debug, PartialEq)]
+pub struct InterfaceHeader<'a> {
+    pub name: Loc<ModuleName<'a>>,
+    pub exposes: Vec<'a, Loc<Exposes<'a>>>,
+    pub imports: Vec<'a, (ModuleName<'a>, Vec<'a, Loc<Imports<'a>>>)>,
+
+    // Potential comments and newlines - these will typically all be empty.
+    pub after_interface: &'a [CommentOrNewline<'a>],
+    pub before_exposes: &'a [CommentOrNewline<'a>],
+    pub after_exposes: &'a [CommentOrNewline<'a>],
+    pub before_imports: &'a [CommentOrNewline<'a>],
+    pub after_imports: &'a [CommentOrNewline<'a>],
+}
+
+#[derive(Clone, Debug, PartialEq)]
+pub struct AppHeader<'a> {
+    pub imports: Vec<'a, (ModuleName<'a>, Loc<Imports<'a>>)>,
+
+    // Potential comments and newlines - these will typically all be empty.
+    pub before_imports: &'a [CommentOrNewline<'a>],
+    pub after_imports: &'a [CommentOrNewline<'a>],
+}
+
+#[derive(Clone, Debug, PartialEq)]
+pub enum Exposes<'a> {
+    /// e.g. `Task`
+    Ident(&'a str),
+
+    // Spaces
+    SpaceBefore(&'a Exposes<'a>, &'a [CommentOrNewline<'a>]),
+    SpaceAfter(&'a Exposes<'a>, &'a [CommentOrNewline<'a>]),
+}
+
+#[derive(Clone, Debug, PartialEq)]
+pub enum Imports<'a> {
+    /// e.g. `Task` or `Task.{ Task, after }`
+    Ident(&'a str, Vec<'a, &'a str>),
+
+    // Spaces
+    SpaceBefore(&'a Imports<'a>, &'a [CommentOrNewline<'a>]),
+    SpaceAfter(&'a Imports<'a>, &'a [CommentOrNewline<'a>]),
+}