CpaRecord:
TYPE =
MACHINE DEPENDENT RECORD[
ExternalFunctionCall[n]
efc0: LONG CARDINAL,
efc1: LONG CARDINAL,
efc2: LONG CARDINAL,
efc3: LONG CARDINAL,
efc4: LONG CARDINAL,
efc5: LONG CARDINAL,
efc6: LONG CARDINAL,
efc7: LONG CARDINAL,
efc10: LONG CARDINAL,
efc11: LONG CARDINAL,
efc12: LONG CARDINAL,
efc13: LONG CARDINAL,
efc14: LONG CARDINAL,
efc15: LONG CARDINAL,
efc16: LONG CARDINAL,
efc17: LONG CARDINAL,
efcb: LONG CARDINAL, -- ExternalFunctionCallByte
LocalFunctionCall[n]
lfc1: LONG CARDINAL,
lfc2: LONG CARDINAL,
lfc3: LONG CARDINAL,
lfc4: LONG CARDINAL,
lfc5: LONG CARDINAL,
lfc6: LONG CARDINAL,
lfc7: LONG CARDINAL,
lfc10: LONG CARDINAL,
lfc11: LONG CARDINAL,
lfc12: LONG CARDINAL,
lfc13: LONG CARDINAL,
lfc14: LONG CARDINAL,
lfc15: LONG CARDINAL,
lfc16: LONG CARDINAL,
lfc17: LONG CARDINAL,
lfc20: LONG CARDINAL,
lfcb: LONG CARDINAL, -- LocalFunctionCallByte
sfc: LONG CARDINAL, -- StackFunctionCall
kfcb: LONG CARDINAL, -- KernelFunctionCallByte
porti: LONG CARDINAL, -- PortIn
porto: LONG CARDINAL, -- PortOut
me: LONG CARDINAL, -- MonitorEntry
mes: LONG CARDINAL, -- MonitorEntrySuccess
mre: LONG CARDINAL, -- MonitorReEntry
mres: LONG CARDINAL, -- MonitorReEntrySuccess
mxw: LONG CARDINAL, -- MonitorExitAndWait
mxd: LONG CARDINAL, -- MonitorExitAndDepart
notify: LONG CARDINAL, -- Notify
bcast: LONG CARDINAL, -- Broadcast
requeue: LONG CARDINAL, -- Requeue
reschedule: LONG CARDINAL, -- MesaReschedule - process switch ?
emptyQ: LONG CARDINAL, -- Notify with empty queue
timeout: LONG CARDINAL, -- Timeouts
saveState: LONG CARDINAL -- after SaveState call in MesaReschedule
xx: LONG CARDINAL -- yy
];
CPA:
PROC[ptr:
LONG POINTER TO CpaRecord] =
TRUSTED MACHINE CODE { PrincOps.zMISC, aCPA };
If ptr # NIL, it must reference pinned memory - statistics gathering will be enabled;
If ptr = NIL, statistics gathering will be diabled.