Index: /trunk/source/lib/macros.lisp
===================================================================
--- /trunk/source/lib/macros.lisp	(revision 15007)
+++ /trunk/source/lib/macros.lisp	(revision 15008)
@@ -1601,5 +1601,5 @@
            (*print-length* nil)
            (*print-level* nil)
-           (*print-lines* nil) ; This doesn't exist as of 5/15/90 - does now
+           (*print-lines* nil)
            (*print-miser-width* nil)
            (*print-pprint-dispatch* nil)
@@ -1610,9 +1610,9 @@
            (*read-base* 10.)
            (*read-default-float-format* 'single-float)
-           (*read-eval* t) ; Also MIA as of 5/15/90
+           (*read-eval* t)
            (*read-suppress* nil)
            (*readtable* %standard-readtable%)
-	   ; ccl extensions (see l1-io.lisp)
-	   (*print-abbreviate-quote* t)
+	   ;; ccl extensions (see l1-io.lisp)
+	   (*print-abbreviate-quote* nil)
 	   (*print-structure* t)
 	   (*print-simple-vector* nil)