github.com/PDP-10.its
1
0
Fork 0
mirror of https://github.com/PDP-10/its.git synced 2026-01-13 23:36:30 +00:00
Code Issues Releases Wiki Activity

Bug fix for INTPRS in SYSSPR.

Browse Source 
The loop is off by one, so it clears the first word in the next
process block.  This turns out to be PRBFRE, the process block free
word.  Since it's cleared, it's no longer considered free, so INTPRS
is forced to skip to the next block.  This makes SYSSPR run out of
space for processes.
This commit is contained in:
Lars Brinkhoff 2022-10-22 16:31:12 +02:00
parent 300fa1ba99
commit b15d96e48d
1 changed files with 1 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

2
src/sits/sysspr.238 → src/sits/sysspr.238b
View File

@ -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