Changeset 12889

Timestamp:

Sep 28, 2009, 2:52:30 PM (15 years ago)

Author:

R. Matthew Emerson

Message:

In WITH-STANDARD-IO-SYNTAX, bind *READTABLE* to the standard readtable,
now that we make a distinction between the standard readtable and the
initial readtable. (see ticket:568)

File:

• trunk/source/lib/macros.lisp (modified) (1 diff)

trunk/source/lib/macros.lisp

@@ -1587 +1587 @@
            (*read-eval* t) ; Also MIA as of 5/15/90
            (*read-suppress* nil)
-           (*readtable* %initial-readtable%)
+           (*readtable* %standard-readtable%)
            ; ccl extensions (see l1-io.lisp)
            (*print-abbreviate-quote* t)