ack/mach/pdp/libsys/sbrk.s

#include "sys.h"
.define	_sbrk
.define	_brk
.extern	_end
.extern	_errno

_sbrk:
	mov	2(sp),0f+2
	beq	1f
	add	.limhp,0f+2
	bcs	2f
	sys	indir; .data2 0f
	bcc	1f
2:
	mov	r0,_errno
	mov	$-1,r0
	rts	pc
1:
	mov	.limhp,r0
	add	2(sp),.limhp
	rts	pc

_brk:
	mov	2(sp),0f+2
	sys	indir; .data2 0f
	bcc	1f
	mov	r0,_errno
	mov	$-1,r0
	rts	pc
1:
	mov	2(sp),.limhp
	clr	r0
	rts	pc

.sect .data
0:
	sys	break
	.data2	0
Initial revision 1987-01-07 17:13:41 +00:00			`#include "sys.h"`
converted to ACK assembler format 1987-05-14 17:45:41 +00:00			`.define _sbrk`
			`.define _brk`
			`.extern _end`
			`.extern _errno`
Initial revision 1987-01-07 17:13:41 +00:00
			`_sbrk:`
			`mov 2(sp),0f+2`
			`beq 1f`
use .limhp 1990-04-23 13:39:26 +00:00			`add .limhp,0f+2`
Initial revision 1987-01-07 17:13:41 +00:00			`bcs 2f`
converted to ACK assembler format 1987-05-14 17:45:41 +00:00			`sys indir; .data2 0f`
			`bcc 1f`
Initial revision 1987-01-07 17:13:41 +00:00			`2:`
			`mov r0,_errno`
			`mov $-1,r0`
			`rts pc`
			`1:`
use .limhp 1990-04-23 13:39:26 +00:00			`mov .limhp,r0`
			`add 2(sp),.limhp`
Initial revision 1987-01-07 17:13:41 +00:00			`rts pc`

			`_brk:`
			`mov 2(sp),0f+2`
converted to ACK assembler format 1987-05-14 17:45:41 +00:00			`sys indir; .data2 0f`
			`bcc 1f`
Initial revision 1987-01-07 17:13:41 +00:00			`mov r0,_errno`
			`mov $-1,r0`
			`rts pc`
			`1:`
use .limhp 1990-04-23 13:39:26 +00:00			`mov 2(sp),.limhp`
Initial revision 1987-01-07 17:13:41 +00:00			`clr r0`
			`rts pc`

converted to ACK assembler format 1987-05-14 17:45:41 +00:00			`.sect .data`
Initial revision 1987-01-07 17:13:41 +00:00			`0:`
converted to ACK assembler format 1987-05-14 17:45:41 +00:00			`sys break`
			`.data2 0`