--- ray/src/rt/func.c	1993/03/08 12:37:23	2.8
+++ ray/src/rt/func.c	1993/09/29 10:39:40	2.11
@@ -18,9 +18,9 @@ static char SCCSid[] = "$SunId$ LBL";
 
 
 #define  INITFILE	"rayinit.cal"
-#define  REFVNAME	"`FILE_REFCNT"
 #define  CALSUF		".cal"
 #define  LCALSUF	4
+char  REFVNAME[] = "`FILE_REFCNT";
 
 XF  unitxf = {			/* identity transform */
 	{{1.0, 0.0, 0.0, 0.0},
@@ -69,6 +69,7 @@ int  dofwd;
 		funset("erf", 1, ':', l_erf);
 		funset("erfc", 1, ':', l_erfc);
 		setnoisefuncs();
+		setprismfuncs();
 		loadfunc(initfile);
 		initfile[0] = '\0';
 	}
@@ -166,7 +167,7 @@ setfunc(m, r)			/* set channels for function call */
 OBJREC  *m;
 register RAY  *r;
 {
-	static long  lastrno = -1;
+	static unsigned long  lastrno = ~0;
 	register MFUNC  *f;
 					/* get function */
 	if ((f = (MFUNC *)m->os) == NULL)