Что такое хороший метод ToString для объекта deftype'd в Clojure

Question

(deftype Bag [state] 
    Object 
    (toString [bag] 
     (str "Bag???" state))) 

Я хочу ToString, чтобы выглядеть как

clojure.core=> (def b (Bag. {:apples 1 :bannanas 4})) 
#'clojure.core/b 
clojure.core=> (str b) 
"BAG: {:apples 1 :bannanas 4}" 

Что такое хороший clojurey способ представления этой информации? Факс:

"Bag/{:k :v}" 

лучше? Как сообщество вы называете своим toStrings?

Answer 1

Для deftype.

user=> (deftype Bag [state] 
     Object 
     (toString [_] 
      (str "BAG: " (pr-str state)))) 
user.Bag 
user=> (def b (Bag. {:apples 1 :bannanas 4})) 
#'user/b 
user=> (str b) 
"BAG: {:bannanas 4, :apples 1}" 

Answer 2

В зависимости от того, что вы пытаетесь сделать, самый простой способ заключается в использовании defrecord:

 
user=> (defrecord Bag [state]) 
user.Bag 
user=> (def b (Bag. :foo)) 
#'user/b 
user=> b 
#:user.Bag{:state :foo} 

Хотя то, что вы видите выше, из pr, не str:

 
user=> (str b) 
"user.Bag@53e935f4" 
user=> (prn b) 
#:user.Bag{:state :foo} 
nil 

Так мы только сделаем изменение:

 
user=> (defrecord Bag [state] 
     Object 
     (toString [bag] (pr-str bag))) 
user.Bag 
user=> (def b (Bag. :foo)) 
#'user/b 
user=> (str b) 
"#:user.Bag{:state :foo}" 
user=> (.toString b) 
"#:user.Bag{:state :foo}" 

Теперь, если вышеуказанное не подходит, то следующей опцией будет добавить новый метод для многомерного метода print-method. Об этом Google.

Помимо этого, следует использовать defrecord по сравнению с deftype, если вы не делаете что-то очень низкоуровневое.