factor/core/vocabs/parser/parser-tests.factor

10 lines
373 B
Factor

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