javelin

babashka · Oct 26, 2023 · b60242b · b60242b
1 parent 825cd05
commit b60242b
Show file tree

Hide file tree

Showing 4 changed files with 440 additions and 2 deletions.
diff --git a/deps.edn b/deps.edn
@@ -3,14 +3,15 @@
            :shadow-cli {:main-opts ["-m" "shadow.cljs.devtools.cli"]}
            :test {:extra-paths ["test"]
                   :extra-deps {org.babashka/sci {:git/url "https://github.com/babashka/sci"
-                                                 :git/sha "987910fb38fdd166865458c3fd4b468a22fb9992"}
+                                                 :git/sha "8da8f44c41f507e56256b23d0a05c0172d881859"}
                                org.clojure/clojurescript {:mvn/version "1.11.51"}
                                applied-science/js-interop {:mvn/version "0.3.3"}
                                com.fulcrologic/fulcro {:mvn/version "3.6.10"}
                                funcool/promesa {:git/url "https://github.com/funcool/promesa"
                                                 :git/sha "e503874b154224ce85b223144e80b697df91d18e"}
                                reagent/reagent {:mvn/version "1.1.0"}
-                               re-frame/re-frame {:mvn/version "1.3.0"}}}
+                               re-frame/re-frame {:mvn/version "1.3.0"}
+                               hoplon/javelin {:mvn/version "3.9.0"}}}
            :cljs-test-runner
            {:extra-deps {olical/cljs-test-runner {:mvn/version "3.8.0"}}
             :extra-paths ["test" "cljs-test-runner-out/gen"]

diff --git a/src/sci/configs/hoplon/javelin.clj b/src/sci/configs/hoplon/javelin.clj
@@ -0,0 +1,7 @@
+(ns sci.configs.hoplon.javelin)
+
+(defmacro ^:private with-let*
+  "Binds resource to binding and evaluates body.  Then, returns
+  resource.  It's a cross between doto and with-open."
+  [[binding resource] & body]
+  `(let [~binding ~resource] ~@body ~binding))