adapted to new semantics of the EHEAP error: no longer fatal
This commit is contained in:
parent
474a3b4584
commit
b05198c6bf
@ -8,8 +8,11 @@
|
||||
strhp:
|
||||
popl RR2, *RR14
|
||||
pop R0, *RR14
|
||||
ld reghp, R0 !heappointer must be < stackpointer.
|
||||
cp R0, R15
|
||||
jp ULT, *RR2
|
||||
jp ULT, 1f
|
||||
push *RR14, $EHEAP
|
||||
jr fatal
|
||||
calr trp
|
||||
jp *RR2
|
||||
1:
|
||||
ld reghp, R0
|
||||
jp *RR2
|
||||
|
||||
Loading…
x
Reference in New Issue
Block a user