8 lines
325 B
Factor
8 lines
325 B
Factor
IN: present.tests
|
|
USING: tools.test vocabs.hierarchy present math vocabs sequences kernel ;
|
|
|
|
[ "3" ] [ 3 present ] unit-test
|
|
[ "Hi" ] [ "Hi" present ] unit-test
|
|
[ "+" ] [ \ + present ] unit-test
|
|
[ "kernel" ] [ "kernel" vocab present ] unit-test
|
|
[ ] [ all-vocabs-recursive no-roots no-prefixes [ present ] map drop ] unit-test |