1
0
mirror of https://github.com/PDP-10/its.git synced 2026-01-13 15:27:28 +00:00

Fix hazardous instructions in URUG.

Replace CMP Rn,(Rn)+ with TST (Rn)+ to appease PALX.
This commit is contained in:
Lars Brinkhoff 2018-07-29 12:59:24 +02:00
parent 91cc05958e
commit fcd945b381

View File

@ -101,7 +101,7 @@ SCRL2: MOV #20040,(R0)+ ;ERASE BOTTOM LINE
CMP #DISL+140,R0
BNE SCRL2
MOV #5015,-(R0)
RETURN: CMP R3,(R3)+
RETURN: TST (R3)+
MOV R3,R7
DPOSIT: MOV R2,@R4 ;DEPOSIT THE ARGUMENT
MOV R7,R3
@ -112,7 +112,7 @@ CHEKLF: CMP #12,R5
.IFZ USEBPT
AUTOPN:
.ENDC
CMP R4,(R4)+
TST (R4)+
.IFNZ USEBPT
AUTOPN:
.ENDC
@ -208,4 +208,3 @@ DISBEG: 170000 ;LSR A
DISL
.END