returns all the clojure files in a directory

(count (all-files “test”)) => number?

(-> (all-files “test”) (get ’code.project-test)) => #(.endsWith ^String % “/test/code/project_test.clj”)

returns only the code files for the current project

(code-files)

returns the path of the code

(str (code-path (h/ns-sym) true)) => “test/code/project_test.clj”

helper function for excluding certain namespaces

(exclude ’{lucid.legacy.analyzer :a lucid.legacy :a lib.aether :b} “lucid.legacy”) => ’{lib.aether :b}

creates a lookup of namespaces and files in the project

(-> (file-lookup (project)) (get ’code.project)) => #(.endsWith ^String % “/src/code/project.clj”)

returns the file suffix for a given type

(file-suffix) => “.clj”

(file-suffix :cljs) => “.cljs”

returns the type of file according to the suffix

(file-type “project.clj”) => :source

(file-type “test/code/project_test.clj”) => :test

gets the path given the ns

(reset! code.project.common/lookup {}) (get-path (h/ns-sym)) => “test/code/project_test.clj”

creates a local context for executing code functions

(in-context ((fn current params _ project current))) => ’code.project-test

fast lookup for all-files function

(first (lookup-ns (lookup-path (h/ns-sym)))) => ’code.project-test

helper function for code.project/lookup-ns

looks up the path given the ns

(lookup-path (h/ns-sym))

returns the declared namespace from read forms, with an optional file-path fallback

(parse-ns-name ’(comment x) (ns sample.core) (def x 1)) => ’sample.core

returns project options as a map

(project) => (contains {:name symbol? :dependencies vector?})

returns the current project file

(project-file) => “project.clj”

returns the project map

(project-map (fs/path “project.clj”))

helper function for code.project/project-map

returns the name, read from the project map

(project-name) => symbol?

returns the source namespace

(source-ns ’a) => ’a (source-ns ’a-test) => ’a

returns the symbol of the namespace

(sym-name ns) => ’code.project-test

(sym-name ’a) => ’a

returns the test namespace

(test-ns ’a) => ’a-test (test-ns ’a-test) => ’a-test

returns the preferred test root for a path within the project

returns the test suffix

(test-suffix) => “-test”