New files to implement the Mersenne Twister Pseudo Random Number

1999-04-09  Sebastian Wilhelmi  <wilhelmi@ira.uka.de>

	* grand.c, tests/rand-test.c: New files to implement the Mersenne
	Twister Pseudo Random Number Generator.

	* glib.h, AUTHORS, Makefile.am, tests/Makefile.am: Changed
	accordingly.
This commit is contained in:
Sebastian Wilhelmi
1999-04-09 14:40:58 +00:00
committed by Sebastian Wilhelmi
parent bbc2cc4e0e
commit 95aff22dff
18 changed files with 871 additions and 1 deletions

View File

@@ -9,6 +9,7 @@ TESTS = \
list-test \
node-test \
queue-test \
rand-test \
relation-test \
slist-test \
stack-test \
@@ -26,6 +27,7 @@ hash_test_LDADD = $(top_builddir)/libglib.la
list_test_LDADD = $(top_builddir)/libglib.la
node_test_LDADD = $(top_builddir)/libglib.la
queue_test_LDADD = $(top_builddir)/libglib.la
rand_test_LDADD = $(top_builddir)/libglib.la
relation_test_LDADD = $(top_builddir)/libglib.la
slist_test_LDADD = $(top_builddir)/libglib.la
stack_test_LDADD = $(top_builddir)/libglib.la

43
tests/rand-test.c Normal file
View File

@@ -0,0 +1,43 @@
#include <glib.h>
const gint32 first_numbers[] =
{
0x7a7a7a7a,
0x20aea82a,
0xcab337ab,
0xdcf770ea,
0xdf552b2f,
0x32d1ef7f,
0x6bed6dd9,
0x7222df44,
0x6b842128,
0x07f8579a,
0x9dad1004,
0x2df264f2,
0x13b48989,
0xf2929475,
0x30f30c97,
0x3f9a1ea7,
0x3bf04710,
0xb85bd69e,
0x790a48b0,
0xfa06b85f,
0xa64cc9e3
};
const gint length = sizeof (first_numbers) / sizeof (first_numbers[0]);
int main()
{
guint i;
GRand* rand = g_rand_new_with_seed (first_numbers[0]);
for (i = 1; i < length; i++)
g_assert (first_numbers[i]);
g_rand_free (rand);
return 0;
}