Skip to content

Instantly share code, notes, and snippets.

/result.clj
Created Nov 24, 2010

Embed
What would you like to do?
<amalloy> (macroexpand '(Integer/parseInt "1"))
<sexpbot> ⟹ (let* [obj-class__3987__auto__ (clojure.core/class Integer)]
(clojure.core/if-not (clojure.core/some (if (clojure.core/map?
clojail.core/tester) (clojure.core/let [{:keys [blacklist__3988__auto__
whitelist__3989__auto__]} clojail.core/tester] (clojure.core/fn
[target__3990__auto__] (clojure.core/or (clojure.core/and
whitelist__3989__auto__ (clojure.core/not (whitelist__3989__auto__
target__3990__auto__)) target__3990__auto__) (clojure.core/and
blacklist__3988__auto__ (blacklist__3988__auto__ target__3990__auto__)))))
clojail.core/tester) [obj-class__3987__auto__ (.getPackage
obj-class__3987__auto__)]) (. Integer parseInt "1") (throw
(java.lang.SecurityException. (clojure.core/str "You tripped the
alarm! " obj-class__3987__auto__ " is bad!")))))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment
You can’t perform that action at this time.