seed analyse function for the code.manage/analyse task

(->> (project/in-context (analyse ’code.framework-test)) (common/display-entry)) => (contains-in {:test {’code.framework (contains ’analyse analyse-file analyse-source-code)}})

(->> (project/in-context (analyse ’code.framework)) (common/display-entry)) => (contains-in {:source {’code.framework (contains ’analyse analyse-file analyse-source-code)}})

helper function for analyse, taking a file as input

(analyse-file :source “src/code/framework.clj”)

helper function for code.framework/analyse-file

analyses a source file for namespace and function definitions

(-> (analyse-source-code (slurp “test-data/code.manage/src/example/core.clj”)) (get-in ’example.core -foo-)) => ’{:ns example.core, :var -foo-, :source {:code “(defn -foo-\n x\n (println x "Hello, World!"))”, :line {:row 3, :col 1, :end-row 6, :end-col 31}, :path nil}}

helper function for analyse-source-code, returning [id entry] pairs. defimpl forms also produce constructor entries (map-> and ->)

helper function for analyse-source-code

analyses a test file for docstring forms

(-> (analyse-test-code (slurp “test-data/code.manage/test/example/core_test.clj”)) (get-in ’example.core -foo-) (update-in :test :code docstring/->docstring)) => (contains ’{:ns example.core :var -foo- :test {:code “1\n => 1” :line {:row 6 :col 1 :end-row 7 :end-col 16} :path nil} :meta {:added “3.0”} :intro ""})

compiles a regex string from an input string

(compile-regex “(:require”) => “\(:require”

returns all docstrings in a given namespace with given keys

(->> (project/in-context (docstrings)) (map first) sort) => (project/in-context (vars {:sorted true}))

returns all vars in a given namespace (project/in-context (vars {:sorted true})) => (contains ’analyse analyse-file analyse-source-code analyse-source-function)

find test frameworks given a namespace form (find-test-frameworks ’(ns … (:use code.test))) => #{:fact}

(find-test-frameworks ’(ns … (:use clojure.test))) => #{:clojure}

replaces code based on string query

(project/in-context (grep-replace {:query “docstrings” :replace “DOCSTRINGS” :print {:function true}}))

finds code based on string query

(project/in-context (grep-search {:query ’docstrings :print {:function true}}))

creates an import selector

(import-selector ’-hello-) ;;[(#{} | -hello- string? map? & _)] => vector?

finds code base upon a query

checks that a namespace does not require test

memoised version of fs/read-ns

helper function for code.framework/read-ns-form

takes in a series of edits and performs them on the code

(project/in-context (refactor-code {:edits []})) => {:changed [], :updated false, :path “test/code/framework_test.clj”}

constructs a search regex (for line numbers)

(search-regex “hello”) => #“^(.*?)(hello)”

creates a selector for querying toplevel forms

(toplevel-selector ’-hello-) ;;(#{} | -hello- & _) => vector?

transforms the code and performs a diff to see what has changed

;; options include :skip, :full and :write (project/in-context (transform-code ’code.framework {:transform identity})) => (contains {:changed [] :updated false :path any})

constructs a var, with or without namespace

((var-function true) {:ns ’hello :var ’world}) => ’hello/world

((var-function false) {:ns ’hello :var ’world}) => ’world

returns all vars in a given namespace (project/in-context (vars {:sorted true})) => (contains ’analyse analyse-file analyse-source-code analyse-source-function)