12345678910111213141516171819202122232425262728293031 |
- .sect .text; .sect .rom; .sect .data; .sect .bss
- .sect .text
- break = 17
- .define __sbrk
- .define __brk
- .align 1
- __sbrk:
- .data2 0x0000
- addl3 .limhp,4(ap),-(sp)
- bcc 1f
- movl $0xFFFFFFFF,(sp) ! will cause an error (I hope)
- 1:
- movl .limhp,r3
- calls $1,__brk
- tstl r0
- blss 1f
- movl r3,r0
- 1:
- ret
- .align 1
- __brk:
- .data2 0x0000
- chmk $break
- bcc 1f
- jmp errmon
- 1:
- movl 4(ap),.limhp
- clrl r0
- ret
|