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

This namespace started as a fork of cider.instrument but departed a lot from it to make it work for clojurescript and to make it able to trace more stuff.

Provides utilities to recursively instrument forms for all our traces.

*environment* clj

cljs-multi-arity-defn? clj

(cljs-multi-arity-defn? [x1 & x2])

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).

fix-outer-form-instrumentation clj

(fix-outer-form-instrumentation form orig-form {:keys [compiler] :as ctx})

instrument-all clj

(instrument-all form ctx)

instrument-cljs-multi-arity-outer-form clj

(instrument-cljs-multi-arity-outer-form [_ xdef & xsets] orig-form ctx)

instrument-function-bodies clj

(instrument-function-bodies [_ & arities :as form] ctx wrapper)

instrument-outer-forms clj

(instrument-outer-forms {:keys [orig-form args-vec fn-name form-id form-flow-id
                                flow-id on-outer-form-fn]
                         :as ctx}
                        forms)

Add some special instrumentation that is needed only on the outer form. Like tracing the form source code, and wrapping flow-id dynamic bindings

instrument-tagged-code clj

(instrument-tagged-code form ctx)

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.

normalized-macroexpand clj

(normalized-macroexpand form)

A macroexpand version that uses normalized-macroexpand-1 instead of clojure.core/macroexpand-1

normalized-macroexpand-1 clj

(normalized-macroexpand-1 form)

A version of macroexpand-1 that works for clojure and clojurescript given it can tell from environment if we are in clojure or clojurescript

outer-form-type clj

(outer-form-type outer-form {:keys [compiler]})

parse-defmethod-expansion clj

(parse-defmethod-expansion defmethod-expanded-form {:keys [compiler]})

parse-defn-expansion clj

(parse-defn-expansion defn-expanded-form)

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.

redefine-vars clj

(redefine-vars inst-form var-symb orig-form {:keys [compiler] :as ctx})

remove-&-symb clj

(remove-&-symb v)

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)

Given a env map return :cljs or :clj

unwrap-instrumentation clj

(unwrap-instrumentation inst-form)