Initial revision

This commit is contained in:
ceriel
1987-01-08 10:41:08 +00:00
parent 037c2426ab
commit c2805a25bd
54 changed files with 671 additions and 0 deletions

39
mach/i86/libsys/brk.s Normal file
View File

@@ -0,0 +1,39 @@
.sect .text; .sect .rom; .sect .data; .sect .bss; .sect .text
.define _brk
.define xbrk
.define np
.extern _brk
.extern xbrk
.extern np, cerror
_brk:
mov bx,sp
mov ax,2(bx)
mov cx,sp
sub cx,128
jbe 1f
mov bx,(np)
mov (np),ax
sub ax,bx
jbe 2f
call xbrk
2:
xor ax,ax
ret
1:
mov ax,0xc
jmp cerror
xbrk:
push di
mov di,bx
mov cx,ax
xor ax,ax
shr cx,1
repz stos
jae 3f
stosb
3:
pop di
ret
.sect .data
np: .data2 0
.sect .text