--- ray/src/common/peano.c	1991/08/12 13:06:13	1.1
+++ ray/src/common/peano.c	2003/02/25 02:47:21	2.3
@@ -1,16 +1,13 @@
-/* Copyright (c) 1991 Regents of the University of California */
-
 #ifndef lint
-static char SCCSid[] = "$SunId$ LBL";
+static const char	RCSid[] = "$Id: peano.c,v 2.3 2003/02/25 02:47:21 greg Exp $";
 #endif
-
 /*
  * Generate an N-dimensional Peano space-filling curve
  * on the interval [0,1).
- *
- *	12 Aug 91	Greg Ward
  */
 
+#include "copyright.h"
+
 extern double	floor();
 
 
@@ -44,12 +41,12 @@ double	t, e;
 
 
 peano(p, n, t, e)		/* compute Peano point */
-double  p[];
+register double  p[];
 int	n;
 double	t, e;
 {
 	register int	i;
-	int  neg = 0;
+	register int  neg = 0;
 
 	i = n;
 	while (i-- > 0) {