[Sbcl-commits] CVS: sbcl/src/runtime interrupt.c,1.35,1.36

[Daniel B. <da...@us...>]

Update of /cvsroot/sbcl/sbcl/src/runtime
In directory sc8-pr-cvs1:/tmp/cvs-serv2744/src/runtime

Modified Files:
	interrupt.c 
Log Message:
0.pre8.85
	Merge the definitely-maybe-gc branch:

	Remove all the lispland logic that checks bytes-consed
	thresholds to see if it's worth GCing: C does these checks
	anyway.  SUB-GC now always GCs unless *GC-INHIBIT* says not to

	Delete the notify before/after calls and notify-stream.
	(Planned future change: pass the same information to
	*{BEFORE,AFTER}-GC-HOOKS* instead)

	*SOFT-HEAP-LIMIT* and MAYBE-GC are gone (unused).
	*ALREADY-MAYBE-GCING* is also dead, replaced with a proper
	mutex that will also prevent simultaneous GCs from multiple
	threads.  This entails moving gc.lisp and purify.lisp after
	target-thread in the build-order

	(Unithread WITH-MUTEX now honours its WAIT-P argument, so
	actually works in this situation)



Index: interrupt.c
===================================================================
RCS file: /cvsroot/sbcl/sbcl/src/runtime/interrupt.c,v
retrieving revision 1.35
retrieving revision 1.36
diff -u -d -r1.35 -r1.36
--- interrupt.c	3 Apr 2003 18:27:24 -0000	1.35
+++ interrupt.c	21 Apr 2003 21:06:37 -0000	1.36
@@ -288,7 +288,7 @@
 	{
 	    fake_foreign_function_call(context);
 	}
-	funcall0(SymbolFunction(MAYBE_GC));
+	funcall0(SymbolFunction(SUB_GC));
 #ifndef __i386__
 	if (were_in_lisp)
 #endif
@@ -606,7 +606,7 @@
 	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