raw strings

src/test/cases/BasicTestCase.hx

@@ -273,6 +273,10 @@ class BasicTestCase extends Test {
     function testPatternLets() {
         _testPatternLets();
     }
+
+    function testRawString() {
+        _testRawString();
+    }
 }
 
 class BasicObject {

src/test/cases/BasicTestCase.kiss

@@ -454,4 +454,8 @@
             (Assert.fail))
         (unlessLet [(Some (or 5 6)) some5]
             (print "something else went wrong!")
-            (Assert.fail))))
+            (Assert.fail))))
+
+(defun _testRawString []
+    (Assert.equals #| "\\" |# #"\"#)
+    (Assert.equals #| "\"#" |# ##""#"##))