smp: Use without-interruption. Squash into 8f64b29.
authorMatt Birkholz <puck@birchwood-abbey.net>
Fri, 13 Mar 2015 07:10:23 +0000 (00:10 -0700)
committerMatt Birkholz <puck@birchwood-abbey.net>
Fri, 13 Mar 2015 07:10:23 +0000 (00:10 -0700)
src/runtime/gdbm.scm

index bb9f43f34909142522ac8221d32a93a83a7373b9..b8d324d54270d91c211ce09b00607e431993cdfd 100644 (file)
@@ -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