add-package-local-nickname

Arguments: local-nickname actual-package &optional (housing-package *package*)

Returns the housing-package, which must be a package designator and defaults to the value of *package*, after adding a mapping for the string designator local-nickname to the package designated by actual-package. If local-nickname is any of the package-descriptors for the common-lisp or keyword packages, an error is signaled.

Example

cl-user(8): (defpackage :p1)
#<The p1 package>
cl-user(9): (defpackage :p2)
#<The p2 package>
cl-user(10): (defpackage :hpack (:use :cl :excl) 
			 (:local-nicknames (:p-one :p1)))
#<The hpack package>
cl-user(11): (package-local-nicknames :hpack)
(("p-one" . #<The p1 package>))
cl-user(12): (add-package-local-nickname "p-two" :p2 :hpack)
#<The hpack package>
cl-user(13): (package-local-nicknames :hpack)
(("p-one" . #<The p1 package>) ("p-two" . #<The p2 package>))
cl-user(14): (add-package-local-nickname "p-one-a" :p1 :hpack)
#<The hpack package>
cl-user(15): (package-local-nicknames :hpack)
(("p-one" . #<The p1 package>) ("p-two" . #<The p2 package>)
 ("p-one-a" . #<The p1 package>))
cl-user(16): 

See Package-local Nicknames in packages.htm for more information in package-local nicknames.

Copyright (c) 1998-2022, Franz Inc. Lafayette, CA., USA. All rights reserved.
This page is new in the 10.1 release.
Created 2019.8.20.