Create separate prim-constants crate

Author: purefunctor

Cargo.lock

@@ -13,6 +13,7 @@ lock_api = "0.4.13"
 lowering = { version = "0.1.0", path = "../lowering" }
 parking_lot = "0.12.4"
 parsing = { version = "0.1.0", path = "../parsing" }
+prim-constants = { version = "0.1.0", path = "../prim-constants" }
 resolving = { version = "0.1.0", path = "../resolving" }
 rustc-hash = "2.1.1"
 stabilizing = { version = "0.1.0", path = "../stabilizing" }

compiler-core/building/Cargo.toml

@@ -1,38 +1,20 @@
 use std::{fs::File, io::Write, sync::LazyLock};
 
 use files::Files;
+use prim_constants::MODULE_MAP;
 use tempfile::{Builder, TempDir};
 use url::Url;
 
 use crate::QueryEngine;
 
 pub const SCHEME: &str = "prim";
-pub const PRIM: &str = include_str!("prim/Prim.purs");
-pub const PRIM_BOOLEAN: &str = include_str!("prim/Prim.Boolean.purs");
-pub const PRIM_COERCE: &str = include_str!("prim/Prim.Coerce.purs");
-pub const PRIM_INT: &str = include_str!("prim/Prim.Int.purs");
-pub const PRIM_ORDERING: &str = include_str!("prim/Prim.Ordering.purs");
-pub const PRIM_ROW: &str = include_str!("prim/Prim.Row.purs");
-pub const PRIM_ROW_LIST: &str = include_str!("prim/Prim.RowList.purs");
-pub const PRIM_SYMBOL: &str = include_str!("prim/Prim.Symbol.purs");
-pub const PRIM_TYPE_ERROR: &str = include_str!("prim/Prim.TypeError.purs");
 
 pub fn configure(engine: &mut QueryEngine, files: &mut Files) {
-    for (name, content) in [
-        ("Prim", PRIM),
-        ("Prim.Boolean", PRIM_BOOLEAN),
-        ("Prim.Coerce", PRIM_COERCE),
-        ("Prim.Int", PRIM_INT),
-        ("Prim.Ordering", PRIM_ORDERING),
-        ("Prim.Row", PRIM_ROW),
-        ("Prim.RowList", PRIM_ROW_LIST),
-        ("Prim.Symbol", PRIM_SYMBOL),
-        ("Prim.TypeError", PRIM_TYPE_ERROR),
-    ] {
+    for (name, content) in MODULE_MAP {
         let path = format!("{SCHEME}://localhost/{name}.purs");
-        let id = files.insert(path, content);
+        let id = files.insert(path, *content);
 
-        engine.set_content(id, content);
+        engine.set_content(id, *content);
         engine.set_module_file(name, id);
     }
 }

compiler-core/building/src/prim.rs

@@ -0,0 +1,6 @@
+[package]
+name = "prim-constants"
+version = "0.1.0"
+edition = "2024"
+
+[dependencies]

compiler-core/prim-constants/Cargo.toml

@@ -0,0 +1,25 @@
+macro_rules! define {
+    ($($const:ident, $path:expr, $name:expr $(;)?)+) => {
+        $(
+            pub const $const: &str = include_str!($path);
+        )+
+
+        pub const MODULE_MAP: &[(&str, &str)] = &[
+            $(
+                ($name, $const),
+            )+
+        ];
+    };
+}
+
+define!(
+    PRIM, "prim/Prim.purs", "Prim";
+    PRIM_BOOLEAN, "prim/Prim.Boolean.purs", "Prim.Boolean";
+    PRIM_COERCE, "prim/Prim.Coerce.purs", "Prim.Coerce";
+    PRIM_INT, "prim/Prim.Int.purs", "Prim.Int";
+    PRIM_ORDERING, "prim/Prim.Ordering.purs", "Prim.Ordering";
+    PRIM_ROW, "prim/Prim.Row.purs", "Prim.Row";
+    PRIM_ROW_LIST, "prim/Prim.RowList.purs", "Prim.RowList";
+    PRIM_SYMBOL, "prim/Prim.Symbol.purs", "Prim.Symbol";
+    PRIM_TYPE_ERROR, "prim/Prim.TypeError.purs", "Prim.TypeError";
+);