trace special form. close #45

src/test/cases/BasicTestCase.hx

@@ -346,6 +346,10 @@ class BasicTestCase extends Test {
     function testWhileLet() {
         _testWhileLet();
     }
+
+    function testTrace() {
+        _testTrace();
+    }
 }
 
 class BasicObject {

src/test/cases/BasicTestCase.kiss

@@ -637,4 +637,7 @@ From:[(assert false (+ \"false \" \"should \" \"have \" \"been \" \"true\"))]" m
             stream (Stream.fromString "a\nb\nc")]
         (whileLet [(Some line) (stream.takeLine)]
             (Assert.equals (nth lines idx) line)
-            (+= idx 1))))
+            (+= idx 1))))
+
+(function _testTrace []
+    (Assert.equals 5 (trace 5 "num")))