comparison clojure/com/aurellem/world/practice.clj @ 265:7de2c855392c

merge
author Robert McIntyre <rlm@mit.edu>
date Mon, 26 Mar 2012 22:46:11 -0500
parents a44a2c459aeb
children a60ea8632ff4
comparison
equal deleted inserted replaced
264:0297d315b574 265:7de2c855392c
249 (assoc mem start x) 249 (assoc mem start x)
250 (inc start) 250 (inc start)
251 (rest strs-or-ops)))))) 251 (rest strs-or-ops))))))
252 252
253 (def rewrite-rom 253 (def rewrite-rom
254 "Alters the ROM array using write-memory." 254 "Alters the ROM array using write-memory. Takes a list of
255 various strings/bytes as data."
255 (partial rewrite-memory (vec (rom(root))))) 256 (partial rewrite-memory (vec (rom(root)))))
256 257
257 (defn restore-rom! [] (write-rom! original-rom)) 258 (defn restore-rom! [] (write-rom! original-rom))
258 259
259 260