(defn empty-env
"Construct an empty analysis environment. Required to analyze forms."
[]
(ensure
{:ns (get-namespace *cljs-ns*)
:context :statement
:locals {}
:fn-scope []
:js-globals (into {}
(map #(vector % {:name %})
'(alert window document console escape unescape
screen location navigator history location
global process require module exports)))}))