[no subject]

[Ludovic Courtès]

branch: master
commit ced26b60129a74463952ca0ddf42e0ceeeb8e1fc
Author: Ludovic Courtès <address@hidden>
Date:   Fri Jan 26 14:37:22 2018 +0100

    cuirass: Reduce Fiber's tick rate.
    
    * bin/cuirass.in (main): Pass #:hz to 'run-fibers'.
---
 bin/cuirass.in | 6 ++++++
 1 file changed, 6 insertions(+)

diff --git a/bin/cuirass.in b/bin/cuirass.in
index 8f3fbf4..13de395 100644
--- a/bin/cuirass.in
+++ b/bin/cuirass.in
@@ -152,4 +152,10 @@ exec ${GUILE:address@hidden@} --no-auto-compile -e main -s 
"$0" "$@"
 
                      (primitive-exit (get-message exit-channel))))))
 
+           ;; Most of our code is I/O so preemption doesn't matter much (it
+           ;; could help while we're doing SQL requests, for instance, but it
+           ;; doesn't actually help since these are non-resumable
+           ;; continuations.)  Thus, reduce the tick rate.
+           #:hz 10
+
            #:drain? #t)))))))