funcallで呼び出すからdefunじゃなくてdefvarとかで良い事に気付いた。 (defun app (&rest arg) (reduce #'funcall arg)) (defun $ (&rest arg) (reduce #'funcall arg :from-end t )) (defun charfn (code) (lambda (&optional (a nil)) (if a (if (= code …