Fixing unit test failures
parent
72cedcaf47
commit
7174e8cbc4
|
@ -322,7 +322,7 @@ IN: parser.tests
|
|||
[
|
||||
"IN: parser.tests \\ class-fwd-test"
|
||||
<string-reader> "redefining-a-class-3" parse-stream drop
|
||||
] [ [ no-word? ] is? ] must-fail-with
|
||||
] [ [ no-word-error? ] is? ] must-fail-with
|
||||
|
||||
[ ] [
|
||||
"IN: parser.tests TUPLE: class-fwd-test ; SYMBOL: class-fwd-test"
|
||||
|
@ -332,7 +332,7 @@ IN: parser.tests
|
|||
[
|
||||
"IN: parser.tests \\ class-fwd-test"
|
||||
<string-reader> "redefining-a-class-3" parse-stream drop
|
||||
] [ [ no-word? ] is? ] must-fail-with
|
||||
] [ [ no-word-error? ] is? ] must-fail-with
|
||||
|
||||
[
|
||||
"IN: parser.tests : foo ; TUPLE: foo ;"
|
||||
|
|
|
@ -252,7 +252,7 @@ PREDICATE: unexpected-eof < unexpected
|
|||
[ "Use the word " swap summary append ] keep
|
||||
] { } map>assoc ;
|
||||
|
||||
ERROR: no-word-error name ;
|
||||
TUPLE: no-word-error name ;
|
||||
|
||||
M: no-word-error summary
|
||||
drop "Word not found in current vocabulary search path" ;
|
||||
|
|
|
@ -68,7 +68,7 @@ IN: vocabs.loader.tests
|
|||
<string-reader>
|
||||
"resource:core/vocabs/loader/test/a/a.factor"
|
||||
parse-stream
|
||||
] [ [ no-word? ] is? ] must-fail-with
|
||||
] [ [ no-word-error? ] is? ] must-fail-with
|
||||
|
||||
0 "count-me" set-global
|
||||
|
||||
|
|
Loading…
Reference in New Issue