nth and dictGet in KissInterp2

src/kiss/KissInterp2.kiss

@@ -73,6 +73,20 @@
 			// in the interp variables. That might be nice.
 			(_evalAllCC args ->vals
 				(cc (Type.createInstance (first vals) (rest vals))))
+	=>"nth"
+		->[args cc]
+			(evalCC (first args)
+				->container
+					(evalCC (second args)
+						->index
+							(cc (nth container index))))
+	=>"dictGet"
+		->[args cc]
+			(evalCC (first args)
+				->container
+					(evalCC (second args)
+						->key
+							(cc (container.get key))))
 ])
 
 (method :ReaderExp read [:Dynamic input]

src/test/cases/KissInterp2TestCase.hx

@@ -34,4 +34,7 @@ class KissInterp2TestCase extends Test {
     function testLet() {
         _testLet();
     }
+    function testNth() {
+        _testNth();
+    }
 }

src/test/cases/KissInterp2TestCase.kiss

@@ -39,3 +39,8 @@
 (function _testLet []
     (let [interp (new Interp)]
 		(assertEval 5 "(let [a 2 b 3] (+ a b))")))
+
+(function _testNth []
+    (let [interp (new Interp)]
+		(assertEval 2 "(nth [1 2 3] 1)")
+		(assertEval 9 #"(dictGet [=>"a" 2 =>"b" 9 =>"c" 3] "b")"#)))