(defun get-method (object message) (funcall object message)) (defun send (object message &rest args) (apply (get-method object message) args))のようになり,
> (send acc 'balance) 10.0 > (send acc 'withdraw 3) 7.0 > (send acc 'deposit 5) 12.0 > (send acc 'balance) 12.0という具合に, オブジェクトへメッセージを送るという形の使い方が可能となります.