In perl.git, the branch tonyc/builtin_rng has been created
<http://perl5.git.perl.org/perl.git/commitdiff/c31645bebf97dd0692cf69b4a635eb00ed958f5d?hp=0000000000000000000000000000000000000000>
at c31645bebf97dd0692cf69b4a635eb00ed958f5d (commit)
- Log -----------------------------------------------------------------
commit c31645bebf97dd0692cf69b4a635eb00ed958f5d
Author: Yves Orton <[email protected]>
Date: Tue Dec 18 23:34:41 2012 +0100
fix check so it works with system RNG
M sv.c
commit c8ab7f22f384821ff645e510287d3b4af0581bc2
Author: Yves Orton <[email protected]>
Date: Tue Dec 18 22:27:40 2012 +0100
Add drand48 implementation from FreeBSD
See code such as:
http://svnweb.freebsd.org/base/head/lib/libc/gen/_rand48.c?revision=92986&view=markup
/*
* Copyright (c) 1993 Martin Birgmeier
* All rights reserved.
*
* You may redistribute unmodified or modified versions of this source
* code provided that the above copyright notice and this and the
* following conditions are retained.
*
* This software is provided ``as is, and comes with no warranties
* of any kind. I shall in no event be liable for anything that happens
* to anyone/anything when using this software.
*/
M embed.fnc
M embed.h
M perl.h
M proto.h
M util.c
M util.h
commit b0bbe0ec60baa292d7c5046026d1dd3e477daf1a
Author: Yves Orton <[email protected]>
Date: Sun Dec 16 22:55:38 2012 +0100
Enable WellRNG 512A (for testing)
M perl.h
commit 9411ec1862dcd271d0d35b337f2fd4e4dc8dcd32
Author: Yves Orton <[email protected]>
Date: Sun Dec 16 20:25:29 2012 +0100
Add support for WellRNG 512a
This is a "new" random number generator. Derived from code published at:
http://www.iro.umontreal.ca/~simardr/rng/WELL512a.c
See also:
http://www.iro.umontreal.ca/~panneton/WELLRNG.html
http://www.iro.umontreal.ca/~panneton/well/WELL512a.c
lfsr04.pdf: F. Panneton, P. L'Ecuyer and M. Matsumoto, "Improved
Long-Period Generators Based on Linear Recurrences Modulo 2"
http://www.iro.umontreal.ca/~lecuyer/myftp/papers/lfsr04.pdf
<QUOTE>
In this paper, we propose new generators, with better equidistribution and
âbit-mixingâ
properties for equivalent period length and speed. Approximately half of
the coefficients
of the characteristic polynomial of these generators are nonzero. The state
of our new
generators evolves in a more chaotic way than for the Mersenne twister.
</QUOTE>
Many thanks to Pierre L'Ecuyer for GPL'ing the code so that it could
be used in this project.
M embed.fnc
M embed.h
M proto.h
M util.c
M util.h
commit 050b114ba43bd72c9ac213514a014acee65f4114
Author: Yves Orton <[email protected]>
Date: Sat Dec 15 18:40:33 2012 +0100
Add support for using Tiny MT, a 128 bit state RNG
Perl traditionally uses the systems random number generator
for the rand() function. This means that the behavior of code
using it is platform dependent. Worse, sometimes the random
number generator is of poor quality.
This patch adds support for using the TinyMT random number
generator (32 bit version) instead. This generator is of relatively high
quality, uses 128 bits of state and is relatively fast and should be
portable to all of our build targets.
Note that this patch does not *enable* using tinym32, to do that
you need to define TINYMT32 during configure.
Full details of the algorithm can be obtained at
http://www.math.sci.hiroshima-u.ac.jp/[email protected]/MT/TINYMT/
Derived from code by Mutsuo Saito and Makoto Matsumoto published under the
BSD 3-clause license.
Copyright (c) 2011 Mutsuo Saito, Makoto Matsumoto, Hiroshima
University and The University of Tokyo. All rights reserved.
M embed.fnc
M embed.h
M embedvar.h
M intrpvar.h
M pp.c
M proto.h
M sv.c
M util.c
M util.h
-----------------------------------------------------------------------
--
Perl5 Master Repository
