flow-storm.instrument — jpmonettas/flow-storm 0.2.2

*environment* clj

definstrumenter clj macro

(definstrumenter & args)

Defines a private function for instrumenting forms. This is like defn-, except the metadata of the return value is merged with that of the first input argument.

dont-break-forms clj

Set of special-forms that we don't wrap breakpoints around. These are either forms that don't do anything interesting (like quote) or forms that just can't be wrapped (like catch and finally).

fn-def-form? clj

(fn-def-form? form)

hacked-macroexpand clj

(hacked-macroexpand form)

hacked-macroexpand-1 clj

(hacked-macroexpand-1 form)

instrument-tagged-code clj

(instrument-tagged-code form ctx)

Return form instrumented with breakpoints. It is expected that something in form will contain a ::breakfunction metadata, whose value should be a var holding a macro. This macro should take three arguments, the form being evaluated, a map containing coordinates vector (see below), and the original form (before macroexpansion).

This function walks through the code attaching to objects the ::extras metadata, which is a map currently containing a :coor vector. The :coor specifies its position inside the top-level form. As an example, a coordinate vector of [3 2 0] means:

• enter this sexp and move forward three times,
• enter this sexp and move forward twice,
• enter this sexp.

After that, it fully macroexpands the code, walks through it again, and wraps in a ::breakfunction any form that contains the previously attached metadata.

macroexpand-all clj

(macroexpand-all form & [original-key])

Like clojure.walk/macroexpand-all, but preserves and macroexpands metadata. Also store the original form (unexpanded and stripped of metadata) in the metadata of the expanded form under original-key.

merge-meta clj

(merge-meta obj & metamaps)

Non-throwing version of (vary-meta obj merge metamap-1 metamap-2 ...). Like vary-meta, this only applies to immutable objects. For instance, this function does nothing on atoms, because the metadata of an atom is part of the atom itself and can only be changed destructively.

print-form clj

(print-form form & [expand? meta?])

Pretty print form. If expand? is true, macroexpand the form. If meta? is true, also print meta. This function is intended for inspection of instrumented code.

strip-meta clj

(strip-meta form)

(strip-meta form keys)

Strip meta from form. If keys are provided, strip only those keys.

tag-form clj

(tag-form coor form)

tag-form-recursively clj

(tag-form-recursively form)

Like tag-form but also tag all forms inside the given form.

target-from-env clj

(target-from-env env)

wrap-dyn-bindings clj

(wrap-dyn-bindings orig-form
                   {:keys [form-id form-flow-id instrument-fn on-outer-form-fn]}
                   forms)

wrap-fn-bodies clj

(wrap-fn-bodies [_ & arities] wrapper)