Fix readdir regressions on sparc 32-bit.
[platform/upstream/glibc.git] / stdlib / tst-random2.c
1 /* Test initstate saving the old state.
2    Copyright (C) 2005-2013 Free Software Foundation, Inc.
3    This file is part of the GNU C Library.
4    Contributed by Jakub Jelinek <jakub@redhat.com>, 2005.
5
6    The GNU C Library is free software; you can redistribute it and/or
7    modify it under the terms of the GNU Lesser General Public
8    License as published by the Free Software Foundation; either
9    version 2.1 of the License, or (at your option) any later version.
10
11    The GNU C Library is distributed in the hope that it will be useful,
12    but WITHOUT ANY WARRANTY; without even the implied warranty of
13    MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the GNU
14    Lesser General Public License for more details.
15
16    You should have received a copy of the GNU Lesser General Public
17    License along with the GNU C Library; if not, see
18    <http://www.gnu.org/licenses/>.  */
19
20 #include <stdio.h>
21 #include <stdlib.h>
22
23 int
24 main (void)
25 {
26   int pass;
27   int ret = 0;
28   long int r[2];
29
30   for (pass = 0; pass < 2; pass++)
31     {
32       srandom (0x12344321);
33
34       int j;
35       for (j = 0; j < 3; ++j)
36         random ();
37       if (pass == 1)
38         {
39           char state[128];
40           char *ostate = initstate (0x34562101, state, 128);
41           if (setstate (ostate) != state)
42             {
43               puts ("setstate (ostate) != state");
44               ret = 1;
45             }
46         }
47
48       random ();
49       r[pass] = random ();
50     }
51
52   if (r[0] != r[1])
53     {
54       printf ("%ld != %ld\n", r[0], r[1]);
55       ret = 1;
56     }
57   return ret;
58 }