/[gcl]/gcl/o/alloc.c
ViewVC logotype

Diff of /gcl/o/alloc.c

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

revision 1.24 by camm, Thu Nov 6 16:08:08 2003 UTC revision 1.25 by vvzhy, Sat Nov 22 15:49:07 2003 UTC
# Line 62  sbrk1(n) Line 62  sbrk1(n)
62  #endif /* DEBUG_SBRK */  #endif /* DEBUG_SBRK */
63    
64  long real_maxpage = MAXPAGE;  long real_maxpage = MAXPAGE;
65  long new_holepage = 0;  long new_holepage;
66    
67  #define available_pages \  #define available_pages \
68          (real_maxpage-page(heap_end)-new_holepage-2*nrbpage-real_maxpage/32)          (real_maxpage-page(heap_end)-new_holepage-2*nrbpage-real_maxpage/32)
# Line 270  CALL_GBC: Line 270  CALL_GBC:
270    
271  EXHAUSTED:  EXHAUSTED:
272          if (IGNORE_MAX_PAGES) {          if (IGNORE_MAX_PAGES) {
273                  if (tm->tm_maxpage/2 <= 0)                  tm->tm_maxpage =
274                          tm->tm_maxpage += 1;                      grow_linear(tm->tm_maxpage,tm->tm_growth_percent,
275                  else                                  tm->tm_min_grow,tm->tm_max_grow);
                         tm->tm_maxpage += tm->tm_maxpage/2;  
276                  call_after_gbc_hook(t);                  call_after_gbc_hook(t);
277                  goto ONCE_MORE;                  goto ONCE_MORE;
278          }          }

Legend:
Removed from v.1.24  
changed lines
  Added in v.1.25

savannah-hackers-public@gnu.org
ViewVC Help
Powered by ViewVC 1.1.26