Index: db.scm
==================================================================
--- db.scm
+++ db.scm
@@ -144,11 +144,15 @@
 	  (if write-access
 	      (begin
 		(if (not dbexists)
 		    (begin
 		      (db:initialize-run-id-db db)
-		      ;; (sdb:initialize db) 
+		      (sqlite3:execute 
+		       db
+		       "INSERT OR IGNORE INTO tests (id,run_id,testname,event_time,item_path,state,status) VALUES (?,?,'bogustest',strftime('%s','now'),'nowherepath','DELETED','n/a');"
+		       (* run-id 30000) ;; allow for up to 30k tests per run
+		       run-id)
 		      )) ;; add strings db to rundb, not in use yet
 		(sqlite3:set-busy-handler! db handler)
 		(sqlite3:execute db "PRAGMA synchronous = 1;"))) ;; was 0 but 0 is a gamble
 	  (dbr:dbstruct-set-rundb! dbstruct db)
 	  (dbr:dbstruct-set-inuse! dbstruct #t)