Changeset 469


Ignore:
Timestamp:
Feb 6, 2004, 10:57:28 AM (21 years ago)
Author:
Gary Byers
Message:

Add shutdown_count field to tcr.

Location:
trunk/ccl/lisp-kernel
Files:
2 edited

Legend:

Unmodified
Added
Removed
  • trunk/ccl/lisp-kernel/constants.h

    r454 r469  
    499499  unsigned tlb_limit;
    500500  LispObj *tlb_pointer;
     501  unsigned shutdown_count;
    501502} TCR;
    502503
    503504#define TCR_FLAG_BIT_FOREIGN fixnumshift
    504505#define TCR_FLAG_BIT_AWAITING_PRESET (fixnumshift+1)
    505 #define TCR_FLAG_BIT_SHUTDOWN_REQUEST (fixnumshift+2)
     506#define TCR_FLAG_BIT_ALT_SUSPEND (fixnumshift+2)
    506507
    507508#define TCR_STATE_FOREIGN (1)
  • trunk/ccl/lisp-kernel/constants.s

    r217 r469  
    699699         _node(tlb_limit)
    700700         _node(tlb_pointer)     /* Consider using tcr+N as tlb_pointer */
     701         _node(shutdown_count)
    701702        _ends
    702703
Note: See TracChangeset for help on using the changeset viewer.