2010-02-04から1日間の記事一覧
(defun a () 0) (defvar b (let ((c #'a)) (defun a () 1) c)) (a) ;=> 1 (funcall b) ;=> ??? sbcl1.0.29だと(funcall b)に対して何故か1が返る。 alisp,eclでは0が返る。 ちなみに#'の代わりにsymbol-functionを使うと0が返る。 x86なLinux環境が今無いの…
(defun a () 0) (defvar b (let ((c #'a)) (defun a () 1) c)) (a) ;=> 1 (funcall b) ;=> ??? sbcl1.0.29だと(funcall b)に対して何故か1が返る。 alisp,eclでは0が返る。 ちなみに#'の代わりにsymbol-functionを使うと0が返る。 x86なLinux環境が今無いの…