-
-
Notifications
You must be signed in to change notification settings - Fork 46
/
base.clj
18 lines (17 loc) · 1.06 KB
/
base.clj
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
(ns polylith.clj.core.workspace.base
(:require [polylith.clj.core.deps.interface :as deps]
[polylith.clj.core.workspace.loc :as loc]
[polylith.clj.core.lib.interface :as lib]
[polylith.clj.core.workspace.lib-imports :as lib-imp]))
(defn enrich [suffixed-top-ns interface-names settings {:keys [namespaces-src namespaces-test] :as base}]
(let [interface-deps (deps/interface-deps suffixed-top-ns interface-names base)
lib-imports-src (lib-imp/lib-imports-src suffixed-top-ns interface-names base)
lib-imports-test (lib-imp/lib-imports-test suffixed-top-ns interface-names base)
{:keys [included-libs]} (lib/dependencies settings base)]
(assoc base :lines-of-code-src (loc/lines-of-code namespaces-src)
:lines-of-code-test (loc/lines-of-code namespaces-test)
:namespaces-test namespaces-test
:lib-imports-src lib-imports-src
:lib-imports-test lib-imports-test
:interface-deps interface-deps
:lib-dep-names included-libs)))