adapted so that _brk routine may update .limhp

diff --git a/mach/m68020/libem/shp.s b/mach/m68020/libem/shp.s
index 2d6c3b5..afda78c 100644 (file)
--- a/mach/m68020/libem/shp.s
+++ b/mach/m68020/libem/shp.s
@@ -13,11 +13,10 @@ EHEAP=17
        blt     1f
        add.l   #0x400, d1
        and.l   #~0x3ff, d1
-       move.l  d1, (.limhp)
        move.l  d1, -(sp)
        jsr     (_brk)          ! allocate 1K bytes of extra storage
-       add.l   #4, sp
        bcs     2f
+       move.l  (sp)+,(.limhp)
 1:
        move.l  (sp)+, (.reghp) ! store new value
        jmp     (a0)            ! return