mirror of
https://github.com/richardharrington/robotwar.git
synced 2024-08-02 23:29:09 +00:00
added some informal tests to core.clj, to test exec/tick-robot
This commit is contained in:
parent
049abdc2c2
commit
d1a25796cf
@ -11,3 +11,10 @@
|
|||||||
:registers nil
|
:registers nil
|
||||||
:program robot-program-test})
|
:program robot-program-test})
|
||||||
|
|
||||||
|
(def rc "AIM + 5 TO RADAR")
|
||||||
|
(def rp (create/compile rc))
|
||||||
|
(def rs (assoc-in (exec/init-robot rp) [:registers "AIM"] 6))
|
||||||
|
|
||||||
|
(def t0 (exec/tick-robot rs))
|
||||||
|
(def t1 (exec/tick-robot t0))
|
||||||
|
(def t3 (exec/tick-robot t1))
|
||||||
|
Loading…
Reference in New Issue
Block a user