--- ray/src/meta/hfio.c	2003/08/01 14:14:24	1.3
+++ ray/src/meta/hfio.c	2003/11/15 02:13:37	1.4
@@ -1,5 +1,5 @@
 #ifndef lint
-static const char RCSid[] = "$Id: hfio.c,v 1.3 2003/08/01 14:14:24 schorsch Exp $";
+static const char RCSid[] = "$Id: hfio.c,v 1.4 2003/11/15 02:13:37 schorsch Exp $";
 #endif
 /*
  *    Human-readable file I/O
@@ -10,14 +10,14 @@ static const char RCSid[] = "$Id: hfio.c,v 1.3 2003/08
 
 
 
-static PRIMITIVE  peof = {PEOF, 0200, -1, -1, -1, -1, NULL};
+static PRIMITIVE  peof = {PEOF, 0200, {-1, -1, -1, -1}, NULL, NULL};
 
 
-readp(p, fp)		/* get human-readable primitive */
-
-PRIMITIVE  *p;
-FILE  *fp;
-
+int
+readp(		/* get human-readable primitive */
+	PRIMITIVE  *p,
+	FILE  *fp
+)
 {
  char  inbuf[MAXARGS];
  register int  c, nargs;
@@ -76,12 +76,12 @@ FILE  *fp;
 
 
 
+void
+writep(		/* print primitive in human-readable form */
+	register PRIMITIVE  *p,
+	FILE  *fp
+)
 
-writep(p, fp)		/* print primitive in human-readable form */
-
-register PRIMITIVE  *p;
-FILE  *fp;
-
 {
 
  if (fp == NULL) fp = stdout;
@@ -111,13 +111,14 @@ FILE  *fp;
 
 
 
+void
+writeof(		/* write end of file command to fp */
+	FILE  *fp
+)
 
-writeof(fp)		/* write end of file command to fp */
-
-FILE  *fp;
-
 {
 
  writep(&peof, fp);
 
- }
+}
+