X-Git-Url: http://repo.macrolet.net/gitweb/?a=blobdiff_plain;f=src%2Fruntime%2Finterrupt.c;h=5155c6a4fde116feab6efa5dbc489b6c82f48fbc;hb=65a01dae3d437a48e8dd0d051a446245f9e29929;hp=efe76e3aa9ffb5ca2bf45cfccc06bc73cfa688a0;hpb=1419c1d2d50f039be46a8667351b7738ac4965e4;p=sbcl.git

diff --git a/src/runtime/interrupt.c b/src/runtime/interrupt.c
index efe76e3..5155c6a 100644
--- a/src/runtime/interrupt.c
+++ b/src/runtime/interrupt.c
@@ -288,7 +288,7 @@ interrupt_handle_pending(os_context_t *context)
 	{
 	    fake_foreign_function_call(context);
 	}
-	funcall0(SymbolFunction(MAYBE_GC));
+	funcall0(SymbolFunction(SUB_GC));
 #ifndef __i386__
 	if (were_in_lisp)
 #endif
@@ -606,7 +606,7 @@ interrupt_maybe_gc(int signal, siginfo_t *info, void *void_context)
 	else {
 	    lispobj *old_free_space=current_dynamic_space;
 	    fake_foreign_function_call(context);
-	    funcall0(SymbolFunction(MAYBE_GC));
+	    funcall0(SymbolFunction(SUB_GC));
 	    undo_fake_foreign_function_call(context);
 	    if(current_dynamic_space==old_free_space) 
 		/* MAYBE-GC (as the name suggest) might not.  If it