 (def cached-tag (memoize parse-tag))
 
 (defn render-wrapped [this]
-  (let [inprops (aget this "props") #_(.-props this)
+  (let [inprops (aget this "props")
         args (.-cljsArgs inprops)
         [tag scnd] args
         hasprops (or (nil? scnd) (map? scnd))

        a (js-obj)]
    (set! (.-cljsArgs a) x)
    (when (map? p)
      (set! (.-key a) (:key p))
      (set! (.-ref a) (:ref p)))
    (c a)))

(defn map-into-array [f coll]

    (.apply f nil (.concat (array jsprops) jsargs))))

(defn should-update-wrapped [C nextprops nextstate]
  (let [a1 (-> C (aget "props") .-cljsArgs)
        a2 (-> nextprops .-cljsArgs)]
    (not (equal-args a1 a2))))

