comparison clojure/com/aurellem/gb/saves.clj @ 316:d263df762c59

greatly speed up scroll-text by using binary-search.
author Robert McIntyre <rlm@mit.edu>
date Mon, 02 Apr 2012 21:20:54 -0500
parents 073600cba28a
children 9a4d3f801c89
comparison
equal deleted inserted replaced
315:363b650a77cc 316:d263df762c59
14 (defn talk-to-oak [] 14 (defn talk-to-oak []
15 (read-state "talk-to-oak")) 15 (read-state "talk-to-oak"))
16 16
17 (defn normal-conv [] 17 (defn normal-conv []
18 (read-state "normal-conversation")) 18 (read-state "normal-conversation"))
19
20 (defn oak-battle []
21 (read-state "oak-battle"))