(defn class-methods [x] (let [c (if (class? x) x (class x))] (distinct (sort (seq (map #(.getName %1) (.getMethods c))))))) (println (let [x (new Integer 1)] (class-methods x)))
Simple PHP lockfile/pidfile implementation
8 years ago
(defn blog [stuff] (blog stuff))
(defn class-methods [x] (let [c (if (class? x) x (class x))] (distinct (sort (seq (map #(.getName %1) (.getMethods c))))))) (println (let [x (new Integer 1)] (class-methods x)))
Very useful, thanks!
ReplyDeleteHi there! glad to drop by your page and found these very interesting and informative stuff. Thanks for sharing, keep it up!
ReplyDelete