fixed typo, got push-test in brain-test working

This commit is contained in:
Richard Harrington 2013-08-05 00:36:13 -04:00
parent 42dade809c
commit 8091e1f216

View File

@ -10,7 +10,7 @@
the parameters except the vector path to the register val, which is provided by the parameters except the vector path to the register val, which is provided by
the let clojure." the let clojure."
[reg-name robot-idx read-func write-func val] [reg-name robot-idx read-func write-func val]
(let [path-to-val [:robots robot-idx :register reg-name :val]] (let [path-to-val [:robots robot-idx :registers reg-name :val]]
{reg-name {:read (fn [world] {reg-name {:read (fn [world]
(read-func world path-to-val)) (read-func world path-to-val))
:write (fn [world data] :write (fn [world data]