@@ -55,14 +55,14 @@ orig-keys) (list changed deleted) ;; (list indat '()) ;; just for debugging )) -;; (cdb:remote-run db:get-keys #f) -;; (cdb:remote-run db:get-num-runs #f "%") -;; (cdb:remote-run db:get-runs #f runnamepatt numruns *start-run-offset* keypatts) -;; +;; (c?db:remote-run db:get-keys #f) +;; (c?db:remote-run db:get-num-runs #f "%") +;; (c?db:remote-run db:get-runs #f runnamepatt numruns *start-run-offset* keypatts) +;; ;; keynum => the field to use as the unique key (usually 0 but can be other field) ;; (define (synchash:client-get proc synckey keynum synchash . params) (let* ((data (apply cdb:remote-run synchash:server-get #f proc synckey keynum params)) (newdat (car data))