[nongnu] elpa/inf-clojure f436760489: Add ClojureCLR support (#203)

[ELPA Syncer]

branch: elpa/inf-clojure
commit f436760489cd95400b5a5449158161031beac7ba
Author: Emma Griffin <53583563+E-A-Griffin@users.noreply.github.com>
Commit: GitHub <noreply@github.com>

    Add ClojureCLR support (#203)
---
 CHANGELOG.md   |  1 +
 README.md      |  3 ++-
 inf-clojure.el | 20 ++++++++++++++++++--
 3 files changed, 21 insertions(+), 3 deletions(-)

diff --git a/CHANGELOG.md b/CHANGELOG.md
index 139613a966..a0fa722917 100644
--- a/CHANGELOG.md
+++ b/CHANGELOG.md
@@ -1,6 +1,7 @@
 # Changelog
 
 ## master (unreleased)
+* [#202](https://github.com/clojure-emacs/inf-clojure/issues/202): Add 
ClojureCLR support.
 
 ## 3.2.1 (2022-07-22)
 
diff --git a/README.md b/README.md
index 6e8d53e0e3..a0ec0dd969 100644
--- a/README.md
+++ b/README.md
@@ -31,13 +31,14 @@ It supports the following REPLs:
 
 - Clojure
 - ClojureScript
+- ClojureCLR (via [lein-clr](https://github.com/kumarshantanu/lein-clr))
 - [Planck](http://planck-repl.org/)
 - [Lumo](https://github.com/anmonteiro/lumo)
 - [Joker](https://joker-lang.org/)
 - [babashka](https://github.com/borkdude/babashka)
 
 `inf-clojure` provides a set of essential features for interactive
-Clojure(Script) development:
+Clojure/ClojureScript/ClojureCLR development:
 
 * Enhanced REPL
 * Interactive code evaluation
diff --git a/inf-clojure.el b/inf-clojure.el
index 1297cb5eab..a213a55af1 100644
--- a/inf-clojure.el
+++ b/inf-clojure.el
@@ -36,7 +36,7 @@
 ;; REPL.
 ;;
 ;; `inf-clojure` provides a set of essential features for interactive
-;; Clojure(Script) development:
+;; Clojure/ClojureScript/ClojureCLR development:
 ;;
 ;; * REPL
 ;; * Interactive code evaluation
@@ -75,6 +75,7 @@
                                     (boot . "boot repl")
                                     (clojure . "clojure")
                                     (cljs . "clojure -m cljs.main -r")
+                                    (lein-clr . "lein clr repl")
                                     (planck . "planck -d")
                                     (babashka . "bb")
                                     (lumo . "lumo -d")
@@ -153,7 +154,22 @@
                 (ns-vars . "(clojure.repl/dir %s)")
                 (set-ns . "(clojure.core/in-ns '%s)")
                 (macroexpand . "(clojure.core/macroexpand '%s)")
-                (macroexpand-1 . "(clojure.core/macroexpand-1 '%s)")))))
+                (macroexpand-1 . "(clojure.core/macroexpand-1 '%s)")))
+    (lein-clr . ((load . "(clojure.core/load-file \"%s\")")
+                 (doc . "(clojure.repl/doc %s)")
+                 (source . "(clojure.repl/source %s)")
+                 (arglists .
+                           "(try
+                             (:arglists
+                              (clojure.core/meta
+                               (clojure.core/resolve
+                                (clojure.core/read-string \"%s\"))))
+                             (catch Exception e nil))")
+                 (apropos . "(doseq [var (sort (clojure.repl/apropos \"%s\"))] 
(println (str var)))")
+                 (ns-vars . "(clojure.repl/dir %s)")
+                 (set-ns . "(clojure.core/in-ns '%s)")
+                 (macroexpand . "(clojure.core/macroexpand '%s)")
+                 (macroexpand-1 . "(clojure.core/macroexpand-1 '%s)")))))
 
 (defvar-local inf-clojure-repl-type nil
   "Symbol to define your REPL type.