Mercurial > vba-clojure

comparison clojure/com/aurellem/gb/gb_driver.clj @ 227:d5dddf33543c

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
Added functions for getting and setting badges.
author Dylan Holmes <ocsenave@gmail.com>
date Sat, 24 Mar 2012 05:45:06 -0500
parents 893c753f8088
children d263df762c59
comparison
equal deleted inserted replaced
226:21641c1c3f87 227:d5dddf33543c
3 (:import java.io.File) 3 (:import java.io.File)
4 (:import org.apache.commons.io.FileUtils) 4 (:import org.apache.commons.io.FileUtils)
5 (:import (java.nio IntBuffer ByteOrder))) 5 (:import (java.nio IntBuffer ByteOrder)))
6 6
7 ;; Savestates 7 ;; Savestates
8
8 (defrecord SaveState [data]) 9 (defrecord SaveState [data])
9 10
10 (def user-home (File. (System/getProperty "user.home"))) 11 (def user-home (File. (System/getProperty "user.home")))
11 12
12 (def ^:dynamic *save-state-cache* 13 (def ^:dynamic *save-state-cache*
266 (let [fun-name (first forms)] 267 (let [fun-name (first forms)]
267 `(do 268 `(do
268 (defn ~@forms) 269 (defn ~@forms)
269 (alter-var-root (var ~fun-name) memoize)))) 270 (alter-var-root (var ~fun-name) memoize))))
270 271
272
273
274 (def original-rom (rom (root)))