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

diff --git a/src/clock1.mac b/src/clock1.mac
index d337313..67292ba 100644
--- a/src/clock1.mac
+++ b/src/clock1.mac
@@ -516,7 +516,7 @@ EXTERN PRJPRG
 	MOVSI	TAC1,JNA	;YES,JOB NUMBER ASSGINED BIT
 	HRRZ	TAC,ITEM	;SCAN DOWNWARD
 	TDNN	TAC1,JBTSTS(TAC)	;IS JNA BIT SET FOR THIS JOB?
-	SOJG	TAC,-1		;NO,KEEP LOOKING,FINISHED(TRUE IF THIS THE ONLY JOB
+	SOJG	TAC,.-1		;NO,KEEP LOOKING,FINISHED(TRUE IF THIS THE ONLY JOB
 	MOVEM	TAC,HIGHJB	;YES,STORE NEW HIGHEST JOB NUMBER ASSIGNED
 	JRST	ESTOP		;GO SET ERROR BIT
 ;ROUTINE TO STOP JOB, SET ERROR BIT AND PRINT MESSAGE