Add regression test for UTF and escapes.

This commit is contained in:
Paul Tagliamonte 2013-06-08 20:17:50 -04:00
parent 0f9324e794
commit 4aca7842cd

View File

@ -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)))