From f4f1ed6560abf00907191d4f299c3e7de8c1e35b Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?Remko=20Tron=C3=A7on?= Date: Tue, 31 May 2022 21:28:16 +0200 Subject: [PATCH] tests: Load forth2012 test suite utilities + enable dependent tests --- src/web/tests/forth2012-test-suite/coreexttest.fth | 4 ++-- src/web/tests/suite.js | 4 ++-- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/src/web/tests/forth2012-test-suite/coreexttest.fth b/src/web/tests/forth2012-test-suite/coreexttest.fth index 3628fb6..2032fce 100644 --- a/src/web/tests/forth2012-test-suite/coreexttest.fth +++ b/src/web/tests/forth2012-test-suite/coreexttest.fth @@ -636,8 +636,8 @@ T{ CHAR " PARSE 4567 "DUP ROT ROT EVALUATE -> 5 4567 }T TESTING PARSE-NAME (Forth 2012) \ Adapted from the PARSE-NAME RfD tests -\ T{ PARSE-NAME abcd STR1 S= -> TRUE }T \ No leading spaces -\ T{ PARSE-NAME abcde STR2 S= -> TRUE }T \ Leading spaces +T{ PARSE-NAME abcd STR1 S= -> TRUE }T \ No leading spaces +T{ PARSE-NAME abcde STR2 S= -> TRUE }T \ Leading spaces \ Test empty parse area, new lines are necessary T{ PARSE-NAME diff --git a/src/web/tests/suite.js b/src/web/tests/suite.js index 6883f37..812a04a 100644 --- a/src/web/tests/suite.js +++ b/src/web/tests/suite.js @@ -1,7 +1,7 @@ import WAForth from "../waforth"; import sieve from "../../examples/sieve.f"; import forth2012TestSuiteTester from "./forth2012-test-suite/tester.fr"; -// import forth2012TestSuiteUtilities from "./forth2012-test-suite/utilities.fth"; +import forth2012TestSuiteUtilities from "./forth2012-test-suite/utilities.fth"; import forth2012CoreTestSuite from "./forth2012-test-suite/core.fr"; import forth2012CorePlusTestSuite from "./forth2012-test-suite/coreplustest.fth"; // import forth2012ErrorReport from "./forth2012-test-suite/errorreport.fth"; @@ -1639,7 +1639,7 @@ function loadTests() { it("should run core ext tests", () => { run(forth2012CoreTestSuite); run(forth2012CorePlusTestSuite); - // run(forth2012TestSuiteUtilities); + run(forth2012TestSuiteUtilities); // run(forth2012ErrorReport); run(forth2012CoreExtTestSuite); expect(output).to.include(`Output from .(