- Lisp Scheme Part39
818 ：デフォルトの名無しさん[sage]：2015/02/24(火) 10:15:00.82 ID:MjCxRVrn - 特定のクラスとそのサブクラスについて、make-instanceの処理の前になんかしたい場合ってどんな方法がありますか？
(defmethod :around make-instance ((class 'standard-class) &rest initargs)
(if (subtypep class particular-class)
...
(call-next-method)))
こんなんしか思いつかないんですが、いろいろよくない感じがします
|