base/libc.jl: fix crash when run before epoch (#34056) (#34442)

anaveragehuman · KristofferC · commit 1596175f1e7d · 2020-01-21T13:44:43.000+01:00
(cherry picked from commit f68753c)
diff --git a/base/libc.jl b/base/libc.jl
@@ -398,6 +398,6 @@ rand(::Type{Float64}) = rand(UInt32) * 2.0^-32
 
 Interface to the C `srand(seed)` function.
 """
-srand(seed=floor(time())) = ccall(:srand, Cvoid, (Cuint,), seed)
+srand(seed=floor(Int, time()) % Cuint) = ccall(:srand, Cvoid, (Cuint,), seed)
 
 end # module
