always elide toString Object methods in :lite-mode

Author: swannodette

src/main/clojure/cljs/core.cljc

@@ -1507,13 +1507,18 @@
         ~@body))))
 
 (core/defn- add-obj-methods [type type-sym sigs]
-  (map (core/fn [[f & meths :as form]]
-         (core/let [[f meths] (if (vector? (first meths))
-                                [f [(rest form)]]
-                                [f meths])]
-           `(set! ~(extend-prefix type-sym f)
-              ~(with-meta `(fn ~@(map #(adapt-obj-params type %) meths)) (meta form)))))
-    sigs))
+  (->> sigs
+    ;; Elide all toString methods in :lite-mode
+    (remove
+      (core/fn [[f]]
+        (and (comp/lite-mode?) (= 'toString f))))
+    (map
+      (core/fn [[f & meths :as form]]
+        (core/let [[f meths] (if (vector? (first meths))
+                               [f [(rest form)]]
+                               [f meths])]
+          `(set! ~(extend-prefix type-sym f)
+             ~(with-meta `(fn ~@(map #(adapt-obj-params type %) meths)) (meta form))))))))
 
 (core/defn- ifn-invoke-methods [type type-sym [f & meths :as form]]
   (map