小编toa*_*n19的帖子

我有一个Book用 定义的类型defrecord，以及一个将其转换为字符串的函数：

(defrecord Book [title author])
(defn book->string [book] (str (:title book) " by " (:author book))) 

(book->string (->Book "Foo" "Bar"))  ;; "Foo by Bar"

是否可以延长记录以便我可以拨打电话(str (->Book "Foo" "Bar"))？