CLJ-1713 - inner range classes should be serializable

Signed-off-by: Stuart Halloway <[email protected]>

Author: puredanger

src/jvm/clojure/lang/LongRange.java

@@ -220,7 +220,7 @@ public void remove() {
     }
 }
 
-private static class LongChunk implements IChunk {
+private static class LongChunk implements IChunk, Serializable {
     final long start;
     final long step;
     final int count;

test/clojure/test_clojure/serialization.clj

@@ -95,7 +95,7 @@
     (build-via-transient [])
     (build-via-transient {})
     (build-via-transient #{})
-    
+
     ; array-seqs
     (seq (make-array Object 10))
     (seq (make-array Boolean/TYPE 10))
@@ -113,7 +113,12 @@
     ; misc seqs
     (seq "s11n")
     (range 50)
-    (rseq (apply sorted-set (reverse (range 100))))))
+    (rseq (apply sorted-set (reverse (range 100))))
+
+    ;; partially realized chunked range
+    (let [r (range 50)]
+      (nth r 35)
+      r)))
 
 (deftest misc-serialization
   (are [v] (= v (-> v serialize deserialize))