d0p1/ack
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity

Use .limhp

Browse source
This commit is contained in:
ceriel 1990-01-22 14:14:38 +00:00
parent 786665c582
commit 5241920b3c
3 changed files with 10 additions and 13 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

11
mach/vax4/libbsd4_1a/_sbrk.s
View file

@ -7,12 +7,12 @@ break = 17
.align 1
__sbrk:
.data2 0x0000
addl3 Ibrk,4(ap),-(sp)
addl3 .limhp,4(ap),-(sp)
bcc 1f
movl $0xFFFFFFFF,(sp) ! will cause an error (I hope)
1:
movl Ibrk,r3
calls $1,_brk
movl .limhp,r3
calls $1,__brk
tstl r0
blss 1f
movl r3,r0
@ -26,9 +26,6 @@ __brk:
bcc 1f
jmp errmon
1:
movl 4(ap),Ibrk
movl 4(ap),.limhp
clrl r0
ret
.sect .data
Ibrk: .data4 endbss

3
mach/vax4/libbsd4_1a/head_em.s
View file

@ -6,6 +6,7 @@
.define hol0
.define .reghp
.define .limhp
.define .trppc
.define .trpim
@ -73,6 +74,8 @@ Im2:
.data4 0
.reghp:
.data4 _end
.limhp:
.data4 _end
hol0:
.space 8
.trppc:

9
mach/vax4/libbsd4_1a/sbrk.s
View file

@ -7,11 +7,11 @@ break = 17
.align 1
_sbrk:
.data2 0x0000
addl3 Ibrk,4(ap),-(sp)
addl3 .limhp,4(ap),-(sp)
bcc 1f
movl $0xFFFFFFFF,(sp) ! will cause an error (I hope)
1:
movl Ibrk,r3
movl .limhp,r3
calls $1,_brk
tstl r0
blss 1f
@ -26,9 +26,6 @@ _brk:
bcc 1f
jmp errmon
1:
movl 4(ap),Ibrk
movl 4(ap),.limhp
clrl r0
ret
.sect .data
Ibrk: .data4 endbss