Skip to content

Instantly share code, notes, and snippets.

@zhouqiang-cl
Created December 11, 2016 01:37
Show Gist options
  • Save zhouqiang-cl/93cf0d74b1bc3190dc9ba02c0fb10c25 to your computer and use it in GitHub Desktop.
Save zhouqiang-cl/93cf0d74b1bc3190dc9ba02c0fb10c25 to your computer and use it in GitHub Desktop.
common lisp 的函数 SHADOW
语法
shadow symbol-names &optional package => t
参数和值
symbol-names --- 一组 string 的指示符的指示符
package --- 一个 package 的指示符, 默认是当前 package
描述
shadow 确保 symbols-names 提供的符号在 package中。
如果 symbols-names 提供的符号不在 package 中,那么对应的符号被创建. 作为内部符号插入到 package 中
代码
* (package-shadowing-symbols (make-package 'temp))
NIL
* (package-shadowing-symbols 'temp)
NIL
* (shadow 'car 'temp)
T
* (package-shadowing-symbols 'temp)
(TEMP::CAR)
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment