comparison clojure/com/aurellem/gb/types.clj @ 206:32ac21c9a30d

augmented print-pokemon to report inconsistent types; fixed error in give-type
author Robert McIntyre <rlm@mit.edu>
date Fri, 23 Mar 2012 04:36:16 -0500
parents 28d35c9e3ab6
children c31cb3043087
comparison
equal deleted inserted replaced
205:28d35c9e3ab6 206:32ac21c9a30d
37 [(first types) (first types)] 37 [(first types) (first types)]
38 types)] 38 types)]
39 (set-memory-range 39 (set-memory-range
40 state 40 state
41 (pokemon-type-start-address poke-num) 41 (pokemon-type-start-address poke-num)
42 (map type-name->type-code types)))) 42 (map type-name->type-code types*))))
43 ([poke-num types] 43 ([poke-num types]
44 (give-type @current-state poke-num types))) 44 (give-type @current-state poke-num types)))
45 45
46 (defn read-type 46 (defn read-type
47 ([^SaveState state poke-num] 47 ([^SaveState state poke-num]