@@ -39,12 +39,12 @@
 ;; get a rundb vector, create it if not already existing
 (define (dbr:dbstruct-get-rundb-rec vec run-id)
   (let* ((dbhash (dbr:dbstruct-get-dbhash vec))              ;; get the runs hash
 	 (runvec (hash-table-ref/default dbhash run-id #f))) ;; get the vector for run-id
     (if (vector? runvec)
-	runvec
-	(let ((nvec  (vector #f #f -1 -1 -1 #f)))
+	runvec ;;           rundb inmemdb last-mod last-read last-sync in-use
+	(let ((nvec  (vector #f      #f       -1       -1       -1       #f)))
 	  (hash-table-set! dbhash run-id nvec)
 	  nvec))))
 
 ;;  [ rundb inmemdb last-mod last-read last-sync ]
 (define-inline (dbr:dbstruct-field-name->num field-name)
@@ -52,11 +52,11 @@
     ((rundb) 0) ;; the on-disk db
     ((inmem) 1) ;; the in-memory db
     ((mtime) 2) ;; last modification time
     ((rtime) 3) ;; last read time
     ((stime) 4) ;; last sync time
-    ((inuse) 5) ;; is the db currently in use
+    ((inuse) 5) ;; is the db currently in use, #t yes, #f no.
     (else -1)))
 
 ;; get/set rundb fields
 (define (dbr:dbstruct-get-runvec-val vec run-id field-name)
   (let ((runvec   (dbr:dbstruct-get-rundb-rec vec run-id))