]> gitweb.factorcode.org Git - factor.git/blobdiff - extra/combinators/extras/extras-tests.factor
combinators.extras: another test
[factor.git] / extra / combinators / extras / extras-tests.factor
index f507f72715a18beb8b7daf113c02211f06c5111b..9a93f0b88b25e38dba009d4f167a4c2ce53878cc 100644 (file)
@@ -46,6 +46,7 @@ SYNTAX: ..< dup pop scan-object [a..b) suffix! ;
 
 { "twelve" } [ 12 describe-number ] unit-test
 { "several" } [ 5 describe-number ] unit-test
+{ "tens of" } [ 10 describe-number ] unit-test
 { "millions and millions of" } [ 1,000,000 describe-number ] unit-test
 
 { { 1 2 3 } } [ 1 { [ ] [ 1 + ] [ 2 + ] } cleave-array ] unit-test