diff options
| author | Rich Hickey <richhickey@gmail.com> | 2010-10-18 10:28:05 -0400 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2010-10-18 10:28:05 -0400 |
| commit | 23746eea2349427de10ace01ef9178c707cebc3e (patch) | |
| tree | 303a370f128e05a4478ca42b0ec3c721e2185c06 | |
| parent | df8c65a286e90e93972bb69392bc106128427dde (diff) | |
tweak int coercion perf
| -rw-r--r-- | src/jvm/clojure/lang/RT.java | 5 |
1 files changed, 3 insertions, 2 deletions
diff --git a/src/jvm/clojure/lang/RT.java b/src/jvm/clojure/lang/RT.java index 97abd85a..0dba3399 100644 --- a/src/jvm/clojure/lang/RT.java +++ b/src/jvm/clojure/lang/RT.java @@ -950,9 +950,10 @@ static public int intCast(float x){ } static public int intCast(long x){ - if(x < Integer.MIN_VALUE || x > Integer.MAX_VALUE) + int i = (int) x; + if(i != x) throw new IllegalArgumentException("Value out of range for int: " + x); - return (int) x; + return i; } static public int intCast(double x){ |