Mercurial > vba-clojure

diff clojure/com/aurellem/run/music.clj @ 465:34bf4b64d9d1

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
remove dead code.
author Robert McIntyre <rlm@mit.edu>
date Fri, 04 May 2012 03:55:00 -0500
parents 413c66186baa
children b31cd6651375
line wrap: on
line diff
     1.1 --- a/clojure/com/aurellem/run/music.clj	Fri May 04 03:50:07 2012 -0500
     1.2 +++ b/clojure/com/aurellem/run/music.clj	Fri May 04 03:55:00 2012 -0500
     1.3 @@ -548,19 +548,6 @@
     1.4          (set-memory-range music-target music-bytes)
     1.5          (PC! program-target))))
     1.6  
     1.7 -
     1.8 -
     1.9 -;; (defn test-note [music-bytes]
    1.10 -;;   (-> (set-memory-range (second (music-base))
    1.11 -;;                         0xC000 (concat (clear-music-registers)
    1.12 -;;                                        (play-note)
    1.13 -;;                                        (infinite-loop)))
    1.14 -;;       (set-memory-range 0xD000 music-bytes)
    1.15 -;;       (PC! 0xC000)
    1.16 -;;       (HL! 0xD000)
    1.17 -;;       ))
    1.18 -
    1.19 -
    1.20  (defn run-program
    1.21    ([program]
    1.22       (let [target 0xC000]