SCCS-vsn: lib/libc/tahoe/sys/bind.s 5.1
SCCS-vsn: lib/libc/tahoe/sys/brk.s 5.1
--- /dev/null
+/*
+ * Copyright (c) 1983 Regents of the University of California.
+ * All rights reserved. The Berkeley software License Agreement
+ * specifies the terms and conditions for redistribution.
+ */
+
+#ifdef SYSLIBC_SCCS
+_sccsid:.asciz "@(#)bind.s 5.1 (Berkeley) %G%"
+#endif SYSLIBC_SCCS
+
+#include "SYS.h"
+
+SYSCALL(bind)
+ ret
--- /dev/null
+/*
+ * Copyright (c) 1983 Regents of the University of California.
+ * All rights reserved. The Berkeley software License Agreement
+ * specifies the terms and conditions for redistribution.
+ */
+
+#ifdef SYSLIBC_SCCS
+_sccsid:.asciz "@(#)brk.s 5.1 (Berkeley) %G%"
+#endif SYSLIBC_SCCS
+
+#include "SYS.h"
+
+#define SYS_brk 17
+
+ .globl curbrk
+ .globl minbrk
+
+ENTRY(brk)
+ cmpl 4(fp),minbrk
+ bgeq ok
+ movl minbrk,4(fp)
+ok:
+ kcall $SYS_brk
+ jcs err
+ movl 4(fp),curbrk
+ clrl r0
+ ret
+err:
+ jmp cerror