From: Jack Kinsey Date: Mon, 2 Dec 2019 15:54:20 +0000 (-0500) Subject: Fixed day2/pt1 bug X-Git-Url: http://git.jkinsey.net/?p=adventofcode2019.git;a=commitdiff_plain;h=ccecad103bfb6a7ac843d773835452eb85621949 Fixed day2/pt1 bug --- diff --git a/day02/intcode.clj b/day02/intcode.clj index f6e5666..b21ffd2 100644 --- a/day02/intcode.clj +++ b/day02/intcode.clj @@ -14,9 +14,9 @@ snd-val (program snd)] (assoc program thd (opcode-fn fst-val snd-val)))) -(defn intcode [program counter] +(defn intcode [program] (loop [program program - counter counter] + counter 0] (let [opcode (program counter)] (if (= opcode 99) program