aboutsummaryrefslogtreecommitdiff
path: root/guix-build-coordinator/datastore/sqlite.scm
diff options
context:
space:
mode:
Diffstat (limited to 'guix-build-coordinator/datastore/sqlite.scm')
-rw-r--r--guix-build-coordinator/datastore/sqlite.scm6
1 files changed, 6 insertions, 0 deletions
diff --git a/guix-build-coordinator/datastore/sqlite.scm b/guix-build-coordinator/datastore/sqlite.scm
index 5772402..8b209b7 100644
--- a/guix-build-coordinator/datastore/sqlite.scm
+++ b/guix-build-coordinator/datastore/sqlite.scm
@@ -192,6 +192,12 @@ CREATE TABLE IF NOT EXISTS mem.build_allocation_plan (
"warning: database write delayed by ~1,2f seconds~%"
seconds-delayed))))))
+ ;; Make sure the worker thread has initialised, and created the in memory
+ ;; tables
+ (call-with-worker-thread
+ (slot-ref datastore 'worker-writer-thread-channel)
+ (const #t))
+
(slot-set!
datastore
'worker-reader-thread-channel