[Date Prev] [Date Index] [Date Next]
[Thread Prev] [Thread Index] [Thread Next]

[xyzzy:03616] Re: sub-class でなければ sub-closure というんでしょうか、



こんにちは。
花井です。

いかんです。アポストロフィー抜けたまんまのコードを送って
しまいました。(下から二行目の shadow のところ)

(defmacro shadowing-defun (name (&rest lambda-list) &body body)
  (shadow (symbol-name name))
  (let ((sym (intern (symbol-name name))))
    `(progn
       (eval-when (:load-toplevel)
         (shadow ',sym))
       (defun ,sym ,lambda-list ,@body))))

です。

-+-----------------+-------------------+-
       花井 達 (honey@xxxxxxxxx)
+-------------------------------------+-

Index Home