Last active
March 9, 2022 15:15
-
-
Save fogus/f8b30adae2b85e035293832667ac9c68 to your computer and use it in GitHub Desktop.
This file contains bidirectional Unicode text that may be interpreted or compiled differently than what appears below. To review, open the file in an editor that reveals hidden Unicode characters.
Learn more about bidirectional Unicode characters
;; 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