steve
/
factor
1
0
Fork 0
Code Issues Pull Requests Releases Wiki Activity

vocabs.parser: add tests to assert that the correct errors get thrown

db4
Slava Pestov 2009-07-18 07:02:13 -05:00
parent a716e4cddb
commit e630102252
1 changed files with 10 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

10
core/vocabs/parser/parser-tests.factor Normal file
View File

@ -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