86/ fboundp,是否有个函数的名字与给定的符号绑定。如果一个符号是函数的名字,则symbol-function会返回它。
1 > (fboundp '+);;;;判定符号
#<Compiled-function + #x3000000BA47F>
1 > (symbol-function '+)
#<Compiled-function + #x3000000BA47F>
1 > #'+
#<Compiled-function + #x3000000BA47F>
2 > (setf (symbol-function 'add2)
#'(lambda (x) (+ x 2)))
#<Anonymous Function #x302000CC29BF>
3 > (add2 1);;验证
3
3 > (fboundp 'add2)
#<Anonymous Function #x302000CC29BF>
3 > #' add2
#<Anonymous Function #x302000CC29BF>
3 > (defun foo (x)
"Implements an enhanced paradigm of diversity";;;字符串会变成函数的文档字符串
x)
FOO
4 > (documentation 'foo 'function);;;调用documentation来取得文档字符串
"Implements an enhanced paradigm of diversity"