DragonProcessOffsets.mesa
Russ Atkinson, March 19, 1984 9:34:16 pm PST
DIRECTORY
DragOpsCross;
DragonProcessOffsets: CEDAR DEFINITIONS = BEGIN OPEN DragOpsCross;
Must correspond to DragOpsCross
SchedulerRep (not yet in DragOpsCross)
pdSchedulerBase: NAT = 0;
Offset of the scheduler info in the global frame table
pdSchedulerLock: NAT = 0;
pdSchedulerPriority: NAT = 1;
pdSchedulerOwnerCall: NAT = 2;
pdSchedulerOrdersCall: NAT = 3;
more to come, you bet
pdSchedulerSIZE: NAT = 16;
ProcessRep
pdProcessQueue: NAT = 0;
pdProcessNext: NAT = 1;
pdProcessMeta: NAT = 2;
pdProcessWhen: NAT = 3;
pdProcessPriority: NAT = 4;
pdProcessState: NAT = 5;
pdProcessEUState: NAT = 6;
pdProcessSIZE: NAT = pdProcessEUState + 2*SIZE[EUstate];
ProcessorRep
pdProcessorNext: NAT = 0;
pdProcessorOrders: NAT = 1;
pdProcessorSwitchTo: NAT = 2;
pdProcessorRunning: NAT = 3;
pdProcessorSIZE: NAT = 4;
QueueRep
pdQueueBusy: NAT = 0;
pdQueueChain: NAT = 1;
pdQueueSIZE: NAT = 2;
MonitorLockRep
pdMonitorLockBusy: NAT = 0;
pdMonitorLockChain: NAT = 1;
pdMonitorLockOwner: NAT = 2;
pdMonitorLockSIZE: NAT = 3;
END.