summaryrefslogtreecommitdiff
diff options
context:
space:
mode:
authorAndy Wingo <wingo@pobox.com>2017-08-06 15:40:04 +0200
committerAndy Wingo <wingo@pobox.com>2017-08-06 15:40:04 +0200
commitb836fad883a0a0fc9d543e86d3da8fe956b98e8d (patch)
tree3cefbf7563472951005064be800cacfdb1b9b8e0
parentLighten up fibers by installing "catch" in scheduler (diff)
downloadguile-fibers-b836fad883a0a0fc9d543e86d3da8fe956b98e8d.tar.gz
Fix concurrency bug in memcached server
-rw-r--r--examples/memcached-server.scm4
1 files changed, 3 insertions, 1 deletions
diff --git a/examples/memcached-server.scm b/examples/memcached-server.scm
index 3761cc0..b8ed25f 100644
--- a/examples/memcached-server.scm
+++ b/examples/memcached-server.scm
@@ -140,4 +140,6 @@
(sigaction SIGPIPE SIG_IGN)
(socket-loop socket (make-hash-table)))
-(run-fibers run-memcached)
+;; Have to restrict parallelism as long as we are using a
+;; thread-unsafe hash table as the store!
+(run-fibers run-memcached #:parallelism 1)