brk.s 378 B

12345678910111213141516171819202122232425
  1. .define _brk
  2. .define _sbrk
  3. .extern _brk
  4. .extern _sbrk
  5. .sect .text
  6. .sect .rom
  7. .sect .data
  8. .sect .bss
  9. .sect .text
  10. _sbrk: move.l (.limhp),d0
  11. add.l d0,(4,sp)
  12. move.l #0x11,d0
  13. trap #0
  14. bcs lcerror
  15. move.l (.limhp),d0
  16. move.l d0,a0
  17. move.l (4,sp),(.limhp)
  18. rts
  19. lcerror: jmp (cerror)
  20. _brk: move.l #0x11,d0
  21. trap #0
  22. bcs lcerror
  23. move.l (4,sp),(.limhp)
  24. clr.l d0
  25. rts