X-Git-Url: http://git.sky-visions.com/cgi-bin/gitweb.cgi/retro-software/dec/tops10/v4.5.git/blobdiff_plain/4004a326545fc294821707378dd8e6b026df8be1..8975ed2f727e4bb0190f22b1401821e5981cf7c2:/src/lptser.mac

diff --git a/src/lptser.mac b/src/lptser.mac
index 58a0ae2..95304f0 100644
--- a/src/lptser.mac
+++ b/src/lptser.mac
@@ -194,7 +194,7 @@ LPTER1:	MOVEM TAC,LPTSV2(DEVDAT)	;SAVE TAC IN DDB
 	MOVEI TAC,LPTLOV		;GET LINE OVERFLOW ERROR MASK
 	XCT LPTCSO(DEVDAT)		;SKIP IF LINE OVERFLOW FLAG IS ON
 	JRST LPTER2			; GO CHECK IF PREVIOUS ERROR OCCURRED
-	MOVN TAC,[EXP 100001]		;DECREMENT BLK0 POINTER
+	MOVN TAC,[EXP 1000001]		;DECREMENT BLK0 POINTER
 	ADDM TAC,LPTPTR(DEVDAT)
 	MOVE TAC,[EXP 15B6+12B13]	;PRINT CRLF
 	XCT LPTDTO(DEVDAT)