Changeset 12839 in project for chicken


Ignore:
Timestamp:
12/17/08 09:52:41 (11 years ago)
Author:
felix winkelmann
Message:

finalizer bugfix for problem reported by Alejo

File:
1 edited

Legend:

Unmodified
Added
Removed
  • chicken/branches/chicken-3/runtime.c

    r12486 r12839  
    27812781    for(msp = collectibles; msp < collectibles_top; ++msp)
    27822782      if(*msp != NULL) mark(*msp);
    2783    
     2783
     2784    /* mark GC roots: */
    27842785    for(gcrp = gc_root_list; gcrp != NULL; gcrp = gcrp->next)
    27852786      mark(&gcrp->value);
     
    28592860        j = fcount = 0;
    28602861
     2862        for(flist = finalizer_list; flist != NULL; flist = flist->next)
     2863          mark(&flist->finalizer);
     2864
    28612865        for(flist = finalizer_list; flist != NULL; flist = flist->next) {
    28622866          if(j < C_max_pending_finalizers) {
     
    28662870
    28672871          mark(&flist->item);
    2868           mark(&flist->finalizer);
    28692872        }
    28702873      }
Note: See TracChangeset for help on using the changeset viewer.