Guest User

Untitled

a guest
Nov 8th, 2014
242
0
Never
Not a member of Pastebin yet? Sign Up, it unlocks many cool features!
text 0.49 KB | None | 0 0
  1. (defn call-other
  2. [ob f-sym & args]
  3. (let [ccl (.getContextClassLoader (Thread/currentThread))
  4. dcl (.getClassLoader (class ob))]
  5. (try (with-bindings {Compiler/LOADER dcl}
  6. (.setContextClassLoader (Thread/currentThread) dcl)
  7. (java-method-apply ob f-sym args))
  8. (finally (.setContextClassLoader (Thread/currentThread)
  9. ccl)))))
Advertisement
Add Comment
Please, Sign In to add comment