Опитвам се да внедря интерфейс, представящ аритметични изрази. Интерфейсът ще се използва от страна на java, но цялата логика е на clojure.
като:
(defprotocol ExtendsExpression
(toTree [this]))
(extend-type String
ExtendsExpression
(toTree [this] (symbol this)))
(extend-type Number
ExtendsExpression
(toTree [this] this))
(definterface Expression
(toTree []))
(defrecord Expression1 [^String oper arg]
Expression
(toTree [this]
(list (symbol oper) (toTree arg))))
(defrecord Expression2 [^String oper arg1 arg2]
Expression
(toTree [this]
(list (symbol oper) (toTree arg1) (toTree arg2))))
(defrecord Expression3 [^String oper arg1 arg2 arg3]
Expression
(toTree [this]
(list (symbol oper) (toTree arg1) (toTree arg2) (toTree arg3))))
Опитвам се да го използвам като:
(toTree (Expression3. "+" "a" "b" (Expression2. "*" "c" "d")))
но получавам:
IllegalArgumentException No implementation of method: :toTree of protocol: #'user/ExtendsExpression found for class: user.Expression3 clojure.core/-cache-protocol-fn (core_deftype.clj:541)
Защо clojure се опитва да извика toTree на ExtendsExpression за Expression3? Очаквам, че за Expression3 ще извика метода toTree на интерфейса Expression.