The function do-rand-seed
calls the SSL function RAND_seed
with some suitable value, which is dependent in a non-trivial way on the current time, the history of the current process and the history of the machine it is running on.
If the machine that it runs on has the file /dev/urandom
, do-rand-seed
does nothing.
LispWorks User Guide and Reference Manual - 13 Feb 2015