adapted to new semantics of the EHEAP error: no longer fatal

This commit is contained in:
ceriel 1988-04-11 11:37:54 +00:00
parent 9d7f47c37a
commit 155a1ba5c8
3 changed files with 8 additions and 5 deletions

View file

@ -1,7 +1,7 @@
.sect .text; .sect .rom; .sect .data; .sect .bss
.sect .text
.define .strhp
.extern .reghp, .limhp, EHEAP, .fat
.extern .reghp, .limhp, EHEAP, .trp
.strhp:
pop bx
@ -18,4 +18,6 @@
jmp bx
2:
mov ax,EHEAP
jmp .fat
push ax
call .trp
jmp bx

View file

@ -8,11 +8,11 @@ _getal:
.space 12
_char:
.space 1
.align 2
.align 4
.sect .data
hexs:
.ascii "0123456789abcdef"
.align 2
.align 4
.sect .text
_printf:
movem.l d0/d1/d2/a0/a1/a2/a3/a4/a5/a6, -(sp)

View file

@ -22,5 +22,6 @@
jmp (a0) ! return
2:
move.l #EHEAP, -(sp)
jmp (.fatal)
jsr (.trp)
jmp (a0)
.align 2