CLCS
src report error
Index
packagep Packages Dictionary package-error
Variable

*package*

Value Type

a package object.

Initial Value

the COMMON-LISP-USER package.

Description

Whatever package object is currently the value of *package* is referred to as the current package.

Examples

 (in-package "COMMON-LISP-USER") ⇒  #<PACKAGE "COMMON-LISP-USER">
 *package* ⇒  #<PACKAGE "COMMON-LISP-USER">
 (make-package "SAMPLE-PACKAGE" :use '("COMMON-LISP"))
⇒  #<PACKAGE "SAMPLE-PACKAGE">
 (list 
   (symbol-package
     (let ((*package* (find-package 'sample-package)))
       (setq *some-symbol* (read-from-string "just-testing"))))
   *package*)
⇒  (#<PACKAGE "SAMPLE-PACKAGE"> #<PACKAGE "COMMON-LISP-USER">)
 (list (symbol-package (read-from-string "just-testing"))
       *package*)
⇒  (#<PACKAGE "COMMON-LISP-USER"> #<PACKAGE "COMMON-LISP-USER">)
 (eq 'foo (intern "FOO")) ⇒  true
 (eq 'foo (let ((*package* (find-package 'sample-package)))
            (intern "FOO")))
⇒  false

Affected By

load, compile-file, in-package

See Also

compile-file, in-package, load, package

Backlinks

compile-file, delete-package, in-package, Introduction to Packages, load, Multiple Possible Textual Representations, Package System Consistency Rules, Packages Dictionary, read, read-preserving-whitespace, Symbols in the COMMON-LISP Package, The COMMON-LISP Package, Variables that affect the Lisp Reader, with-standard-io-syntax