restore CLJS-3200

Author: swannodette

src/main/clojure/cljs/core.cljc

@@ -666,7 +666,7 @@
                                (core/let [gmap (gensym "map__")
                                           defaults (:or b)]
                                  (core/loop [ret (core/-> bvec (conj gmap) (conj v)
-                                                          (conj gmap) (conj `(if (implements? ISeq ~gmap) (apply cljs.core/hash-map ~gmap) ~gmap))
+                                                          (conj gmap) (conj `(--destructure-map ~gmap))
                                                      ((core/fn [ret]
                                                         (if (:as b)
                                                           (conj ret (:as b) gmap)