%
Page Numbers: Yes First Page: 1
Heading:
eventCounters.mcFebruary 1, 1980 9:26 PM%
TITLE[Ifu];
IM[ILC,0];
TOP LEVEL;
* November 6, 1978 3:39 PM
%
eventCounters.cmassemble and place entire ifu diagnostic
eventCountersSave.cmassemble ifuSaveDefs, ifuDefs, ifuPostamble
eventCountersOnly.cmassemble ifu.mc
eventCounters1.cmassemble ifu1.mc
eventCountersPlace.cmplace ifu diagnostic
etc.
eventCountersToLogin.cmdump all ifu sources onto [ivy]<disk login name>dorado>IfuSources.dm,
dump ifu.midas, ifu.mb onto [ivy]<disk login name>dorado>ifu.dm
eventCountersToIvy.cmdumps sources and .mb, as above except it goes to official dorado directories
eventCountersFiles.cmlist of all the source files associated with ifu
%
%*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
February 1, 1980 9:27 PM
Add restartDiagnostic label to keep postamble happy.
October 12, 1979 6:00 PM
Change label to beginEventCounters, add call to beginEventCounters2.
October 12, 1979 11:11 AM
construct this file from ifu.mc.
%*++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++++
restartDiagnostic:
memoryOK←a0;
BEGIN:
t ← (r0)+1;* init the stkp to one
stkp ← t;
RBASE ← rbase[defaultRegion];
MEMBX←0s;
rscr ← A0;
call[setBR], rscr2 ← A0;
call[resetIfu];* remove this 3 line hack asap
beginEventCounters:
call[beginEventCounters1];
call[beginEventCounters2];
r1 ← (r0)+1;
goto[done];
* CODE for midas debugging
top level;
top level;
l1: branch[l1];
l2:call[justReturn];
branch[l2];
l3:call[justReturn];
call[justReturn];
branch[l3];
l4:call[justReturn];
call[justReturn];
call[justReturn];
branch[l4];
l5:call[justReturn];
call[justReturn];
call[justReturn];
call[justReturn];
branch[l5];
l6:call[justReturn];
call[justReturn];
call[justReturn];
call[justReturn];
call[justReturn];
branch[l6];
l7:call[justReturn];
call[justReturn];
call[justReturn];
call[justReturn];
call[justReturn];
call[justReturn];
branch[l7];
END;