Run tests with JVM in CI

anteoas · Nov 25, 2024 · ba1e402 · ba1e402
1 parent 81a21e6
commit ba1e402
Show file tree

Hide file tree

Showing 3 changed files with 23 additions and 2 deletions.
diff --git a/.github/workflows/build-and-deploy.yml b/.github/workflows/build-and-deploy.yml
@@ -67,6 +67,11 @@ jobs:
           set -x
           npm run test
 
+      - name: Run view tests with JVM Clojure
+        run: |
+          set -x
+          bb run-view-tests-jvm
+
       - name: Copy to app folder
         run: |
           set -x

diff --git a/bb.edn b/bb.edn
@@ -7,4 +7,8 @@
 
          copy-to-app-dir
          {:task t/copy-to-app-dir!
-          :doc "Package the built TodoMVC app to `./replicant-todomvc`"}}}
+          :doc "Package the built TodoMVC app to `./replicant-todomvc`"}
+
+         run-tests-jvm
+         {:task t/run-tests-jvm!
+          :doc "Run the tests with JVM Clojure"}}}
diff --git a/scripts/tasks.clj b/scripts/tasks.clj
@@ -67,4 +67,16 @@
                                      ["README.md"]
                                      ["stateless-data-driven-uis.png"]
                                      ["LICENSE.md"]])
-    (p/shell "tree" app-dir)))
+    (p/shell "tree" app-dir)))
+;(require 'todomvc.views-test)
+(defn ^:export run-tests-jvm! []
+  (println "Running view tests with JVM Clojure...")
+  (let [command ["clojure" "-M:test" "-e"
+                 "(require 'clojure.test)
+                  (require 'pez.baldr)
+                  (require 'todomvc.views-test)
+                  (require 'todomvc.actions-test)
+                  (clojure.test/run-tests 'todomvc.views-test 'todomvc.actions-test)"]
+        {:keys [err exit]} (apply p/shell command)]
+    (when-not (zero? exit)
+      (println err))))