Added the Krell REPL support

This change adds the support for Krell REPL.

Instead of having to pick a custom REPL and specifying a
cider-custom-cljs-repl-init-form, this is all now included. All the
user has to do is pick the REPL type, which in this case is krell.

Author: dotemacs

cider.el

@@ -330,6 +330,7 @@ Sub-match 1 must be the project path.")
     ('clojure-cli cider-clojure-cli-command)
     ('shadow-cljs cider-shadow-cljs-command)
     ('gradle      cider-gradle-command)
+    ('krell       cider-clojure-cli-command)
     (_            (user-error "Unsupported project type `%S'" project-type))))
 
 (defun cider-jack-in-resolve-command (project-type)
@@ -345,6 +346,7 @@ Throws an error if PROJECT-TYPE is unknown."
                     (when-let* ((command (cider--resolve-command (car parts))))
                       (mapconcat #'identity (cons command (cdr parts)) " "))))
     ('gradle (cider--resolve-command cider-gradle-command))
+    ('krell (cider--resolve-command cider-clojure-cli-command))
     (_ (user-error "Unsupported project type `%S'" project-type))))
 
 (defun cider-jack-in-global-options (project-type)
@@ -355,23 +357,28 @@ Throws an error if PROJECT-TYPE is unknown."
     ('clojure-cli cider-clojure-cli-global-options)
     ('shadow-cljs cider-shadow-cljs-global-options)
     ('gradle      cider-gradle-global-options)
+    ('krell       cider-clojure-cli-global-options)
     (_            (user-error "Unsupported project type `%S'" project-type))))
 
+(defun cider--clojure-cli-parameters ()
+  (format cider-clojure-cli-parameters
+          (concat
+           "["
+           (mapconcat
+            (apply-partially #'format "\"%s\"")
+            (cider-jack-in-normalized-nrepl-middlewares)
+            ", ")
+           "]")))
+
 (defun cider-jack-in-params (project-type)
   "Determine the commands params for `cider-jack-in' for the PROJECT-TYPE."
   (pcase project-type
     ('lein        cider-lein-parameters)
     ('boot        cider-boot-parameters)
-    ('clojure-cli (format cider-clojure-cli-parameters
-                          (concat
-                           "["
-                           (mapconcat
-                            (apply-partially #'format "\"%s\"")
-                            (cider-jack-in-normalized-nrepl-middlewares)
-                            ", ")
-                           "]")))
+    ('clojure-cli (cider--clojure-cli-parameters))
     ('shadow-cljs cider-shadow-cljs-parameters)
     ('gradle      cider-gradle-parameters)
+    ('krell       (cider--clojure-cli-parameters))
     (_            (user-error "Unsupported project type `%S'" project-type))))
 
 
@@ -689,6 +696,12 @@ Generally you should not disable this unless you run into some faulty check."
   (unless (cider-library-present-p "adzerk.boot-cljs-repl")
     (user-error "The Boot ClojureScript REPL is not available.  Please check https://github.com/adzerk-oss/boot-cljs-repl/blob/master/README.md for details")))
 
+(defun cider-check-krell-requirements ()
+  "Check whether we can start a Krell ClojureScript REPL."
+  (cider-verify-piggieback-is-present)
+  (unless (cider-library-present-p "krell.repl")
+    (user-error "The Krell ClojureScript REPL is not available.  Please check https://github.com/vouch-opensource/krell for details")))
+
 (defun cider-check-shadow-cljs-requirements ()
   "Check whether we can start a shadow-cljs REPL."
   (unless (cider-library-present-p "shadow.cljs.devtools.api")
@@ -825,6 +838,15 @@ The supplied string will be wrapped in a do form if needed."
           cider-check-boot-requirements)
     (shadow cider-shadow-cljs-init-form cider-check-shadow-cljs-requirements)
     (shadow-select cider-shadow-select-cljs-init-form cider-check-shadow-cljs-requirements)
+    (krell "(require '[clojure.edn :as edn]
+         '[clojure.java.io :as io]
+         '[cider.piggieback]
+         '[krell.api :as krell]
+         '[krell.repl])
+(def config (edn/read-string (slurp (io/file \"build.edn\"))))
+(krell/build config)
+(apply cider.piggieback/cljs-repl (krell.repl/repl-env) (mapcat identity config))"
+           cider-check-krell-requirements)
     (custom cider-custom-cljs-repl-init-form nil))
   "A list of supported ClojureScript REPLs.
 
@@ -867,6 +889,7 @@ you're working on."
                  (const :tag "Boot"     boot)
                  (const :tag "Shadow"   shadow)
                  (const :tag "Shadow w/o Server" shadow-select)
+                 (const :tag "Krell"    krell)
                  (const :tag "Custom"   custom))
   :group 'cider
   :safe #'symbolp