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

Diff of /gcl/o/gbc.c

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

revision 1.20 by camm, Thu Nov 6 16:08:09 2003 UTC revision 1.21 by camm, Mon Dec 1 17:01:32 2003 UTC
# Line 1328  GBC(enum type t) { Line 1328  GBC(enum type t) {
1328        }        }
1329      core_end = heap_end + PAGESIZE;      core_end = heap_end + PAGESIZE;
1330            
1331      for (i = 0;  i < maxpage;  i++)  /*     for (i = 0;  i < maxpage;  i++) */
1332        if ((enum type)type_map[i] == t_contiguous)  /*       if ((enum type)type_map[i] == t_contiguous) */
1333          type_map[i] = (char)t_other;  /*      type_map[i] = (char)t_other; */
1334      cb_pointer = NULL;  /*     cb_pointer = NULL; */
1335      maxcbpage -= ncbpage;  /*     maxcbpage -= ncbpage; */
1336      if (maxcbpage < 100)  /*     if (maxcbpage < 100) */
1337        maxcbpage = 100;  /*       maxcbpage = 100; */
1338      ncbpage = 0;  /*     ncbpage = 0; */
1339      ncb = 0;  /*     ncb = 0; */
1340            
1341      /* hmm.... why is this test necessary.*/      /* hmm.... why is this test necessary.*/
1342  #ifdef SGC  #ifdef SGC

Legend:
Removed from v.1.20  
changed lines
  Added in v.1.21

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