46 void fail (const char *msg, int s, int i) __attribute__ ((__noreturn__));
54   int s;			/* sequence index */  in do_test()  local
62   for (s = 0; s < nseq; ++s)  in do_test()
64       srandom ( seed[s] );  in do_test()
66 	rnd[s][i] = random ();  in do_test()
71   for (s = 0; s < nseq; ++s)  in do_test()
73       srandom (seed[s]);  in do_test()
75 	if (rnd[s][i] != random ())  in do_test()
76 	  fail ("first regenerate test", s, i);  in do_test()
83   for (s = 1; s < nseq; ++s)  in do_test()
85       state[s] = (char*) malloc (degree);  in do_test()
86       oldstate[s] = initstate (seed[s], state[s], degree);  in do_test()
91   for (s = 1; s < nseq - 1; ++s)  in do_test()
92     if (state[s] != oldstate[s + 1])  in do_test()
93       fail ("bad initstate() return value", s, i);  in do_test()
99       for (s = 0; s < nseq; ++s)  in do_test()
101 	  char *oldstate = (char *) setstate (state[s]);  in do_test()
102 	  if (oldstate != state[(s + nseq - 1) % nseq])  in do_test()
103 	    fail ("bad setstate() return value", s, i);  in do_test()
104 	  if (rnd[s][i] != random ())  in do_test()
105 	    fail ("bad value generated in interleave test", s, i);  in do_test()
113 fail (const char *msg, int s, int i)  in fail()  argument
116   printf ("%s (seq %d, pos %d).\n", msg, s, i);  in fail()