Google
 

Trailing-Edge - PDP-10 Archives - bb-bt99e-bb - lnksub.c08
There is 1 other file named lnksub.c08 in the archive. Click here to see a list.
 REP 2/1	;08C1
	SUBTTL	D.M.NIXON/DMN/JBC/JNG/DZN/PAH	6-Dec-83
 WIT
	SUBTTL	D.M.NIXON/DMN/JBC/JNG/DZN/PAH	6-Mar-84
 REP 6/1	;08C2
	;COPYRIGHT (C) 1973, 1983 BY
 WIT
	;COPYRIGHT (C) 1973, 1984 BY
 REP 35/1	;08C3
	DECEVR==2026		;DEC EDIT VERSION
 WIT
	DECEVR==2062		;DEC EDIT VERSION
 INS 22/2	;08C4
	;2062	Add LNK012 for argument typechecking dummies.
 REP 1/22	;08C5
	TITLE	LNK400 - DUMMY OLD FORTRAN MODULE
	SUBTTL	D.M.NIXON/DMN/JNG/DZN	25-Jul-79
 WIT
	TITLE	LNK012 - DUMMY TYP.BG and COEOVL
	SUBTTL	PAUL YOUNG/PY	6-Mar-84
 REP 8/22	;08C6
	;COPYRIGHT (C) 1973, 1979 BY DIGITAL EQUIPMENT CORPORATION


	SEARCH	LNKPAR,LNKLOW
	SALL

	ENTRY	LNKF40
	INTERN	T.400,T.401
	EXTERN	LNKLOD,LNKLOG
 WIT
	;COPYRIGHT (C) 1973, 1984 BY DIGITAL EQUIPMENT CORPORATION

	;[2062] Provide these dummy entries for typechecking overlays.
	SEARCH	LNKPAR
	SALL

	ENTRY	TYP.BG,COEOVL
 INS 22/22	;08C7
	COEOVL==COESP0##		;Don't do anything, go to .+1
	TYP.BG:	POPJ	P,		;Can never get here
					;But if we do, POPJ is right

	PRGEND
	TITLE	LNK400 - DUMMY OLD FORTRAN MODULE
	SUBTTL	D.M.NIXON/DMN/JNG/DZN	25-Jul-79


	;THIS SOFTWARE IS FURNISHED UNDER A LICENSE AND MAY ONLY BE USED
	;  OR COPIED IN ACCORDANCE WITH THE TERMS OF SUCH LICENSE.
	;
	;COPYRIGHT (C) 1973, 1979 BY DIGITAL EQUIPMENT CORPORATION


	SEARCH	LNKPAR,LNKLOW
	SALL

	ENTRY	LNKF40
	INTERN	T.400,T.401
	EXTERN	LNKLOD,LNKLOG


	SEGMENT


 SUM 234155