Mercurial > vba-clojure
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 |