]> gitweb.factorcode.org Git - factor.git/blob - core/vocabs/parser/parser-tests.factor
b9a3245b34196c2c9943985b88908d967e9982b9
[factor.git] / core / vocabs / parser / parser-tests.factor
1 IN: vocabs.parser.tests
2 USING: vocabs.parser tools.test eval kernel accessors ;
3
4 [ "FROM: kernel => doesnotexist ;" eval( -- ) ]
5 [ error>> T{ no-word-in-vocab { word "doesnotexist" } { vocab "kernel" } } = ]
6 must-fail-with
7
8 [ "RENAME: doesnotexist kernel => newname" eval( -- ) ]
9 [ error>> T{ no-word-in-vocab { word "doesnotexist" } { vocab "kernel" } } = ]
10 must-fail-with