Mercurial > vba-clojure
comparison clojure/com/aurellem/assembly.clj @ 119:6cbea8ab65b6
wrote test case for write-memory skeleton
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Fri, 16 Mar 2012 20:18:54 -0500 |
parents | be4ec0e60c16 |
children | d6f2a06cb128 |
comparison
equal
deleted
inserted
replaced
118:be4ec0e60c16 | 119:6cbea8ab65b6 |
---|---|
725 | 725 |
726 (defn write-memory [] | 726 (defn write-memory [] |
727 (-> (tick (mid-game)) | 727 (-> (tick (mid-game)) |
728 (IE! 0) ; disable interrupts | 728 (IE! 0) ; disable interrupts |
729 (inject-item-assembly (write-memory-assembly)))) | 729 (inject-item-assembly (write-memory-assembly)))) |
730 | |
731 (defn test-write-memory [] | |
732 (set-state! (write-memory)) | |
733 (dorun | |
734 (dotimes [_ 5000] | |
735 (view-memory (step @current-state) current-mode)))) | |
736 |