ToC | DocOverview | CGDoc | RelNotes | Index | PermutedIndex
| Allegro CL

| ANSI Common Lisp 11 Packages 11.2 Dictionary of Packages
11.2.28 *package* | Variable
  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 Allegro CL Implementation Details: None.

© Franz Inc. All Rights Reserved - File last updated 2022-07-25