[eros-cvs] cvs commit: eros/src/base/domain/constructor constructor.c

[shap@eros.cs.jhu.edu]

shap        01/11/14 23:15:38

  Modified:    src/base/domain/constructor constructor.c
  Log:
  Removed some stale (incorrect) comments.

Revision  Changes    Path
1.43      +3 -12     eros/src/base/domain/constructor/constructor.c

Index: constructor.c
===================================================================
RCS file: /cvs/eros/src/base/domain/constructor/constructor.c,v
retrieving revision 1.42
retrieving revision 1.43
diff -u -r1.42 -r1.43
--- constructor.c	2001/10/07 15:45:54	1.42
+++ constructor.c	2001/11/15 04:15:38	1.43
@@ -88,7 +88,6 @@
 #define XCON_PC         3
 
 #define DEBUG if (0)
-/* #define DEBUG if (1) */
 
 typedef struct {
   int frozen;
@@ -248,10 +247,7 @@
   /* clone the product constituents into the new constituents node: */
   node_clone(KR_SCRATCH, KR_PROD_CON0);
 
-  /* constituents to product KR 1 */
   (void) process_swap_keyreg(KR_NEWDOM, KR_CONSTIT, KR_SCRATCH, KR_VOID);
-  
-  /* runtime bits to product KR 2 */
   (void) process_swap_keyreg(KR_NEWDOM, KR_RTBITS, KR_RO_YIELDBITS, KR_VOID);
 
   DEBUG kdprintf(KR_OSTREAM, "Populate new domain\n");
@@ -300,31 +296,26 @@
 
   DEBUG kdprintf(KR_OSTREAM, "Installed program counter\n");
 
-  /* process to KR 2 */
   (void) process_swap_keyreg(KR_NEWDOM, KR_SELF, KR_NEWDOM, KR_VOID);
-  /* process creator to KR 3 */
   (void) process_swap_keyreg(KR_NEWDOM, KR_CREATOR, KR_YIELDCRE, KR_VOID);
-  /* Bank to KR 4 */
   (void) process_swap_keyreg(KR_NEWDOM, KR_BANK, KR_ARG0, KR_VOID);
-  /* Sched to KR 5 */
   (void) process_swap_keyreg(KR_NEWDOM, KR_SCHED, KR_ARG1, KR_VOID);
+
+  DEBUG kdprintf(KR_OSTREAM, "Sched in target KR_SCHED\n");
 
-  /* Space constructor to KR 7 */
   (void) node_copy(KR_PROD_XCON, XCON_ADDRSPACE, KR_SCRATCH);
   (void) process_swap_keyreg(KR_NEWDOM, PSKR_SPACE, KR_SCRATCH, KR_VOID);
 
-  /* Symtab to DR 3 */
   (void) node_copy(KR_PROD_XCON, XCON_SYMTAB, KR_SCRATCH);
   (void) process_swap(KR_NEWDOM, ProcSymSpace, KR_SCRATCH, KR_VOID);
 
-  /* Initial PC to KR 8 */
   (void) node_copy(KR_PROD_XCON, XCON_PC, KR_SCRATCH);
   (void) process_swap_keyreg(KR_NEWDOM, PSKR_PROC_PC, KR_SCRATCH, KR_VOID);
 
   /* User ARG2 to key arg slot 0 */
   (void) process_swap_keyreg(KR_NEWDOM, KR_ARG(0), KR_ARG2, KR_VOID);
 
-  /* Resume key to KR 31 */
+  /* Resume key to KR_RETURN */
   (void) process_swap_keyreg(KR_NEWDOM, KR_RETURN, KR_RETURN, KR_VOID);
 
   /* Make up a fault key to the new process so we can set it in motion */