Add regression test for UTF and escapes.

2013-06-08 20:17:50 -04:00 · 2013-06-08 20:17:50 -04:00 · 4aca7842cd
commit 4aca7842cd
parent 0f9324e794
1 changed files with 4 additions and 0 deletions
--- a/tests/native_tests/language.hy
+++ b/tests/native_tests/language.hy
@ -728,3 +728,7 @@
                  (assert (= x [3 2 1]))
                  "success")
              (except [NameError] "failure")))))
+
+(defn test-encoding-nightmares []
+  "NATIVE: test unicode encoding escaping crazybits"
+  (assert (= (len "ℵℵℵ♥♥♥\t♥♥\r\n") 11)))