summaryrefslogtreecommitdiff
path: root/src/jvm
diff options
context:
space:
mode:
Diffstat (limited to 'src/jvm')
-rw-r--r--src/jvm/clojure/lang/RT.java4
1 files changed, 3 insertions, 1 deletions
diff --git a/src/jvm/clojure/lang/RT.java b/src/jvm/clojure/lang/RT.java
index e657459d..1b63f7af 100644
--- a/src/jvm/clojure/lang/RT.java
+++ b/src/jvm/clojure/lang/RT.java
@@ -491,7 +491,9 @@ static public short shortCast(Object x){
}
static public int intCast(Object x){
- return ((Number) x).intValue();
+ if(x instanceof Number)
+ return ((Number) x).intValue();
+ return ((Character) x).charValue();
}
static public long longCast(Object x){