# HG changeset patch # User Steve Losh # Date 1470532252 0 # Node ID fa69849fe3104a86657d52abbe9a6511b0ebf5ea # Parent 634f61cb60ba588603643bf45846e3203c476087 Reseed random state on world gen diff -r 634f61cb60ba -r fa69849fe310 silt.lisp --- 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)