smp: Use without-interruption. Squash into ba4c087.

diff --git a/src/runtime/generic.scm b/src/runtime/generic.scm
index de020f93a0192e20850c9f164198d95ab5bf6c53..4fcaeebaa0d7dac6f503c5cc0c79ffeff4743d78 100644 (file)
--- a/src/runtime/generic.scm
+++ b/src/runtime/generic.scm
@@ -105,7 +105,7 @@ USA.
         (guarantee-generic-procedure generic
                                      'SET-GENERIC-PROCEDURE-GENERATOR!)))
     (guarantee-generator generator 'SET-GENERIC-PROCEDURE-GENERATOR!)
-    (without-interrupts
+    (without-interruption
      (lambda ()
        (set-generic-record/generator! record generator)
        (%reset-generic-procedure-cache! record)))))
@@ -135,7 +135,7 @@ USA.
 (define (%purge-generic-procedure-cache! generic record filter)
   ;; This might have interrupts locked for a long time, and thus is an
   ;; argument for using something like a semaphore to control access.
-  (without-interrupts
+  (without-interruption
    (lambda ()
      (set-generic-record/cache!
       record
@@ -282,7 +282,7 @@ USA.
                 (generic (generic-record/procedure record)))
             (or (and generator (generator generic tags))
                 (error:no-applicable-methods generic args)))))
-      (without-interrupts
+      (without-interruption
        (lambda ()
         (set-generic-record/cache!
          record