Common Lisp Object System
以下に、CLOSを用いて複数のクラスでメソッドを適用する例を示す.