hosts/windows: Fix random.seed to take a parameter

Instead of automatically seeding from the current time, allow applications to specify the seed like other snek ports. Signed-off-by: Keith Packard <keithp@keithp.com>
keith-packard · Dec 24, 2022 · dcdea5d · dcdea5d
1 parent d9f88c3
commit dcdea5d
Show file tree

Hide file tree

Showing 2 changed files with 3 additions and 3 deletions.
diff --git a/hosts/windows/snek-windows.builtin b/hosts/windows/snek-windows.builtin
@@ -14,6 +14,6 @@
 exit, 1
 time.sleep, 1
 time.monotonic, 0
-random.seed, 0
+random.seed, 1
 random.randrange, 1
 #include "snek-windows.h"
diff --git a/hosts/windows/snek-windows.c b/hosts/windows/snek-windows.c
@@ -140,9 +140,9 @@ snek_builtin_time_monotonic(void)
 }
 
 snek_poly_t
-snek_builtin_random_seed(void)
+snek_builtin_random_seed(snek_poly_t a)
 {
-	srand(GetTickCount());
+	srand(a.u);
 	return SNEK_NULL;
 }