In process locking implemented, not sqlite locking.

class.rkt

@@ -56,5 +56,8 @@
 
     (define/public (key-values)
       (ks-key-values ksh))
+
+    (define/public (with-lock proc)
+      (ks-with-lock ksh proc))
     )
   )