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