DragonProcessOffsets.mesa
Copyright © 1984 by Xerox Corporation. All rights reserved.
Russ Atkinson, July 19, 1984 11:17:34 pm PDT
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 + 4; -- what is really stored here?
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.