Changeset 9433


Ignore:
Timestamp:
May 9, 2008, 10:19:17 AM (11 years ago)
Author:
gb
Message:

No more *CL-USER-PACKAGE* constant (for obscure reasons.) Use PKG-ARG
in expansion of WITH-STANDARD-IO-SYNTAX.

File:
1 edited

Legend:

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

    r9364 r9433  
    14801480       *READTABLE*                      the standard readtable"
    14811481  (multiple-value-bind (decls body) (parse-body body env)
    1482     `(let ((*package* *common-lisp-user-package*)
     1482    `(let ((*package* (pkg-arg "COMMON-LISP-USER"))
    14831483           (*print-array* t)
    14841484           (*print-base* 10.)
Note: See TracChangeset for help on using the changeset viewer.