From: Clyne Sullivan <clyne@bitgloo.com>
Date: Mon, 6 Dec 2021 23:28:24 +0000 (-0500)
Subject: day6: learned read-string
X-Git-Url: https://code.bitgloo.com/?a=commitdiff_plain;h=0e3b0f4732541d14b2fbc1e740d5e86206df6e9a;p=clyne%2Fadvent-of-code.git

day6: learned read-string
---

diff --git a/day6/part2.clj b/day6/part2.clj
index cdcc3b5..ad6fe91 100644
--- a/day6/part2.clj
+++ b/day6/part2.clj
@@ -2,7 +2,7 @@
 
 (->> (read-line)
      (#(str/split % #","))
-     (map #(Integer/parseInt %))
+     (map read-string)
      (reduce #(update %1 %2 inc) (vec (repeat 9 0)))
      (iterate
        #(let [nf (conj (vec (rest %)) (first %))]