Home My Page Projects Code Snippets Project Openings SML/NJ
Summary Activity Forums Tracker Lists Tasks Docs Surveys News SCM Files

SCM Repository

[smlnj] Diff of /sml/trunk/src/runtime/gc/init-gc.c
ViewVC logotype

Diff of /sml/trunk/src/runtime/gc/init-gc.c

Parent Directory Parent Directory | Revision Log Revision Log | View Patch Patch

revision 651, Thu Jun 1 18:34:03 2000 UTC revision 1889, Tue Feb 21 21:33:24 2006 UTC
# Line 11  Line 11 
11  #endif  #endif
12    
13  #include <stdarg.h>  #include <stdarg.h>
14    #include <string.h>
15  #include "ml-base.h"  #include "ml-base.h"
16  #include "ml-options.h"  #include "ml-options.h"
17  #include "ml-limits.h"  #include "ml-limits.h"
# Line 99  Line 100 
100                  else if (params->cacheGen > MAX_NGENS)                  else if (params->cacheGen > MAX_NGENS)
101                      params->cacheGen = MAX_NGENS;                      params->cacheGen = MAX_NGENS;
102              }              }
103                else if (MATCH("unlimited-heap"))
104                    UnlimitedHeap = TRUE;
105          }          }
106          if (errFlg)          if (errFlg)
107              return NIL(heap_params_t *);              return NIL(heap_params_t *);
# Line 158  Line 161 
161          ratio = DfltRatios[i];          ratio = DfltRatios[i];
162          if (i == 0)          if (i == 0)
163              max_sz = MAX_SZ1(params->allocSz * MAX_NUM_PROCS);              max_sz = MAX_SZ1(params->allocSz * MAX_NUM_PROCS);
164          else          else {
165  /** NOTE: the following is bogus **/              max_sz = (5*max_sz)/2;
166              max_sz = (ratio * heap->gen[i-1]->arena[0]->maxSizeB) / 2;              if (max_sz > 64*ONE_MEG) max_sz = 64*ONE_MEG;
167            }
168          gen             =          gen             =
169          heap->gen[i]    = NEW_OBJ(gen_t);          heap->gen[i]    = NEW_OBJ(gen_t);
170          gen->heap       = heap;          gen->heap       = heap;

Legend:
Removed from v.651  
changed lines
  Added in v.1889

root@smlnj-gforge.cs.uchicago.edu
ViewVC Help
Powered by ViewVC 1.0.0