Improve error message on stack underflow in calculator.asm

This commit is contained in:
Juhani Krekelä 2022-09-15 02:06:34 +03:00
parent 007bb35917
commit bafaef9c44
1 changed files with 27 additions and 4 deletions

View File

@ -524,7 +524,7 @@ popByte:
load r2, SPStart+0
load r3, SPStart+1
brneq r0, r2, popByteNoUnderflow
breq r1, r3, error
breq r1, r3, underflow
popByteNoUnderflow:
cleq r0, r0, decWord
@ -994,14 +994,37 @@ newline:
store ffff, r3
ret
; noreturn
underflow:
load r0, #55 ; U
store ffff, r0
load r0, #6e ; n
store ffff, r0
load r0, #64 ; d
store ffff, r0
load r0, #65 ; e
store ffff, r0
load r0, #72 ; r
store ffff, r0
load r0, #66 ; f
store ffff, r0
load r0, #6c ; l
store ffff, r0
load r0, #6f ; o
store ffff, r0
load r0, #77 ; w
store ffff, r0
load r0, #20
store ffff, r0
; noreturn
error:
load r0, #65
load r0, #65 ; e
store ffff, r0
load r0, #72
load r0, #72 ; r
store ffff, r0
store ffff, r0
load r1, #6f
load r1, #6f ; o
store ffff, r1
store ffff, r0
cleq r0, r0, newline