CVS: sml/src/runtime/gc init-gc.c,1.5,1.6 major-gc.c,1.5,1.6
John Reppy <[email protected]>
| Newsgroups | gmane.comp.lang.sml.smlnj.commits |
|---|---|
| Message-ID | <[email protected]> |
Update of /cvsroot/smlnj/sml/src/runtime/gc
In directory sc8-pr-cvs1.sourceforge.net:/tmp/cvs-serv4787/gc
Modified Files:
init-gc.c major-gc.c
Log Message:
Allow heap triming to be turned off. WARNING: doing so may result in
unbounded heap-growth, even for constant-space programs!
Index: init-gc.c
===================================================================
RCS file: /cvsroot/smlnj/sml/src/runtime/gc/init-gc.c,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** init-gc.c 17 Jun 2002 20:32:12 -0000 1.5
--- init-gc.c 5 May 2005 16:25:11 -0000 1.6
***************
*** 100,103 ****
--- 100,105 ----
params->cacheGen = MAX_NGENS;
}
+ else if (MATCH("unlimited-heap"))
+ UnlimitedHeap = TRUE;
}
if (errFlg)
Index: major-gc.c
===================================================================
RCS file: /cvsroot/smlnj/sml/src/runtime/gc/major-gc.c,v
retrieving revision 1.5
retrieving revision 1.6
diff -C2 -d -r1.5 -r1.6
*** major-gc.c 20 Sep 2002 20:41:13 -0000 1.5
--- major-gc.c 5 May 2005 16:25:11 -0000 1.6
***************
*** 399,403 ****
#endif
! TrimHeap (heap, maxCollectedGen);
} /* end of MajorGC. */
--- 399,404 ----
#endif
! if (! UnlimitedHeap)
! TrimHeap (heap, maxCollectedGen);
} /* end of MajorGC. */
-------------------------------------------------------
This SF.Net email is sponsored by: NEC IT Guy Games.
Get your fingers limbered up and give it your best shot. 4 great events, 4
opportunities to win big! Highest score wins.NEC IT Guy Games. Play to
win an NEC 61 plasma display. Visit http://www.necitguy.com/?r=20