Enter your search terms Submit search form
	Web pdp-10.trailing-edge.com

;CONTROL FILE TO BUILD ALGOL VERSION 10(741)
;
;SUBMIT WITH COMMAND	.Q I:=ALGOL/TIME:5000/PAGE:10000
;
;REQUIRED FILES (LATEST RELEASED VERSIONS):
;
;[10,7]	COMPIL.SHR
;	CREF.SHR
;	DIRECT.SHR
;	FUDGE2.SHR
;	HELPER.REL
;	JOBDAT.REL
;	LINK.SHR
;	LNK???.SHR
;	MACRO.SHR
;	SETSRC
;
;[SELF]	ALGPRM.MAC
;	ALGSYS.MAC
;	ALGOTS.MAC
;	ALGDDT.MAC
;	ALGLIB.MAC
;	ALGCON.MAC
;	ALGSTB.MAC
;	ALGMAC.MAC
;	ALGDEC.MAC
;	ALGSTM.MAC
;	ALGEXP.MAC
;	ALGFOR.MAC
;	ALGUTL.MAC
;	ALGSER.MAC
;	ALGCOD.MAC
;	ALGFUN.MAC
;
;OUTPUT FILES:	ALGOL.SHR,ALG741.SHR,ALGLIB.REL
;
;OUTPUT LISTINGS:	ALGPRM.LST,ALGSYS.LST,ALGOTS.LST,ALGDDT.LST
;			ALGLKA.LST,ALGLKI.LST,ALGCON.LST,ALGSTB.LST
;			ALGMAC.LST,ALGDEC.LST,ALGSTM.LST,ALGEXP.LST,ALGFOR.LST
;			ALGUTL.LST,ALGSER.LST,ALGCOD.LST,ALGFUN.LST,ALGOL.MAP
.SET WATCH VERSION
;
;SET SEARCH LIST TO ACCESS SYSTEM FROM [10,7]
.R SETSRC
*LIB:[10,7]
*SYS
*T
;
.R DIRECT
*TTY:/CHECKSUM=ALG???.MAC
;
.ASS DSK: SYS:
;
;ASSEMBLE AND CREF OBJECT TIME SYSTEM AND LIBRARY.
;NOTE THAT ALGPRM AND ALGSYS ARE UNIVERSAL FILES, AND MUST ALWAYS
;BE ASSEMBLED IN THIS ORDER BEFORE ALGOTS,ALGDDT AND ALGLIB.
;
.R MACRO
*ALGPRM,ALGPRM/C=TTY:,DSK:ALGPRM
*PROC=KA10
*
*PROC=KA10
*
*ALGSYS,ALGSYS/C=ALGSYS
*ALGLKA,ALGLKA/C=ALGLIB
.R MACRO
*ALGPRM,ALGPRM/C=ALGPRM
*ALGSYS,ALGSYS/C=ALGSYS
*ALGLKI,ALGLKI/C=ALGLIB
;
;	NOW PIP THE KA10 AND KI10 LIBRARIES TOGETHER, AND FUDGE IN AN INDEX
;
.R PIP
*ALGLIB.REL=ALGLKA.REL,ALGLKI.REL
.R FUDGE2[1,4]
*ALGLIB=ALGLIB/X
.R PIP
*DSK:/D=ALGLKA.REL,ALGLKI.REL
;
.R MACRO
*ALGOTS,ALGOTS/C=ALGOTS
*ALGDDT,ALGDDT/C=ALGDDT
.R LINK
*/VERSION:10(741)
*ALG741/SSAVE
*ALGOTS/SEGMENT:HIGH
*ALGDDT/SEGMENT:HIGH
*/GO
.IF (ERROR) .E 137
;
;IF IT IS REQUIRED TO USE ALGOTS IN NON-SHARED MODE (VIA THE /OTS:LOW
;SWITCH IN LINK), THE FOLLOWING OPERATION SHOULD BE PERFORMED:
;.R PIP
;*ALGLIB.REL=ALGLIB.REL,ALGOTS.REL,ALGDDT.REL
;
.R DIRECT
*TTY:/CHECKSUM=ALG741.*,ALGLIB.REL
;
;ASSEMBLE AND CREF COMPILER.
;
.R MACRO
*ALGCON,ALGCON/C/P=ALGCON
*ALGSTB,ALGSTB/C/P=ALGSTB
*ALGMAC,ALGMAC/C/P=ALGMAC
*ALGDEC,ALGDEC/C/P=ALGDEC
*ALGSTM,ALGSTM/C/P=ALGSTM
*ALGEXP,ALGEXP/C/P=ALGEXP
*ALGFOR,ALGFOR/C/P=ALGFOR
*ALGUTL,ALGUTL/C/P=ALGUTL
*ALGSER,ALGSER/C/P=ALGSER
*ALGCOD,ALGCOD/C/P=ALGCOD
*ALGFUN,ALGFUN/C/P=ALGFUN
;
.R LINK
*ALGOL/SSAVE
*/VERSION:10(741)
*ALGOL.MAP/MAP:END
*ALGCON,ALGSTB
*HELPER
*ALGMAC,ALGDEC,ALGSTM,ALGEXP,ALGFOR,ALGUTL,ALGSER,ALGCOD,ALGFUN/GO
.IF (ERROR) .E 137
.R DIRECT
*TTY:/CHECKSUM=ALGOL.SHR
;
;PRODUCE LISTINGS:
;
.R CREF
*ALGPRM=ALGPRM
*ALGSYS=ALGSYS
*ALGOTS=ALGOTS
*ALGDDT=ALGDDT
*ALGLKA=ALGLKA
*ALGLKI=ALGLKI
*ALGCON=ALGCON
*ALGSTB=ALGSTB
*ALGMAC=ALGMAC
*ALGDEC=ALGDEC
*ALGSTM=ALGSTM
*ALGEXP=ALGEXP
*ALGFOR=ALGFOR
*ALGUTL=ALGUTL
*ALGSER=ALGSER
*ALGCOD=ALGCOD
*ALGFUN=ALGFUN
;
.PLEASE ALGOL SUCCESSFUL
;
%ERR::
%CERR:: .PLEASE ALGOL FAILED !!