Trailing-Edge
-
PDP-10 Archives
-
ap-c796e-sb
-
initia.ctl
There are no other files named initia.ctl in the archive.
;JOB%1(20) TO MAKE INITIA.SHR FROM INITIA.MAC
;SUBMIT WITH COMMAND .QUEUE I:=INITIA/RESTART:1
;
;REQUIRED FILES: (LATEST RELEASED VERSIONS)
;[10,7] PIP.SHR
; DIRECT.SHR
; COMPIL.SHR
; MACRO.SHR
; LINK.SHR
; LNK???.SHR
; CREF.SHR
; C.UNV
; HELPER.REL
;[SELF] INITIA.MAC
; INITIA.RN?
; INT???.RN?
;
;OUTPUT FILE:
; INITIA.SHR
;OUTPUT LISTINGS:
; INITIA MAP
; INITIA CREF LISTING
; INITIA.LOG
;
;
; USE LATEST RELEASED SOFTWARE
.ASSIGN DEC: SYS:
;
; COPY HELPER.REL FROM [10,7]
.R PIP
*DSK:(XB)=DEC:HELPER.REL
;
;MAKE A RECORD OF WHAT IS BEING USED
.SET WATCH VERSION
.RUN DSK: DIRECT[10,7]
*TTY:/CHECKSUM=*.MAC+INT*.RN?+INITIA.RN?+HELPER.REL
;
;
;COMPILE, LOAD, AND SAVE; PRODUCING MAP AND CREF FILE
.LOAD/LINK /MAP:LPT:INITIA /CREF /COMPILE INITIA.MAC,HELPER.REL
.OSSAVE DSK:INITIA
.VERSION
.IF (ERROR) .E 137
;
;TRY IT JUST TO MAKE SURE IT WORKS
.RUN DSK:INITIA
.ASSIGN DSK: SYS:
.I HELP
.ASSIGN DEC: SYS:
.RUN DSK:DIRECT[10,7]
*TTY:/CHECKSUM=INITIA.SHR+INITIA.RN?+INT???.RN?+INITIA.CTL
;
;PRODUCE SOURCE LISTING AND TELL OPERATOR
.CREF
.PLEASE INITIA SUCCESSFUL
;
;REMOVE ALL TEMPORARY FILES
%FIN:
;.DELETE INITIA.REL
.IF (ERROR) ; DON'T CARE