Don't clobber tmpWord in peekWord in calculator.asm

This commit is contained in:
Juhani Krekelä 2022-08-17 03:00:51 +03:00
parent cbfbbbcf54
commit 109cdf5a3a
1 changed files with 16 additions and 10 deletions

View File

@ -89,16 +89,6 @@ stEmit:
tmpWordHigh: data 0
tmpWordLow: data 0
; out:
; r0:r1 = word
; clobbers:
; r2, r3
peekWord:
cleq r0, r0, popWord
cleq r0, r0, tmpStoreWord01
cleq r0, r0, pushWord
breq r0, r0, tmpLoadWord01
; in:
; r0:r1 = word
tmpStoreWord01:
@ -120,6 +110,22 @@ tmpLoadWord23:
load r3, tmpWordLow
ret
; out:
; r0:r1 = word
; clobbers:
; r2, r2
peekWord:
cleq r0, r0, popWord
store peekWordHigh, r0
store peekWordLow, r1
cleq r0, r0, pushWord
load r0, peekWordHigh
load r1, peekWordLow
ret
peekWordHigh: data 0
peekWordLow: data 0
; in:
; r0:r1 = word
; clobbers: