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/blast-gc.c
ViewVC logotype

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

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

revision 568, Tue Mar 7 03:59:09 2000 UTC revision 569, Tue Mar 7 04:01:07 2000 UTC
# Line 64  Line 64 
64  PVT void BlastGC_FinishGC (ml_state_t *msp, int maxGen);  PVT void BlastGC_FinishGC (ml_state_t *msp, int maxGen);
65  PVT void BlastGC_Flip (heap_t *heap, int gen);  PVT void BlastGC_Flip (heap_t *heap, int gen);
66  PVT status_t BlastGC_SweepToSpace (heap_t *heap, aid_t maxAid);  PVT status_t BlastGC_SweepToSpace (heap_t *heap, aid_t maxAid);
67    /*
68  PVT bool_t BlastGC_SweepToSpArrays (heap_t *heap, arena_t *tosp, card_map_t *cm);  PVT bool_t BlastGC_SweepToSpArrays (heap_t *heap, arena_t *tosp, card_map_t *cm);
69    */
70  PVT ml_val_t BlastGC_ForwardObj (heap_t *heap, ml_val_t obj, aid_t id);  PVT ml_val_t BlastGC_ForwardObj (heap_t *heap, ml_val_t obj, aid_t id);
71  PVT bigobj_desc_t *BlastGC_ForwardBigObj (  PVT bigobj_desc_t *BlastGC_ForwardBigObj (
72          heap_t *heap, ml_val_t *p, ml_val_t obj, aid_t aid);          heap_t *heap, ml_val_t *p, ml_val_t obj, aid_t aid);
# Line 127  Line 129 
129  {  {
130      heap_t      *heap = msp->ml_heap;      heap_t      *heap = msp->ml_heap;
131      bibop_t     bibop = BIBOP;      bibop_t     bibop = BIBOP;
     int         i, j;  
132      blast_res_t result;      blast_res_t result;
133      bool_t      errFlg = FALSE;      bool_t      errFlg = FALSE;
134    
# Line 296  Line 297 
297      heap_t      *heap = msp->ml_heap;      heap_t      *heap = msp->ml_heap;
298      bibop_t     bibop = BIBOP;      bibop_t     bibop = BIBOP;
299      bool_t      dummy = FALSE;      bool_t      dummy = FALSE;
     Word_t      mask;  
300      int         i, j;      int         i, j;
301      aid_t       maxAid;      aid_t       maxAid;
302    
# Line 757  Line 757 
757      int             i;      int             i;
758      bigobj_region_t *region;      bigobj_region_t *region;
759      bigobj_desc_t   *dp;      bigobj_desc_t   *dp;
760      embobj_info_t   *codeInfo, *objInfo;      embobj_info_t   *codeInfo;
     embobj_kind_t   kind;  
761    
762      for (i = BIBOP_ADDR_TO_INDEX(obj);  !BO_IS_HDR(aid);  aid = BIBOP[--i])      for (i = BIBOP_ADDR_TO_INDEX(obj);  !BO_IS_HDR(aid);  aid = BIBOP[--i])
763          continue;          continue;

Legend:
Removed from v.568  
changed lines
  Added in v.569

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