On Fri, 2013-03-01 at 13:17 +0100, Tassilo Horn wrote:
> (defn ^:private eget-ref [^EObject eo ref allow-unknown-ref single-valued]

eo has a type here,

>   (if-let [^EStructuralFeature sf (.getEStructuralFeature (.eClass eo) (name 
> ref))]

sf has a type here (btw the annotation is probably not necessary)

>             (.eGet eo sf)

So this call doesn't reflect

>         (.eGet eo sf))

Nor does this.  In the second version,

>   (if-let [^EStructuralFeature sf (.getEStructuralFeature (.eClass eo) (name 
> ref))]

sf has a type (again, it would probably be inferred)

>             (fn [o] (swap! c-getter inc) [(.eGet o sf)])

But the `o' doesn't, so the .eGet call reflects,

>         (fn [o] (swap! c-getter inc) (.eGet o sf)))

And it's the same here.

I don't think you need this arg at all.  More generally, do this for
debugging such things:

https://github.com/technomancy/leiningen/blob/2.0.0/sample.project.clj#L152


-- 
Stephen Compall
^aCollection allSatisfy: [:each|aCondition]: less is better

-- 
-- 
You received this message because you are subscribed to the Google
Groups "Clojure" group.
To post to this group, send email to clojure@googlegroups.com
Note that posts from new members are moderated - please be patient with your 
first post.
To unsubscribe from this group, send email to
clojure+unsubscr...@googlegroups.com
For more options, visit this group at
http://groups.google.com/group/clojure?hl=en
--- 
You received this message because you are subscribed to the Google Groups 
"Clojure" group.
To unsubscribe from this group and stop receiving emails from it, send an email 
to clojure+unsubscr...@googlegroups.com.
For more options, visit https://groups.google.com/groups/opt_out.


Reply via email to