carp-lang/Carp
1
1
Fork 0
mirror of https://github.com/carp-lang/Carp.git synced 2024-09-11 05:25:28 +03:00
Code Issues Projects Releases Wiki Activity

core: call Random.reseed at program start

Browse Source
This commit is contained in:
hellerve 2020-10-14 15:31:26 +02:00
parent 772051ede9
commit 1e04da3dac
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
core/Random.carp
View File

@ -26,6 +26,11 @@
(do
(set! s (mod (+ (* s a) c) m))
(/ s m)))
(private _)
(hidden _)
(doc _ "forces reseeding based on the current time at program start")
(def _ (do (seed) 0))
)
(defmodule Int