@@ -2604,18 +2604,10 @@
 		(db:general-call dbdat 'top-test-set (list "LAUNCHED" test-name))
 		(db:general-call dbdat 'top-test-set-per-pf-counts (list test-name run-id test-name test-name test-name))))
 	#f)
       #f))
 
-(define (db:tests-register-test dbstruct run-id test-name item-path)
-  (db:with-db
-   dbstruct
-   run-id
-   #t
-   (lambda (db)
-     (sqlite3:execute db 'register-test run-id test-name item-path))))
-
 (define (db:test-get-logfile-info dbstruct run-id test-name)
   (db:with-db
    dbstruct
    run-id
    #f