diff options
Diffstat (limited to 'src/clj/clojure/core_print.clj')
| -rw-r--r-- | src/clj/clojure/core_print.clj | 12 |
1 files changed, 8 insertions, 4 deletions
diff --git a/src/clj/clojure/core_print.clj b/src/clj/clojure/core_print.clj index 7a79a903..59b045b3 100644 --- a/src/clj/clojure/core_print.clj +++ b/src/clj/clojure/core_print.clj @@ -128,14 +128,18 @@ (defmethod print-dup clojure.lang.Var [#^clojure.lang.Var o, #^Writer w] (.write w (str "#=(var " (.name (.ns o)) "/" (.sym o) ")"))) -(defmethod print-method clojure.lang.ISeq [o, #^Writer w] +(defmethod print-method clojure.lang.Sequence [o, #^Writer w] (print-meta o w) (print-sequential "(" pr-on " " ")" o w)) -(defmethod print-dup clojure.lang.ISeq [o w] (print-method o w)) +(defmethod print-dup clojure.lang.Sequence [o w] (print-method o w)) (defmethod print-dup clojure.lang.IPersistentList [o w] (print-method o w)) -(prefer-method print-method clojure.lang.IPersistentList clojure.lang.ISeq) -(prefer-method print-dup clojure.lang.IPersistentList clojure.lang.ISeq) +(prefer-method print-method clojure.lang.IPersistentList clojure.lang.Sequence) +(prefer-method print-dup clojure.lang.IPersistentList clojure.lang.Sequence) +(prefer-method print-method clojure.lang.Sequence clojure.lang.IPersistentCollection) +(prefer-method print-dup clojure.lang.Sequence clojure.lang.IPersistentCollection) +(prefer-method print-method clojure.lang.Sequence java.util.Collection) +(prefer-method print-dup clojure.lang.Sequence java.util.Collection) (defmethod print-method clojure.lang.IPersistentList [o, #^Writer w] (print-meta o w) |