- 【入門】Common Lisp その10【質問よろず】
933 ：デフォルトの名無しさん[sage]：2014/07/21(月) 13:13:57.09 ID:1PP1q7+H - (defmacro iglambda (lambda-list &body body)
(let ((args (remove-if
(lambda (arg) (member arg lambda-list-keywords))
(mapcar (lambda (arg) (if (consp arg) (car arg) arg)) lambda-list))))
`(lambda ,lambda-list (declare (ignorable ,@args)) ,@body)))
こんなのを書いたんですが、lambdaみたく#'(iglambda (x) x)でエラーにならないようにする方法ってありますか
普段は#'つけなければいいだけなんですが、他のマクロで#'(iglambda (x) x)みたいに展開されちゃうとエラーになっちゃうので
|
|