@@ -121,10 +121,11 @@
 				      (db:with-db dbstruct run-id #t ;; these are all for modifying the db
 						  (lambda (db)
 						    (db:general-call db stmtname realparams)))))
     ((sync-inmem->db)               (db:sync-touched dbstruct run-id force-sync: #t))
     ((sdb-qry)                      (apply sdb:qry params))
+    ((ping)                         (current-process-id))
 
     ;; TESTMETA
     ((testmeta-get-record)       (apply db:testmeta-get-record dbstruct params))
     ((testmeta-add-record)       (apply db:testmeta-add-record dbstruct params))
     ((testmeta-update-field)     (apply db:testmeta-update-field dbstruct params))