0.4.0 permalink Arrow_down_16x16
  • (dot-maker obj-tester)

0 Examples top

Log in to add / edit an example.

See Also top

Log in to add a see also.

Plus_12x12 Minus_12x12 Source net/licenser/sandbox.clj:28 top

(defn dot-maker [obj-tester] 
  (fn dot [object method & args]
    (if (obj-tester object method)
      (if (instance? java.lang.Class object)
       (clojure.lang.Reflector/invokeStaticMethod object method (to-array args))
       (clojure.lang.Reflector/invokeInstanceMethod object method (to-array args)))
      (throw (SecurityException. (str "Tried to call: " method " on " object " which is not allowed."))))))
Vars in net.licenser.sandbox/dot-maker: defn fn instance? str to-array
Used in 0 other vars

Comments top

No comments for dot-maker. Log in to add a comment.