.TITLE	TECO
	.IDENT	/V36.1/
; EDIT # 0002	28 Oct 1980   11:28:14	DR1:[342,2]TECOPAT.MAC;4
; PREVIOUS EDIT	3 Sept 1980   13:24:38	DR1:[342,1]TECOPAT.MAC;3
EVFLAG==100
RWSIZE==420

	.PSECT	TECORO,RO,LCL
.=.+1356
	CALL	LFBSP

	.PSECT	TECPAT,RO,LCL
; TO NOT VERIFY THE LINE UPON
; IMMED LF OR BKSP WHILE SCROLLING IS ON

LFBSP:	TST	SCROLN+RWSIZE(R5)
	BNE	1$
	TST	EVFLAG(R5)
1$:	RETURN
	.END