@@ -3047,11 +3047,11 @@
 ;;
 ;; 1. cache tests-match-qry
 ;; 2. compile qry and store in hash
 ;; 3. convert for-each-row to fold
 ;;
-(define (db:get-tests-for-run-state-status dbstruct run-id testpatt)
+#;(define (db:get-tests-for-run-state-status dbstruct run-id testpatt)
   (db:with-db
    dbstruct run-id #f
    (lambda (db)
      (let* ((res            '())
 	    (stmt-cache      (dbr:dbstruct-stmt-cache dbstruct))