added intCast from char/byte/short

1 files changed, 12 insertions, 0 deletions

diff --git a/src/jvm/clojure/lang/RT.java b/src/jvm/clojure/lang/RT.java
index dd86c76a..8c0b4efb 100644
--- a/src/jvm/clojure/lang/RT.java
+++ b/src/jvm/clojure/lang/RT.java
@@ -901,6 +901,18 @@ static public int intCast(Object x){
 	return ((Character) x).charValue();
 }
 
+static public int intCast(char x){
+        return x;
+    }
+
+static public int intCast(byte x){
+        return x;
+    }
+
+ static public int intCast(short x){
+        return x;
+    }
+
 static public int intCast(int x){
 	return x;
 }