diff clojure/com/aurellem/gb/util.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 9637a0f52e7b
line wrap: on
line diff
     1.1 --- a/clojure/com/aurellem/gb/util.clj	Mon Apr 02 20:30:28 2012 -0500
     1.2 +++ b/clojure/com/aurellem/gb/util.clj	Mon Apr 02 21:20:54 2012 -0500
     1.3 @@ -154,7 +154,7 @@
     1.4        (zipmap backbone
     1.5                (apply (partial map list) seqs))))))
     1.6  
     1.7 -(defn temporal-compare [& states]
     1.8 +(defn memory-compare [& states]
     1.9    (apply common-differences
    1.10           (map (comp vec memory)
    1.11                states)))