diff options
| author | Rich Hickey <richhickey@gmail.com> | 2008-09-23 00:34:23 +0000 |
|---|---|---|
| committer | Rich Hickey <richhickey@gmail.com> | 2008-09-23 00:34:23 +0000 |
| commit | d25ed01f4c028d04e8134daf584c6d5fcc7b858d (patch) | |
| tree | 276653ac0b6de1e6bde8b3477688352574b5da67 | |
| parent | 96364b6620d1fff27d8cf683fc3315f89d955a67 (diff) | |
fixed print-method on empty vector
| -rw-r--r-- | src/clj/clojure/boot.clj | 6 |
1 files changed, 3 insertions, 3 deletions
diff --git a/src/clj/clojure/boot.clj b/src/clj/clojure/boot.clj index 54e3e857..366386d7 100644 --- a/src/clj/clojure/boot.clj +++ b/src/clj/clojure/boot.clj @@ -3435,10 +3435,10 @@ (defmethod print-method clojure.lang.IPersistentVector [v, #^Writer w] (print-meta v w) (.append w \[) - (dotimes n (dec (count v)) + (dotimes n (count v) (print-method (nth v n) w) - (.append w \ )) - (print-method (nth v (dec (count v))) w) + (when (< n (dec (count v))) + (.append w \ ))) (.append w \]) nil) |