diff --git a/core/vocabs/parser/parser-tests.factor b/core/vocabs/parser/parser-tests.factor new file mode 100644 index 0000000000..b9a3245b34 --- /dev/null +++ b/core/vocabs/parser/parser-tests.factor @@ -0,0 +1,10 @@ +IN: vocabs.parser.tests +USING: vocabs.parser tools.test eval kernel accessors ; + +[ "FROM: kernel => doesnotexist ;" eval( -- ) ] +[ error>> T{ no-word-in-vocab { word "doesnotexist" } { vocab "kernel" } } = ] +must-fail-with + +[ "RENAME: doesnotexist kernel => newname" eval( -- ) ] +[ error>> T{ no-word-in-vocab { word "doesnotexist" } { vocab "kernel" } } = ] +must-fail-with \ No newline at end of file