6 |
(lisp::provide :defpackage)#! |
(lisp::provide :defpackage)#! |
7 |
(lisp::in-package "USER")#! |
(lisp::in-package "USER")#! |
8 |
(lisp::use-package "DEFPACKAGE") |
(lisp::use-package "DEFPACKAGE") |
9 |
#((:documentation :size :nicknames :shadow :shadowing-import-from :use :import-from :intern :export :export-from) "Proceed, ignoring this option." "~s is not a valid option." (:size :documentation) :key :invalid-form "DEFPACKAGE option ~s specified more than once." :nicknames :documentation :size :shadow :intern :export :shadowing-import-from :import-from :export-from "The symbol ~s cannot coexist in these lists:~{ ~s~}" 1 2 3 4 "The symbol ~s cannot coexist in these lists:~{ ~s~}" :test 2147483646 lisp::eval-when (lisp::load lisp::eval lisp::compile) lisp::if lisp::find-package lisp::progn lisp::rename-package lisp::quote :use lisp::unuse-package lisp::package-use-list lisp::make-package (lisp::quote :use) (lisp::quote lisp::nil) (lisp::quote :nicknames) lisp::setf lisp::get :keyword (lisp::quote system::package-documentation) lisp::let lisp::*package* lisp::shadow lisp::mapcar (lisp::function lisp::intern) lisp::shadowing-import lisp::function lisp::lambda (lisp::symbol) lisp::find-symbol lisp::symbol lisp::intern lisp::specific-correctable-error :package-error "" (lisp::format lisp::nil "Symbol ~S not present~%" lisp::symbol) lisp::use-package "LISP" lisp::import (lisp::symbol) "" (lisp::format lisp::nil "Symbol ~S not present~%" lisp::symbol) (lisp::function lisp::intern) lisp::export (lisp::function lisp::intern) lisp::dolist lisp::package (lisp::do-external-symbols (lisp::symbol (lisp::find-package lisp::package)) (lisp::when (lisp::nth 1 (lisp::multiple-value-list (lisp::find-symbol (lisp::string lisp::symbol)))) (lisp::export (lisp::list (lisp::intern (lisp::string lisp::symbol)))))) lisp::car lisp::count lisp::specific-error lisp::string= lisp::find lisp::type-error (system::%init . #((lisp::proclaim (lisp::quote (lisp::declaration lisp::values defpackage::arglist))) (system::putprop (lisp::quote defpackage::defpackage) "DEFPACKAGE - DEFINED-PACKAGE-NAME {OPTION}* [Macro] |
#((:documentation :size :nicknames :shadow :shadowing-import-from :use :import-from :intern :export :export-from) "Proceed, ignoring this option." "~s is not a valid option." (:size :documentation) :key :invalid-form "DEFPACKAGE option ~s specified more than once." :nicknames :documentation :size :shadow :intern :export :shadowing-import-from :import-from :export-from "The symbol ~s cannot coexist in these lists:~{ ~s~}" 1 2 3 4 "The symbol ~s cannot coexist in these lists:~{ ~s~}" :test 2147483646 lisp::eval-when (lisp::load lisp::eval lisp::compile) lisp::if lisp::find-package lisp::progn lisp::rename-package lisp::quote :use lisp::unuse-package lisp::package-use-list lisp::make-package (lisp::quote :use) (lisp::quote lisp::nil) (lisp::quote :nicknames) lisp::setf lisp::get :keyword (lisp::quote system::package-documentation) lisp::let lisp::*package* lisp::shadow lisp::mapcar (lisp::function lisp::intern) lisp::shadowing-import lisp::function lisp::lambda (lisp::symbol) lisp::find-symbol lisp::symbol lisp::intern lisp::specific-correctable-error :package-error "" (lisp::format lisp::nil "Symbol ~S not present~%" lisp::symbol) lisp::use-package "LISP" lisp::import (lisp::symbol) "" (lisp::format lisp::nil "Symbol ~S not present~%" lisp::symbol) (lisp::function lisp::intern) lisp::export (lisp::function lisp::intern) lisp::dolist lisp::package (lisp::do-external-symbols (lisp::symbol (lisp::find-package lisp::package)) (lisp::when (lisp::nth 1 (lisp::multiple-value-list (lisp::find-symbol (lisp::string lisp::symbol)))) (lisp::export (lisp::list (lisp::intern (lisp::string lisp::symbol)))))) lisp::car lisp::count lisp::specific-error lisp::string= lisp::find lisp::type-error (system::%init . #((system::putprop (lisp::quote defpackage::defpackage) lisp::t (lisp::quote compiler::package-operation)) (lisp::proclaim (lisp::quote (lisp::declaration lisp::values defpackage::arglist))) (system::putprop (lisp::quote defpackage::defpackage) "DEFPACKAGE - DEFINED-PACKAGE-NAME {OPTION}* [Macro] |
10 |
|
|
11 |
This creates a new package, or modifies an existing one, whose name is |
This creates a new package, or modifies an existing one, whose name is |
12 |
DEFINED-PACKAGE-NAME. The DEFINED-PACKAGE-NAME may be a string or a |
DEFINED-PACKAGE-NAME. The DEFINED-PACKAGE-NAME may be a string or a |