Changeset 12958


Ignore:
Timestamp:
Oct 9, 2009, 6:30:15 PM (10 years ago)
Author:
gz
Message:

Bind more printer controls in with-standard-io-syntax (r12429)

File:
1 edited

Legend:

Unmodified
Added
Removed
  • branches/working-0711/ccl/lib/macros.lisp

    r12957 r12958  
    15471547           (*read-eval* t) ; Also MIA as of 5/15/90
    15481548           (*read-suppress* nil)
    1549            (*readtable* %initial-readtable%))
     1549           (*readtable* %initial-readtable%)
     1550           ; ccl extensions (see l1-io.lisp)
     1551           (*print-abbreviate-quote* t)
     1552           (*print-structure* t)
     1553           (*print-simple-vector* nil)
     1554           (*print-simple-bit-vector* nil)
     1555           (*print-string-length* nil))
    15501556       ,@decls
    15511557       ,@body)))
Note: See TracChangeset for help on using the changeset viewer.