libs canary tests: add ancient-clj

Author: lread

README.adoc

@@ -50,6 +50,7 @@ See https://github.com/clj-commons/rewrite-clj/projects/1[project page for curre
 
 Some projects using rewrite-clj v1
 
+* https://github.com/xsc/ancient-clj[ancient-clj] {canary-tested}
 * https://github.com/liquidz/antq[antq] {canary-tested}
 * https://github.com/babashka/babashka[babashka] {not-canary-tested}
 * https://github.com/borkdude/carve[carve] {canary-tested} (in dev)

script/test_libs.clj

@@ -157,6 +157,16 @@
   (shcmd {:dir home-dir :continue true}
          "git --no-pager diff"))
 
+;;
+;; ancient-clj
+;;
+(defn ancient-clj-patch [{:keys [home-dir rewrite-clj-version]}]
+  (patch-deps {:filename (str (fs/file home-dir "project.clj"))
+               ;; we remove and add tools.reader because project.clj has pedantic? :abort enabled
+               :removals #{'rewrite-clj 'org.clojure/tools.reader}
+               :additions [['org.clojure/tools.reader "1.3.6"]
+                           ['rewrite-clj rewrite-clj-version]]}))
+
 ;;
 ;; carve
 ;;
@@ -302,7 +312,15 @@
 ;; lib defs
 ;;
 
-(def libs [{:name "antq"
+(def libs [{:name "ancient-clj"
+            :version "2.0.0"
+            :platforms [:clj]
+            :github-release {:repo "xsc/ancient-clj"
+                             :version-prefix "v"}
+            :patch-fn ancient-clj-patch
+            :show-deps-fn lein-deps-tree
+            :test-cmds ["lein kaocha"]}
+           {:name "antq"
             :version "1.0.0"
             :platforms [:clj]
             :github-release {:repo "liquidz/antq"}