From 78af32f3f40e8f11faaffdfa64636995be726b5e Mon Sep 17 00:00:00 2001 From: Matt Birkholz Date: Fri, 13 Mar 2015 00:05:46 -0700 Subject: [PATCH] smp: use without-interruption. Squash into be90997. --- src/runtime/condvar.scm | 4 ++-- 1 file changed, 2 insertions(+), 2 deletions(-) diff --git a/src/runtime/condvar.scm b/src/runtime/condvar.scm index 552c45310..c7750794e 100644 --- a/src/runtime/condvar.scm +++ b/src/runtime/condvar.scm @@ -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) -- 2.25.1