From 2eda5c11d1c6b165d30f20aed2e3ac8c949d1576 Mon Sep 17 00:00:00 2001
From: Joe Gallo <joegallo@gmail.com>
Date: Mon, 24 Oct 2011 15:46:44 -0400
Subject: [PATCH] CLJ-863: make interleave handle odd arugments in the same
 manner as concat

---
 src/clj/clojure/core.clj                | 2 ++
 test/clojure/test_clojure/sequences.clj | 6 +++++-
 2 files changed, 7 insertions(+), 1 deletion(-)

diff --git a/src/clj/clojure/core.clj b/src/clj/clojure/core.clj
index 1b72090..a5c9cf8 100644
--- a/src/clj/clojure/core.clj
+++ b/src/clj/clojure/core.clj
@@ -3886,6 +3886,8 @@
   "Returns a lazy seq of the first item in each coll, then the second etc."
   {:added "1.0"
    :static true}
+  ([] ())
+  ([c1] (lazy-seq c1))
   ([c1 c2]
      (lazy-seq
       (let [s1 (seq c1) s2 (seq c2)]
diff --git a/test/clojure/test_clojure/sequences.clj b/test/clojure/test_clojure/sequences.clj
index e69fdbb..2d739f9 100644
--- a/test/clojure/test_clojure/sequences.clj
+++ b/test/clojure/test_clojure/sequences.clj
@@ -682,7 +682,11 @@
 
     (interleave [] [3 4]) ()
     (interleave [1 2] []) ()
-    (interleave [] []) () ))
+    (interleave [] []) ()
+
+    (interleave [1]) '(1)
+
+    (interleave) () ))
 
 
 (deftest test-zipmap
-- 
1.8.0