Initial commit: WAFER (WebAssembly Forth Engine in Rust)

Optimizing Forth 2012 compiler targeting WebAssembly with IR-based
compilation pipeline, multi-typed stack inference, subroutine threading,
and JIT/consolidation modes. Rust kernel with ~35 primitives and Forth
standard library for core/core-ext word sets.

crates/core/tests/compliance.rs

@@ -0,0 +1,91 @@
+//! Forth 2012 compliance tests using Gerry Jackson's test suite.
+//!
+//! Each test function loads the corresponding test file from the
+//! forth2012-test-suite submodule and runs it through WAFER.
+//! Tests are initially `#[ignore]` and enabled as word sets are implemented.
+
+/// Path to the test suite source directory.
+/// The submodule lives at the workspace root: tests/forth2012-test-suite/
+const _TEST_SUITE_DIR: &str = concat!(
+    env!("CARGO_MANIFEST_DIR"),
+    "/../../tests/forth2012-test-suite/src"
+);
+
+// TODO: Test harness that boots WAFER, loads tester.fr, and runs test files.
+// For now, these are placeholder tests that document the compliance targets.
+
+#[test]
+#[ignore = "Step 10: Core word set not yet implemented"]
+fn compliance_core() {
+    // Will load: tester.fr, then core.fr
+    // Must pass with 0 failures
+    todo!("Boot WAFER, load tester.fr + core.fr, assert 0 failures");
+}
+
+#[test]
+#[ignore = "Step 10: Core word set not yet implemented"]
+fn compliance_core_plus() {
+    // Will load: tester.fr, then coreplustest.fth
+    todo!("Boot WAFER, load tester.fr + coreplustest.fth");
+}
+
+#[test]
+#[ignore = "Step 13: Core extensions not yet implemented"]
+fn compliance_core_ext() {
+    // Will load: tester.fr, utilities.fth, then coreexttest.fth
+    todo!("Boot WAFER, load coreexttest.fth");
+}
+
+#[test]
+#[ignore = "Step 13: Double-number word set not yet implemented"]
+fn compliance_double() {
+    todo!("Boot WAFER, load doubletest.fth");
+}
+
+#[test]
+#[ignore = "Step 13: Exception word set not yet implemented"]
+fn compliance_exception() {
+    todo!("Boot WAFER, load exceptiontest.fth");
+}
+
+#[test]
+#[ignore = "Step 13: Facility word set not yet implemented"]
+fn compliance_facility() {
+    todo!("Boot WAFER, load facilitytest.fth");
+}
+
+#[test]
+#[ignore = "Step 13: File-access word set not yet implemented"]
+fn compliance_file() {
+    todo!("Boot WAFER, load filetest.fth");
+}
+
+#[test]
+#[ignore = "Step 13: Locals word set not yet implemented"]
+fn compliance_locals() {
+    todo!("Boot WAFER, load localstest.fth");
+}
+
+#[test]
+#[ignore = "Step 13: Memory-allocation word set not yet implemented"]
+fn compliance_memory() {
+    todo!("Boot WAFER, load memorytest.fth");
+}
+
+#[test]
+#[ignore = "Step 13: Search-order word set not yet implemented"]
+fn compliance_search_order() {
+    todo!("Boot WAFER, load searchordertest.fth");
+}
+
+#[test]
+#[ignore = "Step 13: String word set not yet implemented"]
+fn compliance_string() {
+    todo!("Boot WAFER, load stringtest.fth");
+}
+
+#[test]
+#[ignore = "Step 13: Programming-tools word set not yet implemented"]
+fn compliance_tools() {
+    todo!("Boot WAFER, load toolstest.fth");
+}