generalizations: fix test

diff --git a/core/generalizations/generalizations-tests.factor b/core/generalizations/generalizations-tests.factor
index f1f3c2d790d25b0a67bbeb1419fcb1d52911133c..4155480d44f45aa2b086e13c0b9e503bd4e57338 100644 (file)
--- a/core/generalizations/generalizations-tests.factor
+++ b/core/generalizations/generalizations-tests.factor
@@ -6,8 +6,8 @@ IN: generalizations.tests
 { 1 2 3 4 2 } [ 1 2 3 4 3 npick ] unit-test
 { 1 2 3 4 3 } [ 1 2 3 4 2 npick ] unit-test
 { 1 2 3 4 4 } [ 1 2 3 4 1 npick ] unit-test
-[ 1 2 3 4 0 npick ] [ nonpositive-npick? ] must-fail-with
-[ 1 2 3 4 -11 npick ] [ nonpositive-npick? ] must-fail-with
+[ 1 2 3 4 0 npick ] [ positive-number-expected? ] must-fail-with
+[ 1 2 3 4 -11 npick ] [ positive-number-expected? ] must-fail-with
 
 [ 1 1 ndup ] must-infer
 { 1 1 } [ 1 1 ndup ] unit-test