/[guile]/guile/guile-core/libguile/gc-card.c
ViewVC logotype

Diff of /guile/guile-core/libguile/gc-card.c

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

revision 1.17 by dirk, Wed Jun 4 05:28:34 2003 UTC revision 1.18 by mvo, Sun Jul 27 13:56:10 2003 UTC
# Line 308  scm_i_init_card_freelist (scm_t_cell * Line 308  scm_i_init_card_freelist (scm_t_cell *
308    int idx = (card  - seg->bounds[0]) / SCM_GC_CARD_N_CELLS;    int idx = (card  - seg->bounds[0]) / SCM_GC_CARD_N_CELLS;
309    
310    bvec_ptr += idx *SCM_GC_CARD_BVEC_SIZE_IN_LONGS;    bvec_ptr += idx *SCM_GC_CARD_BVEC_SIZE_IN_LONGS;
311    SCM_GC_CELL_BVEC (card) = bvec_ptr;    SCM_GC_SET_CELL_BVEC (card, bvec_ptr);
312        
313    /*    /*
314       ASSUMPTION: n_header_cells <= 2.       ASSUMPTION: n_header_cells <= 2.

Legend:
Removed from v.1.17  
changed lines
  Added in v.1.18

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