PDP-10 Archive: 10,7/mon/ctls/comctl.mic from tops10_704_monitoranf

Trailing-Edge - PDP-10 Archives - tops10_704_monitoranf_bb-x140c-sb - 10,7/mon/ctls/comctl.mic

There are 3 other files named comctl.mic in the archive. Click here to see a list.

[email protected]
[email protected]
.DELETE BASE:'A.AOK
.IF (ERROR)
.DELETE BASE:'A.FUB
.IF (ERROR)
.PA='B:
.ERROR %
.COMPIL/COMPIL/CREF 'C
.IF (ERROR) .GOTO BADCOM
.ERROR ?
.COPY BASE:'A.AOK=NUL:AOK.AOK
.CREF BASE:='A
.R FILCOM
*BASE:.SCM=MON:'A.MAC,BASE:/O/T
.PRINT/OP:J BASE:'A.LST,'A.SCM
.GOTO DONE
BADCOM::
.ERROR ?
.COPY BASE:'A.FUB=NUL:FUB.FUB
DONE::