Initial revision

lang/pc/libpc/uwrite.c

@@ -0,0 +1,7 @@
+/* function uwrite(fd:integer; var b:buf; n:integer):integer; */
+
+extern int	write();
+
+int uwrite(fd,b,n) char *b; int fd,n; {
+	return(write(fd,b,n));
+}