1 --- lcong48.c.orig 2003-05-20 15:21:02.000000000 -0700
2 +++ lcong48.c 2005-11-03 13:36:03.000000000 -0800
7 -extern unsigned short _rand48_seed[3];
8 -extern unsigned short _rand48_mult[3];
9 -extern unsigned short _rand48_add;
12 lcong48(unsigned short p[7])
14 - _rand48_seed[0] = p[0];
15 - _rand48_seed[1] = p[1];
16 - _rand48_seed[2] = p[2];
17 - _rand48_mult[0] = p[3];
18 - _rand48_mult[1] = p[4];
19 - _rand48_mult[2] = p[5];
20 + LOADRAND48(_rand48_seed, &p[0]);
21 + LOADRAND48(_rand48_mult, &p[3]);