Shammer's Philosophy

My private adversaria

2008-10-08から1日間の記事一覧

mapcar 関数と mapc 関数比較

もう少しみてみることにした。前に定義した、 (defun mapc-test (lst) (if (listp lst) (mapc #'(lambda (x) (format t "~A~%" (concatenate 'string "Good-bye, " x))) lst) (format t "Usage: mapc-test $LIST~%")))だと、厳密には mapc の実行結果が出力…