comparison clojure/com/aurellem/gb/moves.clj @ 289:df9cad9909d2

Fixed missing delimiter in gb.moves; preparing to play with type effectiveness.
author Dylan Holmes <ocsenave@gmail.com>
date Thu, 29 Mar 2012 13:49:40 -0500
parents ca1afcef3542
children
comparison
equal deleted inserted replaced
288:eec3e69500d9 289:df9cad9909d2
5 5
6 ;;; grab the move data directly from the rom 6 ;;; grab the move data directly from the rom
7 (def move-code->move-name ;; alternate name: moves 7 (def move-code->move-name ;; alternate name: moves
8 ((comp vec cons) 8 ((comp vec cons)
9 :end-of-moves 9 :end-of-moves
10 (map format-name (hxc-move-names))))) 10 (map format-name (hxc-move-names))))
11 11
12 (def move-name->move-code ;; alternate name: move-id 12 (def move-name->move-code ;; alternate name: move-id
13 (zipmap 13 (zipmap
14 move-names 14 move-code->move-name
15 (range))) 15 (range)))
16 16
17 (def move-name->move-pp 17 (def move-name->move-pp
18 (comp :pp (hxc-move-data))) 18 (comp :pp (hxc-move-data)))
19 19