lua: raw table access — mutating set!, len via has-key?, +19 tests

lib/lua/runtime.sx

@@ -123,7 +123,7 @@
               (fn
                 (i)
                 (if
-                  (has? a (str i))
+                  (has-key? a (str i))
                   (begin (set! n i) (count-loop (+ i 1)))
                   n)))
             (count-loop 1))))
@@ -168,7 +168,7 @@
     (t k)
     (if (= t nil) nil (let ((v (get t (str k)))) (if (= v nil) nil v)))))
 
-(define lua-set! (fn (t k v) (assoc t (str k) v)))
+(define lua-set! (fn (t k v) (dict-set! t (str k) v)))
 
 (define
   lua-multi?