Skip to content

Instantly share code, notes, and snippets.

@hiredman

hiredman/gist:921874

Created April 15, 2011 15:21
Show Gist options
  • Star 0 You must be signed in to star a gist
  • Fork 0 You must be signed in to fork a gist
  • Save hiredman/921874 to your computer and use it in GitHub Desktop.
Save hiredman/921874 to your computer and use it in GitHub Desktop.
Download ZIP
Raw
gistfile1.txt
user=> (let [x (comp inc inc)] (eval `(~x 1)))
evaling (let [x (comp inc inc)] (eval (clojure.core/seq (clojure.core/concat (clojure.core/list x) (clojure.core/list 1))))) true
evaling (#<core$comp$fn__401 clojure.core$comp$fn__401@46837311> 1) true
IllegalArgumentException No matching ctor found for class clojure.core$comp$fn__401 clojure.lang.Reflector.invokeConstructor (:-1)
user=> (let [x (fn [x] (inc (inc x)))] (eval `(~x 1)))
evaling (let [x (fn [x] (inc (inc x)))] (eval (clojure.core/seq (clojure.core/concat (clojure.core/list x) (clojure.core/list 1))))) true
evaling (#<user$eval2944$x__2945 user$eval2944$x__2945@5438ebc3> 1) true
3
user=> (-> (fn [x] (inc (inc x))) class .getDeclaredConstructors)
evaling (-> (fn [x] (inc (inc x))) class .getDeclaredConstructors) true
#<Constructor[] [Ljava.lang.reflect.Constructor;@111d5b39>
user=> (seq *1)
evaling (seq *1) true
(#<Constructor public user$eval2950$fn__2951()>)
user=> (-> (comp inc inc) class .getDeclaredConstructors)
evaling (-> (comp inc inc) class .getDeclaredConstructors) true
#<Constructor[] [Ljava.lang.reflect.Constructor;@3adb38e1>
user=> (seq *1)
evaling (seq *1) true
(#<Constructor public clojure.core$comp$fn__401(java.lang.Object,java.lang.Object)>)
user=>
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment