Google
 

Trailing-Edge - PDP-10 Archives - bb-bt99h-bb - lexica.c14
There are no other files named lexica.c14 in the archive.
 REP 2/1	;14C1
	!COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION 1973, 1985
 WIT
	!COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION 1973, 1986
 REP 24/1	;14C2
	GLOBAL BIND LEXICV = #10^24 + 0^18 + #2560;	! Version Date:	11-NOV-85
 WIT
	GLOBAL BIND LEXICV = #10^24 + 0^18 + #2573;	! Version Date:	17-Mar-86
 INS 390/1	;14C3
	2573	MEM	17-Mar-85
		When there are exactly 99-100 continuation lines, routine SKIPDL
		gives an extra error message. This error message should never be
		put out.

 REP 43/30	;14C4
		LINLCURR = .LINLCURR + LINLSENT;	! Step to next
		IF .LINLCURR GEQ LINLEND<0,0>		! Sanity check
		THEN INTERR('SKIPDL');
 WIT
	%2573%	IF .LINLCURR LEQ LINLEND<0,0>
	%2573%	THEN LINLCURR = .LINLCURR + LINLSENT;	! Step to next
 SUM 12597