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

smp: Use without-interruption.  Squash into 8f64b29.
---

diff --git a/src/runtime/gdbm.scm b/src/runtime/gdbm.scm
index bb9f43f34..b8d324d54 100644
--- a/src/runtime/gdbm.scm
+++ b/src/runtime/gdbm.scm
@@ -58,7 +58,7 @@ USA.
   (if (not (gdbm-available?))
       (error "This Scheme system was built without gdbm support."))
   (let ((filename (->namestring (merge-pathnames filename))))
-    (without-interrupts
+    (without-interruption
      (lambda ()
        (add-to-gc-finalizer!
 	gdbf-finalizer