*** empty log message ***

diff --git a/v7/src/microcode/primutl.c b/v7/src/microcode/primutl.c
index 45a962904b73f48c95ea34941ddc62f0048e8c43..b67574221a0e6861974851186326154f641704dc 100644 (file)
--- a/v7/src/microcode/primutl.c
+++ b/v7/src/microcode/primutl.c
@@ -30,7 +30,7 @@ Technology nor of any adaptation thereof in any advertising,
 promotional, or sales literature without prior written consent from
 MIT in each case. */
 
-/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/primutl.c,v 9.48 1989/04/18 04:09:26 cph Exp $
+/* $Header: /Users/cph/tmp/foo/mit-scheme/mit-scheme/v7/src/microcode/primutl.c,v 9.49 1989/04/18 04:14:55 cph Exp $
  *
  * This file contains the support routines for mapping primitive names
  * to numbers within the microcode.  Primitives are written in C
@@ -330,7 +330,6 @@ primitive_name(code)
      int code;
 {
   Pointer scheme_string;
-  extern Pointer string_to_symbol();
 
   if (code <= MAX_PRIMITIVE)
   {