File dbwars/sqlite3-test.scm artifact 7006237c12 part of check-in bc4a22eff5
(use sqlite3) (include "test-common.scm") (define db (open-database "test.db")) (execute db test-table-defn) (execute db syncsetup) (define (register-test db run-id testname host cpuload diskfree uname rundir shortdir item-path state status final-logf run-duration comment event-time) (execute db test-insert run-id testname host cpuload diskfree uname rundir shortdir item-path state status final-logf run-duration comment event-time)) (create-tests db) (finalize! db)