diff options
| author | Meikel Brandmeyer <mb@kotka.de> | 2010-05-27 19:00:30 +0200 |
|---|---|---|
| committer | Stuart Halloway <stu@thinkrelevance.com> | 2010-06-03 21:20:38 -0400 |
| commit | fb52b69d75868e4ce49d0123bc1ceaae8d6f5fe8 (patch) | |
| tree | 5e0acb6a7af6d36e718acac6d328da28c9f8c541 /test | |
| parent | 31c184a0738b36a0610b6d3034a256bc970643bc (diff) | |
Fix reductions on empty input sequence
Refers #362
Signed-off-by: Stuart Halloway <stu@thinkrelevance.com>
Diffstat (limited to 'test')
| -rw-r--r-- | test/clojure/test_clojure/sequences.clj | 2 |
1 files changed, 2 insertions, 0 deletions
diff --git a/test/clojure/test_clojure/sequences.clj b/test/clojure/test_clojure/sequences.clj index a8db5cb5..211674bf 100644 --- a/test/clojure/test_clojure/sequences.clj +++ b/test/clojure/test_clojure/sequences.clj @@ -1138,6 +1138,8 @@ {1 4 2 2 3 1} '(1 1 1 1 2 2 3))) (deftest test-reductions + (is (= (reductions + nil) + [0])) (is (= (reductions + [1 2 3 4 5]) [1 3 6 10 15])) (is (= (reductions + 10 [1 2 3 4 5]) |