summaryrefslogtreecommitdiffstats
diff options
context:
space:
mode:
authorKaz Kylheku <kaz@kylheku.com>2021-08-07 03:39:09 -0700
committerKaz Kylheku <kaz@kylheku.com>2021-08-07 03:39:09 -0700
commit01f40e228e53f0d5e3cfb49f2c7a7d97ebf30fd3 (patch)
tree7a90b77d815f5358b661e9833ebd1c788e45da69
parent25eb966ccb8b61dbe4ff2b2e1970e1e9caa0282f (diff)
downloadtxr-01f40e228e53f0d5e3cfb49f2c7a7d97ebf30fd3.tar.gz
txr-01f40e228e53f0d5e3cfb49f2c7a7d97ebf30fd3.tar.bz2
txr-01f40e228e53f0d5e3cfb49f2c7a7d97ebf30fd3.zip
windows: skip test requiring full Unicode.
* tests/012/cont.tl: Exit before the test case that contains characters ouside of the BMP, if (sizeof wchar) is less than 4.
-rw-r--r--tests/012/cont.tl3
1 files changed, 3 insertions, 0 deletions
diff --git a/tests/012/cont.tl b/tests/012/cont.tl
index b89b1502..f6724439 100644
--- a/tests/012/cont.tl
+++ b/tests/012/cont.tl
@@ -38,6 +38,9 @@
(list w1 w2 w3 w4)))
("that" "thing" "grows" "slowly"))
+(unless (>= (sizeof wchar) 4)
+ (exit 0))
+
(test (amb-scope
(let ((🍌 [apply amb (range 95795 95805)])
(🍏 [apply amb (range 217510 217520)])