projects
/
adventofcode2019.git
/ blobdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
|
commitdiff
|
tree
raw
| inline |
side by side
Fixed day2/pt1 bug
[adventofcode2019.git]
/
day02
/
intcode.clj
diff --git
a/day02/intcode.clj
b/day02/intcode.clj
index f6e56660c64f14ac4c80c663595b66fb890e1b02..b21ffd2588dd456722d9e17cadfc0910204d498c 100644
(file)
--- 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