diff options
| author | Rich Hickey <richhickey@gmail.com> | 2008-12-05 00:19:17 +0000 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2008-12-05 00:19:17 +0000 |
| commit | d301ab5f90a33cba11d83b9c10b0b9f5e7683c6f (patch) | |
| tree | ab08f0b799ab3c8e9d21199b26e1d6dc2fe2d660 /src | |
| parent | b73a2a6f0025e585bf2fc16503e2388fad52d8d6 (diff) | |
made RT.DEFAULT_COMPARATOR use Util.compare
Diffstat (limited to 'src')
| -rw-r--r-- | src/clj/clojure/core.clj | 2 | ||||
| -rw-r--r-- | src/jvm/clojure/lang/RT.java | 2 |
2 files changed, 2 insertions, 2 deletions
diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj index 062c8138..4aad594a 100644 --- a/src/clj/clojure/core.clj +++ b/src/clj/clojure/core.clj @@ -344,7 +344,7 @@ (defn gensym "Returns a new symbol with a unique name. If a prefix string is supplied, the name is prefix# where # is some unique number. If - prefix is not supplied, the prefix is 'G'." + prefix is not supplied, the prefix is 'G__'." ([] (gensym "G__")) ([prefix-string] (. clojure.lang.Symbol (intern (str prefix-string (str (. clojure.lang.RT (nextID)))))))) diff --git a/src/jvm/clojure/lang/RT.java b/src/jvm/clojure/lang/RT.java index 7fac2f17..49550b76 100644 --- a/src/jvm/clojure/lang/RT.java +++ b/src/jvm/clojure/lang/RT.java @@ -235,7 +235,7 @@ public static List<String> processCommandLine(String[] args){ static public final Object[] EMPTY_ARRAY = new Object[]{}; static public final Comparator DEFAULT_COMPARATOR = new Comparator(){ public int compare(Object o1, Object o2){ - return ((Comparable) o1).compareTo(o2); + return Util.compare(o1,o2); } }; |