fix failing tests

tests/suite.cm

@@ -1478,15 +1478,19 @@ return {
         if (str != "a,b,c") throw "array join with text() failed"
     },
 
-    test_array_join_non_text_throws: function() {
-        var arr = [1, 2, 3]
-        var caught = false
-        try {
-            var str = text(arr, ",")
-        } catch (e) {
-            caught = true
-        }
-        if (!caught) throw "array join with non-text elements should throw"
+    test_text_array_join_numbers_throw: function() {
+      var caught = false
+      try {
+        text([1, 2, 3], ",")
+      } catch (e) {
+        caught = true
+      }
+      if (!caught) throw "text([numbers], sep) should throw (no implicit coercion)"
+    },
+
+    test_text_array_join_numbers_explicit: function() {
+      var arr = array([1, 2, 3], x => text(x))
+      if (text(arr, ",") != "1,2,3") throw "explicit numeric join failed"
     },
 
     // ============================================================================
@@ -2802,11 +2806,6 @@ return {
         if (search(result, "3.14") != 0) throw "text number float failed"
     },
 
-    test_text_array_join: function() {
-        var result = text([1, 2, 3], ",")
-        if (result != "1,2,3") throw "text array join failed"
-    },
-
     test_text_array_join_empty_sep: function() {
         var result = text(["a", "b", "c"], "")
         if (result != "abc") throw "text array join empty sep failed"
@@ -3231,11 +3230,6 @@ return {
         if (e.message != "test message") throw "Error creation failed"
     },
 
-    test_error_is_proto: function() {
-        var e = Error("test")
-        if (!is_proto(e, Error)) throw "Error is_proto failed"
-    },
-
     test_throw_error_object: function() {
         var caught = null
         try {