Initial revision

1984-07-20 10:44:57 +00:00
parent 1a0102783f
commit f54556ac0f
73 changed files with 3041 additions and 0 deletions
--- a/lang/pc/libpc/rdc.c
+++ b/lang/pc/libpc/rdc.c
@@ -0,0 +1,13 @@
+#include	<pc_file.h>
+
+extern		_rf();
+extern		_incpt();
+
+int _rdc(f) struct file *f; {
+	int c;
+
+	_rf(f);
+	c = *f->ptr;
+	_incpt(f);
+	return(c);
+}