posix: Fix random.seed to accept a parameter

The standard API includes a parameter to set the random number generator value sequence. Signed-off-by: Keith Packard <keithp@keithp.com>
keith-packard · Mar 4, 2019 · 30939a9 · 30939a9
1 parent 86bfd48
commit 30939a9
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/posix/snek-posix.builtin b/posix/snek-posix.builtin
@@ -26,6 +26,6 @@ stdscr.addstr, 3
 stdscr.move, 2
 stdscr.refresh, 0
 stdscr.getch, 0
-random.seed, 0
+random.seed, 1
 random.randrange, 1
 #include <snek-posix.h>
diff --git a/posix/snek-posix.c b/posix/snek-posix.c
@@ -64,9 +64,9 @@ snek_builtin_time_monotonic(void)
 }
 
 snek_poly_t
-snek_builtin_random_seed(void)
+snek_builtin_random_seed(snek_poly_t a)
 {
-	srandom(time(NULL));
+	srandom(a.u);
 	return SNEK_NULL;
 }