Fix parser tests
parent
5dd6b2504e
commit
eb6cdcc06e
|
@ -428,7 +428,7 @@ must-fail-with
|
||||||
"USE: this-better-not-exist" eval
|
"USE: this-better-not-exist" eval
|
||||||
] must-fail
|
] must-fail
|
||||||
|
|
||||||
[ ": foo ;" eval ] [ error>> no-current-vocab? ] must-fail-with
|
[ ": foo ;" eval ] [ error>> error>> no-current-vocab? ] must-fail-with
|
||||||
|
|
||||||
[ 92 ] [ "CHAR: \\" eval ] unit-test
|
[ 92 ] [ "CHAR: \\" eval ] unit-test
|
||||||
[ 92 ] [ "CHAR: \\\\" eval ] unit-test
|
[ 92 ] [ "CHAR: \\\\" eval ] unit-test
|
||||||
|
@ -483,7 +483,7 @@ must-fail-with
|
||||||
|
|
||||||
[ t ] [ "staging-problem-test-2" "parser.tests" lookup >boolean ] unit-test
|
[ t ] [ "staging-problem-test-2" "parser.tests" lookup >boolean ] unit-test
|
||||||
|
|
||||||
[ "DEFER: blah" eval ] [ error>> no-current-vocab? ] must-fail-with
|
[ "DEFER: blah" eval ] [ error>> error>> no-current-vocab? ] must-fail-with
|
||||||
|
|
||||||
[
|
[
|
||||||
"IN: parser.tests : blah ; parsing FORGET: blah" eval
|
"IN: parser.tests : blah ; parsing FORGET: blah" eval
|
||||||
|
|
Loading…
Reference in New Issue