MAKE-PACKAGE
The default value of the :USE
argument is
(“COMMON-LISP”)
.
MAKE-PACKAGE
accepts additional keyword arguments
:CASE-SENSITIVE
and :CASE-INVERTED
(but not :MODERN
!)
DEFPACKAGE
DEFPACKAGE
accepts additional options :CASE-SENSITIVE
,
:CASE-INVERTED
, and :MODERN
.
When the package being defined already exists, it is modified as follows (and in this order):
:CASE-SENSITIVE
(SETF
EXT:PACKAGE-CASE-SENSITIVE-P
)
(with a warning):CASE-INVERTED
(SETF
EXT:PACKAGE-CASE-INVERTED-P
)
(with a warning):MODERN
if “COMMON-LISP” is being used, it is un-used and
“CS-COMMON-LISP” is used instead; also, “CS-COMMON-LISP” is used instead of “COMMON-LISP”
throughout the DEFPACKAGE
form, e.g.,
(DEFPACKAGE
"FOO" (:MODERN
T
) (:USE
"COMMON-LISP" "EXT"))
is equivalent to
(DEFPACKAGE
"FOO" (:CASE-SENSITIVE
T
) (:CASE-INVERTED
T
) (:USE
"CS-COMMON-LISP" "EXT"))
:NICKNAMES
RENAME-PACKAGE
:DOCUMENTATION
(SETF
DOCUMENTATION
)
:SHADOW
SHADOW
:SHADOWING-IMPORT-FROM
SHADOWING-IMPORT
:USE
USE-PACKAGE
and UNUSE-PACKAGE
:IMPORT-FROM
IMPORT
:INTERN
INTERN
(but not UNINTERN
)
:EXPORT
INTERN
and EXPORT
(but not
UNEXPORT
):SIZE
EXT:RE-EXPORT
The function (
re-EXT:RE-EXPORT
FROM-PACK
TO-PACK
)EXPORT
s all external
SYMBOL
s from FROM-PACK
also from
TO-PACK
, provided it already uses
FROM-PACK
; and SIGNAL
s an ERROR
otherwise.
EXT:PACKAGE-CASE-INVERTED-P
Returns T
if the argument is a
case-inverted package.
This function is SETF
able, although it is probably not a good idea
to change the case-inverted status of an existing package.
EXT:PACKAGE-CASE-SENSITIVE-P
Returns T
if the argument is a :CASE-SENSITIVE
PACKAGE
.
This function is SETF
able, although it is probably not a good idea
to change the case-sensitive status of an existing package.
These notes document CLISP version 2.49.93+ | Last modified: 2018-02-19 |