math.matrices: use any? and all? directly in tests.

diff --git a/basis/math/matrices/matrices-tests.factor b/basis/math/matrices/matrices-tests.factor
index 4d4631905bb4553957287eb2e69cf4c76a1f5794..63b77db7156e530b97d92d967d52a419eeb78d72 100644 (file)
--- a/basis/math/matrices/matrices-tests.factor
+++ b/basis/math/matrices/matrices-tests.factor
@@ -33,7 +33,7 @@ PRIVATE>
     { { { } } }
     { { } { } { } }
     { { { } } { { { } } } }
-} [ null-matrix? ] map [ ] all?
+} [ null-matrix? ] all?
 ] unit-test
 
 { f } [ {
@@ -41,7 +41,7 @@ PRIVATE>
     { { 1 2 } }
     { { 1 } { 2 } }
     { { { 1 } } { 2 } { } }
-} [ null-matrix? ] map [ ] any?
+} [ null-matrix? ] any?
 ] unit-test
 
 { t } [ 10 dup <zero-matrix> zero-matrix? ] unit-test
@@ -345,7 +345,7 @@ PRIVATE>
     { { { } } }
     { { } { } { } }
     { { { } } { { { } } } }
-} [ null-matrix? ] map [ ] all?
+} [ null-matrix? ] all?
 ] unit-test
 
 { f } [ {
@@ -353,7 +353,7 @@ PRIVATE>
     { { 1 2 } }
     { { 1 } { 2 } }
     { { { 1 } } { 2 } { } }
-} [ null-matrix? ] map [ ] any?
+} [ null-matrix? ] any?
 ] unit-test
 
 { t } [ 10 dup <zero-matrix> zero-matrix? ] unit-test