test: for alias parcing

kepler16 · Feb 12, 2024 · 4a2952b · 4a2952b
1 parent 5c1acaf
commit 4a2952b
Showing 1 changed file with 32 additions and 26 deletions.
diff --git a/packages/kmono/test/k16/kmono/repl/deps_test.clj b/packages/kmono/test/k16/kmono/repl/deps_test.clj
@@ -2,39 +2,45 @@
   (:require
    [clojure.test :refer [deftest is testing]]
    [k16.kmono.config :as config]
+   [k16.kmono.main :as main]
    [k16.kmono.repl.deps :as repl.deps]))
 
+(deftest parse-aliases-test
+  (testing "Aliases should be parsed correctly"
+    (is (= [:foo :kmono.pkg/bar]
+           (main/parse-aliases ":foo:kmono.pkg/bar")))))
+
 (deftest some-test
   (let [config (config/load-config "test/fixtures/example_repo")]
     (testing "Should extract aliases and relativize paths"
       (is (= '{:aliases
-               {:kmono/package-deps
-                {:extra-deps {kepler16/bar-lib
-                              {:local/root
-                               "test/fixtures/example_repo/packages/bar"},
-                              kepler16/foo-lib
-                              {:local/root
-                               "test/fixtures/example_repo/packages/foo"}}}
-                :kmono.pkg/bar.test
-                {:extra-deps {some/dependency {:mvn/version "1.0.0"}}
-                 :extra-paths ["packages/bar/test"]}
-                :kmono.pkg/foo.test
-                {:extra-deps {kepler16/bar {:local/root "packages/bar"}}
-                 :extra-paths ["packages/foo/test"]}}}
+              {:kmono/package-deps
+               {:extra-deps {kepler16/bar-lib
+                             {:local/root
+                              "test/fixtures/example_repo/packages/bar"},
+                             kepler16/foo-lib
+                             {:local/root
+                              "test/fixtures/example_repo/packages/foo"}}}
+               :kmono.pkg/bar.test
+               {:extra-deps {some/dependency {:mvn/version "1.0.0"}}
+                :extra-paths ["packages/bar/test"]}
+               :kmono.pkg/foo.test
+               {:extra-deps {kepler16/bar {:local/root "packages/bar"}}
+                :extra-paths ["packages/foo/test"]}}}
              (repl.deps/construct-sdeps-overrides! config [:bar/test
                                                            :foo/test])))
       (is (= '{:aliases
-               {:kmono/package-deps
-                {:extra-deps {kepler16/bar-lib
-                              {:local/root
-                               "test/fixtures/example_repo/packages/bar"},
-                              kepler16/foo-lib
-                              {:local/root
-                               "test/fixtures/example_repo/packages/foo"}}}
-                :kmono.pkg/bar.test
-                {:extra-deps {some/dependency {:mvn/version "1.0.0"}}
-                 :extra-paths ["packages/bar/test"]}
-                :kmono.pkg/foo.test
-                {:extra-deps {kepler16/bar {:local/root "packages/bar"}}
-                 :extra-paths ["packages/foo/test"]}}}
+              {:kmono/package-deps
+               {:extra-deps {kepler16/bar-lib
+                             {:local/root
+                              "test/fixtures/example_repo/packages/bar"},
+                             kepler16/foo-lib
+                             {:local/root
+                              "test/fixtures/example_repo/packages/foo"}}}
+               :kmono.pkg/bar.test
+               {:extra-deps {some/dependency {:mvn/version "1.0.0"}}
+                :extra-paths ["packages/bar/test"]}
+               :kmono.pkg/foo.test
+               {:extra-deps {kepler16/bar {:local/root "packages/bar"}}
+                :extra-paths ["packages/foo/test"]}}}
              (repl.deps/construct-sdeps-overrides! config [:*/test]))))))