This is the mail archive of the
java-patches@gcc.gnu.org
mailing list for the Java project.
Patch: Boehm GC patch for branch
- To: Java Patch List <java-patches at gcc dot gnu dot org>
- Subject: Patch: Boehm GC patch for branch
- From: Tom Tromey <tromey at redhat dot com>
- Date: 17 Apr 2001 23:02:39 -0600
- Reply-To: tromey at redhat dot com
This already went on the trunk; for some reason it is missing from the
branch. I'm checking it in there.
2001-04-05 Hans Boehm <hans_boehm@hp.com>
* misc.c: Back out buggy changes to stack clearing code.
Reduce CLEAR_SIZE to 1/4 of original value to reduce time
spent clearing memory.
Tom
Index: misc.c
===================================================================
RCS file: /cvs/gcc/gcc/boehm-gc/misc.c,v
retrieving revision 1.12.4.1
diff -u -r1.12.4.1 misc.c
--- misc.c 2001/04/05 00:13:13 1.12.4.1
+++ misc.c 2001/04/18 04:49:44
@@ -206,10 +206,10 @@
*/
word GC_stack_last_cleared = 0; /* GC_no when we last did this */
# ifdef THREADS
-# define BIG_CLEAR_SIZE 2048 /* Clear this much now and then. */
-# define SMALL_CLEAR_SIZE 256 /* Clear this much every time. */
+# define CLEAR_SIZE 512
+# else
+# define CLEAR_SIZE 213
# endif
-# define CLEAR_SIZE 213 /* Granularity for GC_clear_stack_inner */
# define DEGRADE_RATE 50
word GC_min_sp; /* Coolest stack pointer value from which we've */
@@ -266,12 +266,10 @@
{
register word sp = (word)GC_approx_sp(); /* Hotter than actual sp */
# ifdef THREADS
- word dummy[SMALL_CLEAR_SIZE];
- unsigned random_no = 0; /* Should be more random than it is ... */
- /* Used to occasionally clear a bigger */
- /* chunk. */
+ word dummy[CLEAR_SIZE];
+# else
+ register word limit;
# endif
- register word limit;
# define SLOP 400
/* Extra bytes we clear every time. This clears our own */
@@ -289,14 +287,7 @@
/* thus more junk remains accessible, thus the heap gets */
/* larger ... */
# ifdef THREADS
- if (++random_no % 13 == 0) {
- limit = sp;
- MAKE_HOTTER(limit, BIG_CLEAR_SIZE*sizeof(word));
- return GC_lear_stack_inner(arg, limit);
- } else {
- BZERO(dummy, SMALL_CLEAR_SIZE*sizeof(word));
- return arg;
- }
+ BZERO(dummy, CLEAR_SIZE*sizeof(word));
# else
if (GC_gc_no > GC_stack_last_cleared) {
/* Start things over, so we clear the entire stack again */