diff --git a/fnliterals.scad b/fnliterals.scad index d67562f..901ce5e 100644 --- a/fnliterals.scad +++ b/fnliterals.scad @@ -1709,7 +1709,7 @@ function f_is_function(a) = f_1arg(function (a) is_function(a))(a); // A factory that returns function literals equivalent to `is_vector(a)`. // Arguments: // a = If given, replaces the argument. -function f_is_vector(a,b) = f_2arg(function (a,b) is_vector(a,b)); +function f_is_vector(a,b) = f_2arg(function (a,b) is_vector(a,b))(a,b); // Function: f_is_path() @@ -1722,7 +1722,7 @@ function f_is_vector(a,b) = f_2arg(function (a,b) is_vector(a,b)); // A factory that returns function literals equivalent to `is_path(a)`. // Arguments: // a = If given, replaces the argument. -function f_is_path(a,b) = f_2arg(function (a,b) is_path(a,b)); +function f_is_path(a,b) = f_2arg(function (a,b) is_path(a,b))(a,b); // Function: f_is_region() diff --git a/tests/test_fnliterals.scad b/tests/test_fnliterals.scad index edb07a5..1782034 100644 --- a/tests/test_fnliterals.scad +++ b/tests/test_fnliterals.scad @@ -806,7 +806,7 @@ module test_f_is_bool() { ["foo", false], [[4,5,6], false] ]) { - assert(testfn(test[0]), test[1]); + assert(testfn(test[0]) == test[1]); } } test_f_is_bool(); @@ -823,7 +823,7 @@ module test_f_is_def() { ["foo", true], [[4,5,6], true] ]) { - assert(testfn(test[0]), test[1]); + assert(testfn(test[0]) == test[1]); } } test_f_is_def(); @@ -840,7 +840,7 @@ module test_f_is_undef() { ["foo", false], [[4,5,6], false] ]) { - assert(testfn(test[0]), test[1]); + assert(testfn(test[0]) == test[1]); } } test_f_is_undef(); @@ -863,7 +863,7 @@ module test_f_is_num() { ["foo", false], [[4,5,6], false] ]) { - assert(testfn(test[0]), test[1]); + assert(testfn(test[0]) == test[1]); } } test_f_is_num(); @@ -886,7 +886,7 @@ module test_f_is_int() { ["foo", false], [[4,5,6], false] ]) { - assert(testfn(test[0]), test[1]); + assert(testfn(test[0]) == test[1]); } } test_f_is_int(); @@ -909,7 +909,7 @@ module test_f_is_nan() { ["foo", false], [[4,5,6], false] ]) { - assert(testfn(test[0]), test[1]); + assert(testfn(test[0]) == test[1]); } } test_f_is_nan(); @@ -931,7 +931,7 @@ module test_f_is_finite() { ["foo", false], [[4,5,6], false] ]) { - assert(testfn(test[0]), test[1]); + assert(testfn(test[0]) == test[1]); } } test_f_is_finite(); @@ -955,7 +955,7 @@ module test_f_is_string() { [[4,5,6], false], [[4:1:6], false] ]) { - assert(testfn(test[0]), test[1]); + assert(testfn(test[0]) == test[1]); } } test_f_is_string(); @@ -979,7 +979,7 @@ module test_f_is_list() { [[4,5,6], true], [[4:1:6], false] ]) { - assert(testfn(test[0]), test[1]); + assert(testfn(test[0]) == test[1]); } } test_f_is_list(); @@ -1005,7 +1005,7 @@ module test_f_is_path() { [square(100), true], [circle(100), true] ]) { - assert(testfn(test[0]), test[1]); + assert(testfn(test[0]) == test[1], str(test[0]," should be ",test[1])); } } test_f_is_path();