# HG changeset patch # User Robert McIntyre # Date 1326607604 25200 # Node ID 3334bf15854b9053ed2b8657028ac2cc9ad76c9b # Parent ee302b65213be25b2adbe39bdbfac5dec3a3a8c8 removed useless code diff -r ee302b65213b -r 3334bf15854b org/test-creature.org --- a/org/test-creature.org Sat Jan 14 23:05:52 2012 -0700 +++ b/org/test-creature.org Sat Jan 14 23:06:44 2012 -0700 @@ -753,31 +753,6 @@ 1 -1} (sensor-data i))))) (vi image))))) - -(defn all-names [] - (concat - (re-split #"\n" (slurp (file-str - "/home/r/proj/names/dist.female.first"))) - (re-split #"\n" (slurp (file-str - "/home/r/proj/names/dist.male.first"))) - (re-split #"\n" (slurp (file-str - "/home/r/proj/names/dist.all.last"))))) - - - - - - - - - -(defrecord LulzLoader []) -(defprotocol Lulzable (load-lulz [this])) -(extend-type LulzLoader - Lulzable - (load-lulz [this] (println "the lulz have arrived!"))) - - (defn world-setup [joint] (let [joint-position (Vector3f. 0 0 0) joint-rotation