Trailing-Edge
-
PDP-10 Archives
-
BB-T573C-DD_1986
-
35,1414/runlim.mod
There is 1 other file named runlim.mod in the archive. Click here to see a list.
;CONTROL FILE TO SLEEP FOR X HRS THEN END ACCEPTANCE
;MAY 17,1984 TOM DUDA
.DAY
.RUN RUNHRS[35,1414]
*[HRS]
.IF (ERROR) .GOTO HIBERR
.DAY
.PLEASE *************************(RUNLIM) [HRS] HOURS HAVE ELAPSED ***^[
.PLEASE ************************************ STOPPING KERNEL TESTS ***^[
.SUB PRL?=/KI
.SUB CPU*=/KI
.DAY
.SUB MEM*=/KI
.SUB DSK00=/KI
.SUB STAT*=/KI
.SUB LPCLR=/KI
.DAY
.SUB FINISH[35,1414]/TIME/UNIQ:0
.NOERROR
.COPY KERNEL.LOG=PRL?.LOG,MEM?.LOG
.GOTO END
HIBERR::
.PLEASE ??? ERROR IN RUNLIM... ACCEPTANCE WILL NOT AUTO END !!! ^[
.SUB FINISH[35,1414]/TIME/UNIQ:1/OUT:ERROR
.GOTO END
%ERR::
.PLEASE ????????????????????????????????? UNKOWN ERROR IN RUNLIM ???? ^[
.PLEASE ??? ERROR IN RUNLIM... ACCEPTANCE WILL NOT AUTO END !!! ^[
END::
%FIN::