From dfdbde9f33bf85980b2b4527aacef6bd78a38f99 Mon Sep 17 00:00:00 2001 From: John Benediktsson Date: Tue, 28 Jan 2020 20:44:19 -0800 Subject: [PATCH] math.matrices: use any? and all? directly in tests. --- basis/math/matrices/matrices-tests.factor | 8 ++++---- 1 file changed, 4 insertions(+), 4 deletions(-) diff --git a/basis/math/matrices/matrices-tests.factor b/basis/math/matrices/matrices-tests.factor index 4d4631905b..63b77db715 100644 --- 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? ] 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? ] unit-test