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/export-heap.c
ViewVC logotype

Diff of /sml/trunk/src/runtime/gc/export-heap.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 28  Line 28 
28  #include "c-globals-tbl.h"  #include "c-globals-tbl.h"
29  #include "writer.h"  #include "writer.h"
30  #include "heap-io.h"  #include "heap-io.h"
31    #include "heap-output.h"
32    
33  #define isEXTERN(bibop, w)      (isBOXED(w) && (ADDR_TO_PAGEID(bibop, w) == AID_UNMAPPED))  #define isEXTERN(bibop, w)      (isBOXED(w) && (ADDR_TO_PAGEID(bibop, w) == AID_UNMAPPED))
34  #define isEXTERNTAG(w)          (isDESC(w) && (GET_TAG(w) == DTAG_extern))  #define isEXTERNTAG(w)          (isDESC(w) && (GET_TAG(w) == DTAG_extern))
# Line 75  Line 76 
76  PVT status_t ExportImage (ml_state_t *msp, int kind, FILE *file)  PVT status_t ExportImage (ml_state_t *msp, int kind, FILE *file)
77  {  {
78      heap_t      *heap = msp->ml_heap;      heap_t      *heap = msp->ml_heap;
79        /*
80      gen_t       *oldestGen = heap->gen[heap->numGens-1];      gen_t       *oldestGen = heap->gen[heap->numGens-1];
81        */
82      status_t    status = SUCCESS;      status_t    status = SUCCESS;
     int         i, j;  
83      export_table_t *exportTbl;      export_table_t *exportTbl;
84      writer_t    *wr;      writer_t    *wr;
85    

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