X-Git-Url: https://www.chiark.greenend.org.uk/ucgi/~mdw/git/runlisp/blobdiff_plain/6c39ec6d05467457c590ec93ad98c179be6618af..fe28ef9d3cbbf7aefd42af24532267bb82e2067a:/dump-runlisp-image.c

diff --git a/dump-runlisp-image.c b/dump-runlisp-image.c
index 7bd9eba..97f854d 100644
--- a/dump-runlisp-image.c
+++ b/dump-runlisp-image.c
@@ -1408,6 +1408,7 @@ int main(int argc, char *argv[])
   /* Initial setup. */
   set_progname(argv[0]);
   init_config();
+  srand(time(0));
 
   /* Parse the options. */
   optprog = (/*unconst*/ char *)progname;