Remove without-interrupts from runtime/condvar.scm.
authorMatt Birkholz <puck@birchwood-abbey.net>
Wed, 17 Jun 2015 02:13:46 +0000 (19:13 -0700)
committerMatt Birkholz <puck@birchwood-abbey.net>
Mon, 17 Aug 2015 23:52:58 +0000 (16:52 -0700)
Multi-threaded access to the chain of waiters is already adequately
serialized by the condition-variable.lock.  Without-interrupts was
only intended to postpone aborts that would leave a doubly-linked
chain without a complete pair of links.

src/runtime/condvar.scm

index d1ec02acd8bec72c48152e493d6324805488e64b..822a4cf7a31fca3a1cddcab792521941fea78505 100644 (file)
@@ -189,7 +189,7 @@ USA.
       (assert (not (eq? tail previous)))
       (assert (eq? tail (waiter.next previous)))
       ;; Commit the changes all together or not at all.
-      (without-interrupts
+      (without-interruption
        (lambda ()
         (set-waiter.previous! tail waiter)
         (set-waiter.next! previous waiter)
@@ -209,7 +209,7 @@ USA.
     (assert (eq? waiter (waiter.next previous)))
     (assert (eq? waiter (waiter.previous next)))
     ;; Commit the changes all together or not at all.
-    (without-interrupts
+    (without-interruption
      (lambda ()
        (set-waiter.next! previous next)
        (set-waiter.previous! next previous)