]> gitweb.factorcode.org Git - factor.git/blobdiff - basis/combinators/smart/smart-tests.factor
factor: trim using lists
[factor.git] / basis / combinators / smart / smart-tests.factor
index 59e778dd6edac03e48f41b5da5ef26ded9c1daf8..e8f746140458c21937ace2fc041a25823f43675d 100644 (file)
@@ -1,6 +1,6 @@
 ! Copyright (C) 2009 Doug Coleman.
 ! See http://factorcode.org/license.txt for BSD license.
-USING: accessors arrays assocs combinators.smart kernel locals
+USING: accessors arrays assocs combinators.smart kernel
 math random sequences stack-checker tools.test ;
 IN: combinators.smart.tests
 
@@ -129,4 +129,3 @@ IN: combinators.smart.tests
 { { 1 2 } 3 4 5 6 } [ [ 1 2 3 4 5 6 ] 4 output>array-n ] unit-test
 
 { t } [ [ 10 random dup even? ] smart-loop odd? ] unit-test
-{ t } [ 10 [ random dup even? ] smart-loop odd? ] unit-test