Mercurial > vba-clojure

diff clojure/com/aurellem/gb/saves.clj @ 320:9637a0f52e7b

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
located item-list related addresses.
author Robert McIntyre <rlm@mit.edu>
date Tue, 03 Apr 2012 23:17:33 -0500
parents 92c47a9cdaea
children 3b3cd62b6106
line wrap: on
line diff
     1.1 --- a/clojure/com/aurellem/gb/saves.clj	Tue Apr 03 04:16:20 2012 -0500
     1.2 +++ b/clojure/com/aurellem/gb/saves.clj	Tue Apr 03 23:17:33 2012 -0500
     1.3 @@ -28,4 +28,17 @@
     1.4  
     1.5  (defn end-oak-conv []
     1.6    (read-state "end-oak-conversation"))
     1.7 -  
     1.8 \ No newline at end of file
     1.9 +
    1.10 +
    1.11 +(defmacro gen-save [save-name]
    1.12 +  `(defn ~save-name
    1.13 +     ~(str "load " save-name " from disk.")
    1.14 +     []
    1.15 +     (read-state ~(str save-name))))
    1.16 +
    1.17 +(gen-save cursor-item-1)
    1.18 +(gen-save cursor-item-2)
    1.19 +(gen-save cursor-item-3)
    1.20 +(gen-save cursor-item-4)
    1.21 +(gen-save cursor-item-5)
    1.22 +(gen-save cursor-item-6)
    1.23 \ No newline at end of file