Miroirs/waforth
1
0
Fork 0
mirror of https://github.com/remko/waforth synced 2024-12-26 09:59:09 +01:00
Code Issues Projects Releases Packages Wiki Activity Actions

tests: Load forth2012 test suite utilities + enable dependent tests

Browse source
This commit is contained in:
Remko Tronçon 2022-05-31 21:28:16 +02:00
parent 3cabd72cff
commit f4f1ed6560
2 changed files with 4 additions and 4 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

4
src/web/tests/forth2012-test-suite/coreexttest.fth
View file

@ -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

4
src/web/tests/suite.js
View file

@ -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 .(