From f141dd205a3f818790de346e6c99d9d898057c05 Mon Sep 17 00:00:00 2001 From: Mathieu Othacehe Date: Thu, 15 Oct 2020 10:45:13 +0200 Subject: Use with-db-writer-worker-thread/force macro. * src/cuirass/database.scm (db-register-builds): Use "with-db-writer-worker-thread/force" macro. --- src/cuirass/database.scm | 3 +-- 1 file changed, 1 insertion(+), 2 deletions(-) diff --git a/src/cuirass/database.scm b/src/cuirass/database.scm index 31e65f6..fc3eb00 100644 --- a/src/cuirass/database.scm +++ b/src/cuirass/database.scm @@ -736,8 +736,7 @@ path) VALUES (" ;; Use the database worker dedicated to write queries. We don't want this ;; query to be queued as it is already a quite large transaction by itself, ;; so pass the #:FORCE? option. - (with-db-writer-worker-thread db - #:force? #t + (with-db-writer-worker-thread/force db (log-message "Registering builds for evaluation ~a." eval-id) (sqlite-exec db "BEGIN TRANSACTION;") (let ((derivations (filter-map register jobs))) -- cgit v1.2.3