nortti
/
thingamajig
1
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

Don't clobber storeByteHigh and storeByteLow in peekWord in calculator.asm

This commit is contained in:
Juhani Krekelä 2022-08-18 14:31:04 +03:00
parent a993cab542
commit 5cfae260fd
1 changed files with 11 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

13
calculator.asm
View File

@ -308,12 +308,21 @@ tmp2LoadWord01:
; out: ; out:
; r0:r1 = word ; r0:r1 = word
; clobbers: ; clobbers:
; r2, r2 ; r2, r3
peekWord: peekWord:
cleq r0, r0, popWord cleq r0, r0, popWord
store peekWordHigh, r0 store peekWordHigh, r0
store peekWordLow, r1 store peekWordLow, r1
cleq r0, r0, pushWord
; Return SP back to where it was
load r0, SP+0
load r1, SP+1
xor r2, r2
load r3, lit02
cleq r0, r0, addWord
store SP+0, r0
store SP+1, r1
load r0, peekWordHigh load r0, peekWordHigh
load r1, peekWordLow load r1, peekWordLow
ret ret