zpst.zloc — zpst 0.1.4

count-newlines clj

(count-newlines s)

Given a string, count the newlines in the string.

faff clj

find-args clj

(find-args zloc-focus zloc-root)

Given a zloc of the top of a function, do what we can to find the zloc of the args. Return nil if we can't.

find-args-from-focus clj

(find-args-from-focus zloc)

Given a zloc of a section of a function on which to focus, work back up the function and return the argument vector.

find-fn clj

(find-fn source-str fn-name lineno fn-name-on-line)

Given a fn-name and a line number in that function, find fn-name-on-line on that line and return the zloc which invokes it and the root of the zipper, as [zloc zloc-root].
If this can't be found, return nil. Both fn-names are strings.

fn-zloc? clj

(fn-zloc? zloc)

Try and determine if this zloc points to a function. Criteria: the meta data for the symbol exists and has :arglists and the zloc is at the left end of a list.

follow-pathx clj

(follow-pathx zloc-root path-seq n)

Given a zloc and a path, follow the path for n levels.

get-frame-map clj

(get-frame-map options zloc zloc-root zcall)

Given zippers for a function and the call site inside of the function, see if we can find the formal arguments (i.e., params) for the function and return everything in a convenient map.

linen-one clj

(linen-one zloc n)

Return the elements of a single line in a vector of zlocs.

match-fn clj

(match-fn fn1 fn2)

Given two strings, see if the function names match. Tries basic = and also tries to remove the namespace if it appears.

newlines clj

(newlines zloc)

If the zloc contains newlines, return the count, otherwise return 0. [<count> zloc] where zloc is nil if there isn't anything