@@ -50,10 +50,12 @@
 (define *alt-log-file* #f)  ;; used by -log
 (define *db-sync-mutex* (make-mutex))
 
 ;; DATABASE
 (define *dbstruct-db*  #f)
+(define *db-stats* (make-hash-table)) ;; hash of vectors < count duration-total >
+(define *db-stats-mutex*      (make-mutex))
 
 ;; SERVER
 (define *my-client-signature* #f)
 (define *transport-type*    'http)
 (define *megatest-db*       #f)