- move global-ns? predicate to analyzer

Author: swannodette

src/main/clojure/cljs/analyzer.cljc

@@ -2820,9 +2820,13 @@
                           (error env
                             (error-message :undeclared-ns {:ns-sym dep :js-provide (name dep)}))))))))))))
 
+(defn global-ns? [x]
+  (or (= 'js x)
+      (= "js" (namespace x))))
+
 (defn missing-use? [lib sym cenv]
   ;; ignore globals referred via :refer-global
-  (when-not (= 'js lib)
+  (when-not (global-ns? lib)
     (let [js-lib (get-in cenv [:js-dependency-index (name lib)])]
       (and (= (get-in cenv [::namespaces lib :defs sym] ::not-found) ::not-found)
         (not (= (get js-lib :group) :goog))

src/main/clojure/cljs/repl.cljc

@@ -251,18 +251,14 @@
      (load-sources repl-env sources opts)
      sources)))
 
-(defn global-ns? [x]
-  (or (= 'js x)
-      (= "js" (namespace x))))
-
 (defn- load-dependencies
   "Compile and load the given `requires` and return the compiled sources."
   ([repl-env requires]
    (load-dependencies repl-env requires nil))
   ([repl-env requires opts]
    (->> requires
      distinct
-     (remove global-ns?)
+     (remove ana/global-ns?)
      (mapcat #(load-namespace repl-env % opts))
      doall)))