--- ray/src/common/modobject.c	1991/07/29 15:47:46	1.2
+++ ray/src/common/modobject.c	1992/11/21 21:35:38	2.2
@@ -1,4 +1,4 @@
-/* Copyright (c) 1986 Regents of the University of California */
+/* Copyright (c) 1992 Regents of the University of California */
 
 #ifndef lint
 static char SCCSid[] = "$SunId$ LBL";
@@ -22,7 +22,9 @@ static struct ohtab {
 	OBJECT  *htab;			/* table, if allocated */
 }  modtab = {100, NULL}, objtab = {1000, NULL};	/* modifiers and objects */
 
+static int  otndx();
 
+
 #ifdef  GETOBJ
 int
 object(oname)			/* get an object number from its name */
@@ -78,18 +80,6 @@ int  oldsiz;
 		if (*hsp > oldsiz)
 			return(*hsp);
 	return(oldsiz*2 + 1);		/* not always prime */
-}
-
-
-static int
-shash(s)			/* hash a string */
-register char  *s;
-{
-	register int  h = 0;
-
-	while (*s)
-		h = (h<<1 & 0x7fff) ^ *s++;
-	return(h);
 }