X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;ds=sidebyside;f=src%2Fruntime%2Fpurify.c;h=eaa602efcc45445f9ab4bf185b9fa6090875d911;hb=ccc6c35c6d30b2c600c1388052b36f3a7dc08361;hp=ca850dd4bd4af6127476073095413d35d1931e2d;hpb=c2144640eeb8875228a121c76cc778e2af661064;p=sbcl.git

diff --git a/src/runtime/purify.c b/src/runtime/purify.c
index ca850dd..eaa602e 100644
--- a/src/runtime/purify.c
+++ b/src/runtime/purify.c
@@ -1491,9 +1491,8 @@ purify(lispobj static_roots, lispobj read_only_roots)
     printf(" handlers");
     fflush(stdout);
 #endif
-    pscav((lispobj *) all_threads->interrupt_data->interrupt_handlers,
-          sizeof(all_threads->interrupt_data->interrupt_handlers)
-          / sizeof(lispobj),
+    pscav((lispobj *) interrupt_handlers,
+          sizeof(interrupt_handlers) / sizeof(lispobj),
           0);
 
 #ifdef PRINTNOISE