aboutsummaryrefslogtreecommitdiff
diff options
context:
space:
mode:
-rw-r--r--nar-herder/cached-compression.scm1
-rw-r--r--nar-herder/database.scm2
2 files changed, 3 insertions, 0 deletions
diff --git a/nar-herder/cached-compression.scm b/nar-herder/cached-compression.scm
index 6928d9b..92e0644 100644
--- a/nar-herder/cached-compression.scm
+++ b/nar-herder/cached-compression.scm
@@ -303,6 +303,7 @@
(atomic-box-ref cached-bytes-by-compression-box))
(list cached-bytes-by-compression-box)))
+ #:name "comp nar req"
;; Just make one thread, as this thread won't do much work
;; and relies on a hash table that shouldn't be accessed by
;; multiple threads
diff --git a/nar-herder/database.scm b/nar-herder/database.scm
index dca11ad..521e7cc 100644
--- a/nar-herder/database.scm
+++ b/nar-herder/database.scm
@@ -259,6 +259,7 @@ CREATE INDEX cached_narinfo_files_narinfo_id
(lambda (db)
(sqlite-close db))
#:lifetime 50000
+ #:name "db r"
;; Use a minimum of 2 and a maximum of 8 threads
#:parallelism
@@ -309,6 +310,7 @@ CREATE INDEX cached_narinfo_files_narinfo_id
(sqlite-close db))
#:lifetime 500
+ #:name "db w"
;; SQLite doesn't support parallel writes
#:parallelism 1