Try using 2 threads for the server

guix-data-service/web/server.scm

@@ -133,12 +133,22 @@
            #:parallelism 4)))
 
        (run-fibers
+        (lambda ()
+          (let* ((current (current-scheduler))
+                 (schedulers
+                  (cons current (scheduler-remote-peers current))))
+            (for-each
+             (lambda (i sched)
+               (spawn-fiber
                 (lambda ()
                   (catch 'system-error
                     (lambda ()
                       (set-thread-name
-               (string-append "server")))
+                       (string-append "server " (number->string i))))
-            (const #t))
+                    (const #t)))
+                sched))
+             (iota (length schedulers))
+             schedulers))
 
           (while (not request-scheduler)
             (sleep 0.1))
@@ -236,6 +246,6 @@ port. Also, the port used can be changed by passing the --port option.\n"
           (spawn-port-monitoring-fiber port finished?)
 
           (wait finished?))
-        #:hz 5
+        #:hz 0
-        #:parallelism 1))
+        #:parallelism 2))
      finished?)))