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

View file

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

View file

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