* src/cljs/cljs/core.cljs: move IPrintable function implementation

clojure · Feb 20, 2012 · 5365601 · 5365601
1 parent 7cee8ab
commit 5365601
Showing 1 changed file with 4 additions and 5 deletions.
diff --git a/src/cljs/cljs/core.cljs b/src/cljs/cljs/core.cljs
@@ -219,11 +219,6 @@
 (defn type [x]
   (js* "(~{x}).constructor"))
 
-(extend-type js/Function
-  IPrintable
-  (-pr-seq [this]
-    (list "#<" (str this) ">")))
-
 ;;;;;;;;;;;;;;;;;;; protocols on primitives ;;;;;;;;
 (declare hash-map list equiv-sequential)
 
@@ -2978,6 +2973,10 @@ reduces them without incurring seq initialization"
                    (goog.string.quote obj)
                    obj))))
 
+  function
+  (-pr-seq [this]
+    (list "#<" (str this) ">"))
+
   LazySeq
   (-pr-seq [coll opts] (pr-sequential pr-seq "(" " " ")" opts coll))