(defn emits-symbol [sym]
(let [ns (namespace sym)
name (name sym)
symstr (if-not (nil? ns)
(str ns "/" name)
name)]
(emits "new cljs.core.Symbol(")
(emit-constant ns)
(emits ",")
(emit-constant name)
(emits ",")
(emit-constant symstr)
(emits ",")
(emit-constant (hash sym))
(emits ",")
(emit-constant nil)
(emits ")")))