Added SYMBOL-NAME to known global operators.

diff --git a/v8/src/sf/usiexp.scm b/v8/src/sf/usiexp.scm
index b592496842b76b32dbadfc7189e6fd64f9348b1f..1389fe60cabd13890ea6b0b8086a62296895e951 100644 (file)
--- a/v8/src/sf/usiexp.scm
+++ b/v8/src/sf/usiexp.scm
@@ -1,6 +1,6 @@
 #| -*-Scheme-*-
 
-$Id: usiexp.scm,v 1.10 1995/09/11 14:29:12 adams Exp $
+$Id: usiexp.scm,v 1.11 1995/10/25 18:42:05 adams Exp $
 
 Copyright (c) 1988-1995 Massachusetts Institute of Technology
 
@@ -727,6 +727,7 @@ MIT in each case. |#
     SIN
     SQRT
     STRING->SYMBOL
+    (SYMBOL-NAME 1)
     TAN
     TRUNCATE->EXACT
     ))