--- ray/src/common/portio.c	1992/10/02 16:09:57	2.3
+++ ray/src/common/portio.c	2003/07/17 09:21:29	2.8
@@ -1,15 +1,18 @@
-/* Copyright (c) 1992 Regents of the University of California */
-
 #ifndef lint
-static char SCCSid[] = "$SunId$ LBL";
+static const char	RCSid[] = "$Id: portio.c,v 2.8 2003/07/17 09:21:29 schorsch Exp $";
 #endif
-
 /*
  * Portable i/o for binary files
+ *
+ * External symbols declared in standard.h
  */
 
+#include "copyright.h"
+
 #include <stdio.h>
 
+#include "rtio.h"
+
 #ifndef frexp
 extern double  frexp();
 #endif
@@ -18,6 +21,7 @@ extern double  ldexp();
 #endif
 
 
+void
 putstr(s, fp)			/* write null-terminated string to fp */
 register char  *s;
 register FILE  *fp;
@@ -28,6 +32,7 @@ register FILE  *fp;
 }
 
 
+void
 putint(i, siz, fp)		/* write a siz-byte integer to fp */
 long  i;
 register int  siz;
@@ -38,6 +43,7 @@ register FILE  *fp;
 }
 
 
+void
 putflt(f, fp)			/* put out floating point number */
 double	f;
 FILE  *fp;
@@ -91,8 +97,10 @@ double
 getflt(fp)			/* get a floating point number */
 FILE  *fp;
 {
+	long	l;
 	double	d;
 
-	d = (double)getint(4, fp)/0x7fffffff;
+	l = getint(4, fp);
+	d = (l + (l > 0 ? .5 : -.5)) * (1./0x7fffffff);
 	return(ldexp(d, (int)getint(1, fp)));
 }