fixed
This commit is contained in:
parent
e4136ac8e5
commit
02d253d810
|
@ -15,6 +15,7 @@
|
||||||
and.l #~0x3ff,d0
|
and.l #~0x3ff,d0
|
||||||
move.l a0,-(sp)
|
move.l a0,-(sp)
|
||||||
move.l d0,-(sp)
|
move.l d0,-(sp)
|
||||||
|
move.l d0,.limhp
|
||||||
jsr _brk
|
jsr _brk
|
||||||
tst.l (sp)+
|
tst.l (sp)+
|
||||||
move.l (sp)+,a0
|
move.l (sp)+,a0
|
||||||
|
|
|
@ -12,9 +12,11 @@
|
||||||
add.l #0x400, d1
|
add.l #0x400, d1
|
||||||
and.l #~0x3ff, d1
|
and.l #~0x3ff, d1
|
||||||
move.l d1, -(sp)
|
move.l d1, -(sp)
|
||||||
|
move.l d1,.limhp
|
||||||
jsr _brk ! allocate 1K bytes of extra storage
|
jsr _brk ! allocate 1K bytes of extra storage
|
||||||
add.l #4, sp
|
add.l #4, sp
|
||||||
bcs 2f
|
tst.l d0
|
||||||
|
bne 2f
|
||||||
1:
|
1:
|
||||||
move.l 4(sp), .reghp ! store new value of heap pointer
|
move.l 4(sp), .reghp ! store new value of heap pointer
|
||||||
move.l (sp)+,a0
|
move.l (sp)+,a0
|
||||||
|
|
Loading…
Reference in a new issue