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

present now supports vocab-specs not just vocabs

db4
Slava Pestov 2009-01-16 12:47:33 -06:00
parent 4f540c288c
commit c686521bdc
2 changed files with 4 additions and 3 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
basis/present/present-tests.factor
View File

@ -1,7 +1,8 @@
IN: present.tests IN: present.tests
USING: tools.test present math vocabs ; USING: tools.test present math vocabs tools.vocabs sequences kernel ;
[ "3" ] [ 3 present ] unit-test [ "3" ] [ 3 present ] unit-test
[ "Hi" ] [ "Hi" present ] unit-test [ "Hi" ] [ "Hi" present ] unit-test
[ "+" ] [ \ + present ] unit-test [ "+" ] [ \ + present ] unit-test
[ "kernel" ] [ "kernel" vocab present ] unit-test [ "kernel" ] [ "kernel" vocab present ] unit-test
[ ] [ all-vocabs-seq [ present ] map drop ] unit-test

2
basis/present/present.factor
View File

@ -12,7 +12,7 @@ M: string present ;
M: word present name>> ; M: word present name>> ;
M: vocab present name>> ; M: vocab-spec present name>> ;
M: effect present effect>string ; M: effect present effect>string ;