hg.stevelosh.com > silt2

--- a/silt.lisp	Sun Aug 07 00:44:44 2016 +0000
+++ b/silt.lisp	Sun Aug 07 01:10:52 2016 +0000
@@ -999,6 +999,7 @@
   (state-generate))

 (defun state-generate ()
+  (setf *random-state* (make-random-state t))
   (render-generate)
   (clear-entities)
   (manage-screen)
author	Steve Losh <steve@stevelosh.com>
date	Sun, 07 Aug 2016 01:10:52 +0000
parents	634f61cb60ba
children	94af6897af93
branches/tags	(none)
files	silt.lisp