diff options
| author | Stuart Halloway <stu@thinkrelevance.com> | 2010-04-12 21:26:48 -0400 |
|---|---|---|
| committer | Stuart Halloway <stu@thinkrelevance.com> | 2010-04-12 21:26:48 -0400 |
| commit | 6dd033d9e12337f6630faa3d3f5c2e901a28c4f4 (patch) | |
| tree | f54058280a93ae8b10a4d7e2d3671489aad14468 /src/test/clojure | |
| parent | ebf0d212dcc076ebee6984d276ff037ce1a7ecbe (diff) | |
fixed corner case in c.c.profile print-summary
Diffstat (limited to 'src/test/clojure')
| -rw-r--r-- | src/test/clojure/clojure/contrib/test_profile.clj | 8 |
1 files changed, 8 insertions, 0 deletions
diff --git a/src/test/clojure/clojure/contrib/test_profile.clj b/src/test/clojure/clojure/contrib/test_profile.clj new file mode 100644 index 00000000..560b58db --- /dev/null +++ b/src/test/clojure/clojure/contrib/test_profile.clj @@ -0,0 +1,8 @@ +(ns clojure.contrib.test-profile + (:use clojure.test + clojure.contrib.profile)) + +(deftest test-print-summary + (testing "doesn't blow up with no data (assembla #31)" + (is (= "Name mean min max count sum\n" + (with-out-str (print-summary {})))))) |