Skip to content

Instantly share code, notes, and snippets.

@fogus
Last active March 9, 2022 15:15
Show Gist options
  • Save fogus/f8b30adae2b85e035293832667ac9c68 to your computer and use it in GitHub Desktop.
Save fogus/f8b30adae2b85e035293832667ac9c68 to your computer and use it in GitHub Desktop.
;; qualified method expansions from `make-fn`
;; https://github.com/fogus/thneed/blob/master/src/fogus/rdr.clj
;; METHOD: Math/abs
;; SIGS: [[int] [long] [float] [double]]
(clojure.core/fn abs11949
([G__11950]
(clojure.core/cond
(clojure.core/instance? Long G__11950) (. Math abs (long G__11950))
(clojure.core/instance? Double G__11950) (. Math abs (double G__11950))
(clojure.core/instance? Integer G__11950) (. Math abs (int G__11950))
:default (. Math abs (float G__11950)))))
;; METHOD: String#toUppercase
;; SIGS: [[] [java.util.Locale]]
;; NOTE: No arity nor type overloads
(clojure.core/fn toUpperCase11987
([self11988]
(. self11988 toUpperCase))
([self11989 G__11990] (. self11989 toUpperCase G__11990)))
;; METHOD: Collections/max
;; SIGS: [[java.util.Collection] [java.util.Collection java.util.Comparator]]
;; NOTE: No arity nor type overloads
(clojure.core/fn max12045
([G__12046] (. Collections max G__12046))
([G__12047 G__12048] (. Collections max G__12047 G__12048)))
;; METHOD: Math/nextAfter
;; SIGS: [[float double] [double double]]
(clojure.core/fn nextAfter10596
([G__10597 G__10598]
(clojure.core/cond (clojure.core/instance? Double G__10597) (clojure.core/cond
:default (. java.lang.Math nextAfter (double G__10597) (double G__10598)))
:default (clojure.core/cond
:default (. java.lang.Math nextAfter (float G__10597) (double G__10598))))))
;; METHOD: Timestamp#compareTo
;; SIGS: [[java.util.Date] [java.sql.Timestamp]]
;; NOTE: Bridge methods removed eliminates Object arg case
(clojure.core/fn compareTo12425
([self12426 G__12427]
(clojure.core/cond (clojure.core/instance? java.sql.Timestamp G__12427) (. self12426 compareTo G__12427)
:default (. self12426 compareTo G__12427))))
;; METHOD: String/format
;; SIGS: [[java.lang.String java.lang.Object<>] [java.util.Locale java.lang.String java.lang.Object<>]]
;; NOTE: varargs currently handled as array in last arg position. Better option?
(clojure.core/fn format12080
([G__12081 G__12082]
(. String format G__12081 G__12082))
([G__12083 G__12084 G__12085]
(. String format G__12083 G__12084 G__12085))) ;; final arg in place of vararg, needs to-array call?
;; CTOR: Date
;; SIGS: [[] [long] [java.lang.String] [int int int] [int int int int int] [int int int int int int]]
(clojure.core/fn java.util.Date10800
([] (new java.util.Date))
([G__10801]
(clojure.core/cond (clojure.core/instance? java.lang.String G__10801) (new java.util.Date G__10801)
:default (new java.util.Date (long G__10801))))
([G__10802 G__10803 G__10804]
(new java.util.Date G__10802 G__10803 G__10804))
([G__10805 G__10806 G__10807 G__10808 G__10809]
(new java.util.Date G__10805 G__10806 G__10807 G__10808 G__10809))
([G__10810 G__10811 G__10812 G__10813 G__10814 G__10815]
(new java.util.Date G__10810 G__10811 G__10812 G__10813 G__10814 G__10815)))
Sign up for free to join this conversation on GitHub. Already have an account? Sign in to comment