From: Matt Birkholz <puck@birchwood-abbey.net>
Date: Fri, 13 Mar 2015 07:12:50 +0000 (-0700)
Subject: smp: Use without-interruption.  Squash into 6785039.
X-Git-Url: https://birchwood-abbey.net/git?a=commitdiff_plain;h=d30d6c4463db062076315e6fd8714f2bff949470;p=mit-scheme.git

smp: Use without-interruption.  Squash into 6785039.
---

diff --git a/src/runtime/gencache.scm b/src/runtime/gencache.scm
index ced613dc1..d036f7357 100644
--- a/src/runtime/gencache.scm
+++ b/src/runtime/gencache.scm
@@ -459,7 +459,7 @@ USA.
 		   ;; Found a free line.  First perform all of the
 		   ;; entry displacements, then return the subsequent
 		   ;; free line.
-		   (without-interrupts
+		   (without-interruption
 		    (lambda ()
 		      (let loop ((free-line line) (lines lines))
 			(if (null? lines)