diff options
author | Kaz Kylheku <kaz@kylheku.com> | 2021-08-07 03:39:09 -0700 |
---|---|---|
committer | Kaz Kylheku <kaz@kylheku.com> | 2021-08-07 03:39:09 -0700 |
commit | 01f40e228e53f0d5e3cfb49f2c7a7d97ebf30fd3 (patch) | |
tree | 7a90b77d815f5358b661e9833ebd1c788e45da69 | |
parent | 25eb966ccb8b61dbe4ff2b2e1970e1e9caa0282f (diff) | |
download | txr-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.tl | 3 |
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)]) |