[fpc-pascal] Better random numbers ?

A.J. Venter aj at getopenlab.com
Mon Feb 27 00:15:55 CET 2006

> Some other workaround that comes to my mind is to do something like
>    Randomize;
>    RandSeed := RandSeed * getpid;
This worked, cut the initial generation time from about 30 seconds down to 
under 1, of course right now it's NOT platform independent at all so I will 
need to enhance it but I like the direction of your thinking, combining 
randseed with some virtually guaranteed unique value solves the problem.


A.J. Venter
Chief Software Architect
OpenLab International
+27 82 726 5103

More information about the fpc-pascal mailing list