Trailing-Edge
-
PDP-10 Archives
-
FORTRAN-10_V7wLink_Feb83
-
fdbm5.ctl
There are 5 other files named fdbm5.ctl in the archive. Click here to see a list.
;FDBM5.CTL V(EDIT)==5A(12)
;USED TO LOAD FORTRAN RUN-TIME SYSTEM
;
;
;SUBMIT WITH COMMAND .SUBMIT FDBM5/TIME:10:00
;
;COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION 1975, 1983
;
;REQUIRED FILES:
;SYS: MAKLIB (LATEST RELEASED VERSIONS)
; DIRECT
; LINK+LNK* V5A
; FORTRAN V7
; FOROTS V7
; FORLIB V7
;
;DSK: DBSANY.REL DBS10.REL DBSFOR.REL
; FDBM5.CTL F1DOTS.CCL FDBM5.CCL
; SCHIO1.REL FDBM5.FOR
;
;
;OUTPUT: FDBOT7.EXE, FDBOTS.MAP, AND DBMSF.REL
;
;USE LATEST SOFTWARE AND RECORD WHAT IS USED
.SET WATCH VERSION
.MOU DSKT:
.R SETSRC
*C DSKT:,*
*T
.R DIRECT
*TTY:/CHECKSUM=SYS:DIRECT+MAKLIB+LINK+LNK*
.ERROR
.TYPE FDBM5.CCL
.R MAKLIB
*@FDBM5.CCL
.IF (ERROR) .GOTO TRUBLE
.ERROR
.EX FDBM5.FOR
.IF (ERROR) .GOTO TRUBLE
.TY F1DOTS.CCL
.R LINK
*@F1DOTS
.IF (ERROR) .GOTO TRUBLE
.RU FDBOT7
.SSAVE DSK:FDBOT7
.IF (ERROR) .GOTO TRUBLE
NOFORT::
.ERROR
;
;SEE WHAT WE GOT
;
.R DIRECT
*TTY:/CHECKSUM=FDBOT7.EXE
;
;TELL HOW WE DID
;
.PLEASE -- DBMS-10 CREATION SUCCESSFUL!!!
.GOTO ENDOF
TRUBLE::
.PLEASE -- DBMS-10 CREATION NOT SUCCESSFUL???
ENDOF::
%FIN::
;[ END OF DBMS10.CTL ]