Initial revision

1984-07-20 10:44:57 +00:00
parent eb823929a1
commit 597d25decd
73 changed files with 3041 additions and 0 deletions
--- a/lang/pc/libpc/pclose.c
+++ b/lang/pc/libpc/pclose.c
@@ -0,0 +1,9 @@
+#include	<pc_file.h>
+
+extern		_cls();
+
+/* procedure pclose(var f:file of ??); */
+
+pclose(f) struct file *f; {
+	_cls(f);
+}