Allow configuration of the node modules dependency tool

Add :deps-cmd compiler option. Add --deps-cmd cljs.main flag. Update
cljs.closure/maybe-install-node-deps! to respect :deps-cmd

Author: swannodette

src/main/clojure/cljs/cli.clj

@@ -185,6 +185,10 @@ classpath. Classpath-relative paths have prefix of @ or @/")
   [cfg path]
   (assoc-in cfg [:options :output-to] path))
 
+(defn- deps-cmd-opt
+  [cfg deps-cmd]
+  (assoc-in cfg [:options :deps-cmd] deps-cmd))
+
 (defn- target-opt
   [cfg target]
   (let [target (if (= "node" target) "nodejs" target)]
@@ -600,6 +604,9 @@ present"
       ["-o" "--output-to"]     {:group ::compile :fn output-to-opt
                                 :arg "file"
                                 :doc "Set the output compiled file"}
+      ["--deps-cmd"]           {:group ::compile :fn deps-cmd-opt
+                                :arg "string"
+                                :doc "Set the node dependency manager. Only npm or yarn supported"}
       ["-O" "--optimizations"] {:group ::compile :fn optimize-opt
                                 :arg "level"
                                 :doc

src/main/clojure/cljs/closure.clj

@@ -205,7 +205,7 @@
     :watch :watch-error-fn :watch-fn :install-deps :process-shim :rename-prefix :rename-prefix-namespace
     :closure-variable-map-in :closure-property-map-in :closure-variable-map-out :closure-property-map-out
     :stable-names :ignore-js-module-exts :opts-cache :aot-cache :elide-strict :fingerprint :spec-skip-macros
-    :nodejs-rt :target-fn})
+    :nodejs-rt :target-fn :deps-cmd})
 
 (def string->charset
   {"iso-8859-1" StandardCharsets/ISO_8859_1
@@ -2539,7 +2539,7 @@
         (recur buf)))))
 
 (defn maybe-install-node-deps!
-  [{:keys [npm-deps verbose] :as opts}]
+  [{:keys [deps-cmd npm-deps verbose] :or {deps-cmd "npm"} :as opts}]
   (let [npm-deps (merge npm-deps (compute-upstream-npm-deps opts))]
     (when-not (empty? npm-deps)
       (let [pkg-json (io/file "package.json")]
@@ -2548,7 +2548,10 @@
         (when-not (.exists pkg-json)
           (spit pkg-json "{}"))
         (let [proc (-> (ProcessBuilder.
-                         (into (cond->> ["npm" "install" "@cljs-oss/module-deps"]
+                         (into (cond->>
+                                 [deps-cmd
+                                  ({"npm" "install" "yarn" "add"} deps-cmd)
+                                  "@cljs-oss/module-deps"]
                                  util/windows? (into ["cmd" "/c"]))
                            (map (fn [[dep version]] (str (name dep) "@" version)))
                            npm-deps))