Skip to content

Instantly share code, notes, and snippets.

@zhouqiang-cl
Created December 20, 2016 09:11
Show Gist options
  • Save zhouqiang-cl/6f28d42e056330821dbdde03d400486b to your computer and use it in GitHub Desktop.
Save zhouqiang-cl/6f28d42e056330821dbdde03d400486b to your computer and use it in GitHub Desktop.
common lisp 的函数 COPY-SYMBOL
语法
copy-symbol symbol &optional copy-properties => new-symbol
参数和值
symbol --- 一个 symbol
copy-properties --- 一个 generalized boolean
new-symbol --- 一个新的,没被扣押的 symbol
描述
拷贝一个 symbol
代码
* (setq fred 'fred-smith)
FRED-SMITH
* (setf (symbol-value fred) 3)
3
* (setq fred-clone-1a (copy-symbol fred nil))
#:FRED-SMITH
* (symbol-value 'fred-clone-1a)
#:FRED-SMITH
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment