为什么Common Lisp中的包名和导出都使用未填充的符号？
为什么Common Lisp中的包名和导出都使用未填充的符号？
提问于 2011-10-26 03:12:19
在screen cast on Common List中，作者使用未使用的符号来表示包名和导出。
(defpackage #:foo
(:use :cl)
(:export #:bar
#:baz))
(in-package #:foo)他还在匿名函数前面使用了锐利的符号。
(defun transposed (m)
(make-instance 'matrix
:rows (matrix-cols m)
:cols (matrix-rows m)
:generator #'(lambda (i j) (matrix-at m j i))))据我所知，在Practical Common Lisp这本书中，锐号并没有用于包名和导出。
在这些情况下使用未插入符号(锐号)的原因是什么？
回答 2
Stack Overflow用户
回答已采纳
发布于 2011-10-26 03:44:20
使用interned符号会污染您当前所在的包，因为这些符号只用于它们的名称：
[1]> *package*
#<PACKAGE COMMON-LISP-USER>
[2]> (defpackage bar)
#<PACKAGE BAR>
[3]> (find-symbol "BAR")
BAR ;
:INTERNAL未实例化的符号不会这样做：
;; Uninterned symbols don't cause symbol pollution:
[4]> (defpackage #:foo)
#<PACKAGE FOO>
[5]> (find-symbol "FOO")
NIL ;
NIL您也可以直接使用字符串，但由于您通常要处理大写的符号名称，因此它们不太便于编写：
[6]> (defpackage "BARFOO")
#<PACKAGE BARFOO>
[7]> (find-symbol "BARFOO")
NIL ;
NIL示例
为了说明该问题，请考虑以下交互：
[1]> (defpackage hello (:use cl) (:export hello))
#<PACKAGE HELLO>
;; Let's write some FOO stuff...
[2]> (defpackage foo (:use cl))
#<PACKAGE FOO>
[3]> (in-package foo)
#<PACKAGE FOO>
;; Oh, I forgot to import HELLO!
;; Let's fix that.
FOO[4]> (defpackage foo (:use cl hello))
*** - (COMMON-LISP:USE-PACKAGE (#<PACKAGE HELLO> #<PACKAGE COMMON-LISP>)
#<PACKAGE FOO>): 1 name conflicts remain
Which symbol with name "HELLO" should be accessible in #<PACKAGE FOO>?
;; Oops.Stack Overflow用户
发布于 2011-10-26 03:27:47
#'是function运算符的缩写(在《实用Common Lisp》一书中使用了几次)。
页面原文内容由Stack Overflow提供。腾讯云小微IT领域专用引擎提供翻译支持
原文链接：
https://stackoverflow.com/questions/7894548
复制相关文章
相似问题
腾讯云开发者
