X-Git-Url: https://jxself.org/git/?a=blobdiff_plain;f=%3Cmdl.int%3E%2Fuuoh.184;h=a96224147a159cad24a5dca1b282972f85dc9d3c;hb=30e76e03c89ce2dc0c34e8003a3fba66e5c1bcef;hp=b76626ec22666e5a26fd40096d5c2a2aab447abc;hpb=b67d330f8215840bdb9e76cbd4e1ad631db4a8f0;p=pdp10-muddle.git

diff --git a/<mdl.int>/uuoh.184 b/<mdl.int>/uuoh.184
index b76626e..a962241 100644
--- a/<mdl.int>/uuoh.184
+++ b/<mdl.int>/uuoh.184
@@ -993,8 +993,11 @@ LOPPOP:	POP	TP,ACSAV-1(B)
 LOPBAR:	SUB	TP,C%11
 LOPFOO:	SOJG	B,LOPPOP
 	JUMPE	R,LOPBLT		; OK, NOT RSUBR
+IFE ITS,[
 	SKIPL	1(R)		; NOT PURE RSUBR
 	 SKIPN	MULTSG
+]
+IFN ITS,	SKIPN	1(R)		; NOT PURE RSUBR
 	  JRST	LOPBLT
 
 	MOVE	B,M