 
 ;;; Props conversion
 
-(def cached-prop-name (memoize undash-prop-name))
-(def cached-style-name (memoize util/dash-to-camel))
+(def cached-prop-name (memoize-1 undash-prop-name))
+(def cached-style-name (memoize-1 util/dash-to-camel))
 
 (defn convert-prop-value [val]
   (if (map? val)

                 (doto res
                   (aset (cached-prop-name k)
                         (to-js-val v))))
               (js-obj) val)
    (to-js-val val)))

(defn set-id-class [props [id class]]
  (aset props "id" (or (aget props "id") id))
  (when class
    (aset props "className" (if-let [old (aget props "className")]
                              (str class " " old)
                              class))))

(defn convert-props [props id-class]
  (cond

(defn wrapped-render [this comp id-class input-setup]
  (let [inprops (util/js-props this)
        argv (aget inprops cljs-argv)
        props (nth argv 1 nil)
        hasprops (or (nil? props) (map? props))
        first-child (if hasprops 2 1)
        children (if (> (count argv) first-child)
