Mercurial > vba-clojure
comparison clojure/com/aurellem/gb/saves.clj @ 320:9637a0f52e7b
located item-list related addresses.
author | Robert McIntyre <rlm@mit.edu> |
---|---|
date | Tue, 03 Apr 2012 23:17:33 -0500 |
parents | 92c47a9cdaea |
children | 3b3cd62b6106 |
comparison
equal
deleted
inserted
replaced
319:92c47a9cdaea | 320:9637a0f52e7b |
---|---|
26 (defn grass-edge [] | 26 (defn grass-edge [] |
27 (read-state "grass' edge")) | 27 (read-state "grass' edge")) |
28 | 28 |
29 (defn end-oak-conv [] | 29 (defn end-oak-conv [] |
30 (read-state "end-oak-conversation")) | 30 (read-state "end-oak-conversation")) |
31 | 31 |
32 | |
33 (defmacro gen-save [save-name] | |
34 `(defn ~save-name | |
35 ~(str "load " save-name " from disk.") | |
36 [] | |
37 (read-state ~(str save-name)))) | |
38 | |
39 (gen-save cursor-item-1) | |
40 (gen-save cursor-item-2) | |
41 (gen-save cursor-item-3) | |
42 (gen-save cursor-item-4) | |
43 (gen-save cursor-item-5) | |
44 (gen-save cursor-item-6) |