   (replace-fn! #'comp/emitln shadow-emitln)
 
   (replace-fn! #'comp/find-ns-starts-with shadow-find-ns-starts-with)
+
+  (replace-fn! #'cljs.core/goog-define goog-define)
 
   ;; remove these for now, not worth the trouble
   ;; (replace-fn! #'test/deftest @#'shadow-deftest)

    (log/debug ::replace-fn! {:the-var the-var})
    (alter-var-root the-var (fn [_] the-fn))))

(defn install-hacks! []
  ;; cljs.analyzer tweaks
  (replace-fn! #'ana/load-core shadow-load-core)

      (bool-expr (concat (core/list 'js* js) syms)))
    `(some? ~x)))

(core/defmacro defonce
  "defs name to have the root value of init iff the named var has no root value,
  else init is unevaluated"
