Apple-2-SW/robotwar
1
0
Fork 0
mirror of https://github.com/richardharrington/robotwar.git synced 2024-05-28 23:41:31 +00:00
Code Issues Projects Releases Wiki Activity

altered indentatin in register

Browse Source
This commit is contained in:
Richard Harrington 2013-08-20 15:03:34 -04:00
parent 07596d8fad
commit 163ba2840b
1 changed files with 10 additions and 10 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

20
src/robotwar/register.clj
View File

@ -95,17 +95,17 @@
(defrecord DataRegister [robot-idx index-reg-name]
IReadRegister
(read-register
; returns the number stored in whatever register
; is pointed to by the index-reg-name register
[this world]
(read-register (get-target-register world robot-idx index-reg-name) world))
(read-register
; returns the number stored in whatever register
; is pointed to by the index-reg-name register
[this world]
(read-register (get-target-register world robot-idx index-reg-name) world))
IWriteRegister
(write-register
; returns a world with the number in the register pointed to
; by the index-reg-name register updated with the data argument to write-register
[this world data]
(write-register (get-target-register world robot-idx index-reg-name) world data)))
(write-register
; returns a world with the number in the register pointed to
; by the index-reg-name register updated with the data argument to write-register
[this world data]
(write-register (get-target-register world robot-idx index-reg-name) world data)))
; TODO: (defrecord ShotRegister [robot-idx reg-name])