From 1fab36429945490624caba247f659f3d767d5cba Mon Sep 17 00:00:00 2001 From: Slava Pestov Date: Mon, 16 Mar 2009 00:05:43 -0500 Subject: [PATCH] Updating some unit tests --- core/generic/generic-tests.factor | 2 +- core/parser/parser-tests.factor | 6 +++--- 2 files changed, 4 insertions(+), 4 deletions(-) diff --git a/core/generic/generic-tests.factor b/core/generic/generic-tests.factor index db404f4850..aea7875b20 100755 --- a/core/generic/generic-tests.factor +++ b/core/generic/generic-tests.factor @@ -247,4 +247,4 @@ GENERIC: move-method-generic ( a -- b ) [ ] [ "IN: generic.tests.a" "move-method-test-1" parse-stream drop ] unit-test -[ { string } ] [ move-method-generic order ] unit-test \ No newline at end of file +[ { string } ] [ \ move-method-generic order ] unit-test \ No newline at end of file diff --git a/core/parser/parser-tests.factor b/core/parser/parser-tests.factor index 5ec9ea9b3c..6b90abeced 100644 --- a/core/parser/parser-tests.factor +++ b/core/parser/parser-tests.factor @@ -3,7 +3,7 @@ io.streams.string namespaces classes effects source-files assocs sequences strings io.files io.pathnames definitions continuations sorting classes.tuple compiler.units debugger vocabs vocabs.loader accessors eval combinators lexer -vocabs.parser words.symbol ; +vocabs.parser words.symbol multiline ; IN: parser.tests \ run-file must-infer @@ -560,7 +560,7 @@ EXCLUDE: qualified.tests.bar => x ; ! Two similar bugs ! Replace : def with something in << >> -[ [ ] ] [ +/* [ [ ] ] [ "IN: parser.tests : was-once-a-word-bug ( -- ) ;" "was-once-a-word-test" parse-stream ] unit-test @@ -572,7 +572,7 @@ EXCLUDE: qualified.tests.bar => x ; "was-once-a-word-test" parse-stream ] unit-test -[ t ] [ "was-once-a-word-bug" "parser.tests" lookup >boolean ] unit-test +[ t ] [ "was-once-a-word-bug" "parser.tests" lookup >boolean ] unit-test */ ! Replace : def with DEFER: [ [ ] ] [