diff src/print.c @ 343:8bec6624d99b r21-1-1

Import from CVS: tag r21-1-1
author cvs
date Mon, 13 Aug 2007 10:52:53 +0200
parents 558f606b08ae
children cc15677e0335
line wrap: on
line diff
--- a/src/print.c	Mon Aug 13 10:52:06 2007 +0200
+++ b/src/print.c	Mon Aug 13 10:52:53 2007 +0200
@@ -1352,7 +1352,7 @@
   /* If we print an uninterned symbol as part of a complex object and
      the flag print-gensym is non-nil, prefix it with #n= to read the
      object back with the #n# reader syntax later if needed.  */
-  if (!NILP (Vprint_gensym) && NILP (XSYMBOL (obj)->obarray))
+  if (!NILP (Vprint_gensym) && !(XSYMBOL_OBARRAY_FLAGS (obj) & 2))
     {
       if (print_depth > 1)
 	{