Pipes and test scripts

Test/Scripts/TCO1.txt

@@ -0,0 +1,9 @@
+;; EXPECT: "done"
+;; TYPE: vkText
+(do
+(def count-down (fn [n] 
+  (if (= n 0) 
+      "done" 
+      (recur (- n 1)))))
+(count-down 100000)
+)

Test/Scripts/Test1.txt

@@ -0,0 +1,3 @@
+;; EXPECT: 25
+;; TYPE: vkScalar
+(+ 10 15)

Test/Scripts/fn1.txt

@@ -0,0 +1,4 @@
+;; EXPECT: <method>
+;; TYPE: vkMethod
+;; SIGNATURE: Method(Unknown): Unknown
+(fn [n] (do n))