>>171
むしろ向いてる気がするんだけどね。「定義？仕様？実装を見ろッ」という
のは楽なんだけど，時々自分が悪いのかそれとも地雷踏んだのか悩むし

function designator:
1. シンボル ;; グローバル環境で関数名を表わすシンボル
2. 関数 ;; #'foo とか (lambda (...) ...)

と定義されているのでー手元の SLIME で試すとこんな感じ

CL-USER> (defun フゥゥ () 'グローバルフゥゥ)
フゥゥ
CL-USER> (flet ((フゥゥ () 'ローカルフゥゥ)) (apply 'フゥゥ ()))
グローバルフゥゥ
CL-USER> (flet ((フゥゥ () 'ローカルフゥゥ)) (apply #'フゥゥ ()))
ローカルフゥゥ