diff --git a/src/sits/sysspr.238 b/src/sits/sysspr.238b
similarity index 99%
rename from src/sits/sysspr.238
rename to src/sits/sysspr.238b
index ca94f28e..35cc2de2 100755
--- a/src/sits/sysspr.238
+++ b/src/sits/sysspr.238b
@@ -895,7 +895,7 @@ INTPR1:	ADD #PBLN,F		;GO TO NEXT BLOCK
 	SAVE <A,B>
 	MOV F,B
 	ADD #PRPDLP+2,B
-	MOV #<PBLN-<PRPDLP-PRBFRE>>/2,A
+	MOV #<PBLN-<PRPDLP-PRBFRE>>/2-1,A
 	CLR (B)+		;TO ALL ZEROS
 	SOB A,.-2
 	MOV #-1,UBLKP(F)	;MAKE IT CLEAR THAT WE DON'T HAVE A USER BLOCK