Google
 

Trailing-Edge - PDP-10 Archives - bb-bt99h-bb - lexcla.c14
There are no other files named lexcla.c14 in the archive.
 REP 3/1	;14C1
	!COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION 1984, 1985
 WIT
	!COPYRIGHT (C) DIGITAL EQUIPMENT CORPORATION 1984, 1986
 REP 25/1	;14C2
	GLOBAL BIND LEXCLV = #10^24 + 0^18 + #2514;	! Version Date:	24-Jan-85
 WIT
	GLOBAL BIND LEXCLV = #10^24 + 0^18 + #2565;	! Version Date:	8-Jan-86
 INS 371/1	;14C3
	2565	MEM	8-Jan-86
		After lexica's buffer is full, it keeps on writing over the next
		contiguous words in memory. This obviously can cause problems,
		so don't let LINLCURR (pointer into buffer) ever advance past the 
		end of the buffer.
		
 REP 46/27	;14C4
		ELSE LINLCURR = .LINLCURR + LINLSENT;	! Next entry
 WIT
	%2565%	ELSE IF .LINLCURR LEQ LINLEND<0,0>
	%2565%	THEN LINLCURR = .LINLCURR + LINLSENT;	! Next entry
 SUM 83499