Don't truncate large ratios when converting to bigint. Fixes #290.

Signed-off-by: Stuart Halloway <stu@thinkrelevance.com>

1 files changed, 5 insertions, 1 deletions

diff --git a/src/jvm/clojure/lang/Ratio.java b/src/jvm/clojure/lang/Ratio.java
index 6822cb36..6c7a9bb6 100644
--- a/src/jvm/clojure/lang/Ratio.java
+++ b/src/jvm/clojure/lang/Ratio.java
@@ -45,7 +45,7 @@ public int intValue(){
 }
 
 public long longValue(){
-	return (long) doubleValue();
+	return bigIntegerValue().longValue();
 }
 
 public float floatValue(){
@@ -67,6 +67,10 @@ public BigDecimal decimalValue(MathContext mc){
 	return numerator.divide(denominator, mc);
 }
 
+public BigInteger bigIntegerValue(){
+	return numerator.divide(denominator);
+}
+
 public int compareTo(Object o){
 	Number other = (Number)o;
 	return Numbers.compare(this, other);