2006/08/31

普通の関数をジェネリックファンクションに

普通の関数をジェネリックファンクションにする。

(shadow 'length)
(defmethod length (o)
(cl:length o))
(defmethod length ((o symbol))
(length (symbol-name o)))

0 件のコメント: