- bool used; /* TRUE if in use by some process */
- word mark; /* process mark for proper detecting of none */
- int status; /* process state */
- word prot; /* process prototype number */
- memory M; /* pointer to memory array */
- union value param[ MAXPARAM ];
- word ic; /* instruction counter */
- word trlnumber; /* trace line number */
- word lower; /* first word of object area */
- word upper; /* last word in memory */
- word lastused; /* last word used by objects */
- word lastitem; /* first word used by dictionary */
- word freeitem; /* head of free dictionary item list */
- word headk; /* head of killed object list for size > 2 */
- word headk2; /* head of killed object list for size = 2 */
- word prochead; /* am of process object */
- virtaddr procref; /* process object virtual address */
- virtaddr template; /* remote process or procedure template */
- word c1, c2; /* pointers to current object */
- virtaddr backobj; /* adress of object just left */
- word blck1, blck2; /* used for LBLOCK1, LBLOCK2, LBLOCK3 */
- queue msgqueue; /* queue of messages for this process */
- queue rpcwait; /* queue of disabled RPC messages */
- stack rpcmask; /* stack of set of enabled remote procedures */
- bool force_compactification; /* next allocate will forace compact... */
- word *hash; /* table of pointers to processes in process */
- word hash_size;
-} procdescr;
+ /* TRUE if in use by some process */
+ bool used;
+
+ /* process mark for proper detecting of none */
+ word mark;
+
+ /* process state */
+ int status;
+
+ /* process prototype number */
+ word prot;
+
+ /* pointer to memory array */
+ memory M;
+
+ union value param[MAXPARAM];
+
+ /* instruction counter */
+ word ic;
+
+ /* trace line number */
+ word trlnumber;
+
+ /* first word of object area */
+ word lower;
+
+ /* last word in memory */
+ word upper;
+
+ /* last word used by objects */
+ word lastused;
+
+ /* first word used by dictionary */
+ word lastitem;
+
+ /* head of free dictionary item list */
+ word freeitem;
+
+ /* head of killed object list for size > 2 */
+ word headk;
+
+ /* head of killed object list for size = 2 */
+ word headk2;
+
+ /* am of process object */
+ word prochead;
+
+ /* process object virtual address */
+ virtaddr procref;
+
+ /* remote process or procedure template */
+ virtaddr template;
+
+ /* pointers to current object */
+ word c1, c2;
+
+ /* adress of object just left */
+ virtaddr backobj;