--- ray/src/common/calfunc.c	1991/05/24 13:30:00	1.6
+++ ray/src/common/calfunc.c	1991/06/28 09:31:59	1.7
@@ -200,7 +200,7 @@ argument(n)			/* return nth argument for active functi
 register int  n;
 {
     register ACTIVATION  *actp = curact;
-    EPNODE  *ep;
+    register EPNODE  *ep;
     double  aval;
 
     if (actp == NULL || --n < 0) {