OSDN Git Service

2008-04-27 Richard Guenther <rguenther@suse.de>
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.dg / ia64-sync-1.c
1 /* { dg-do run } */
2 /* { dg-require-effective-target sync_int_long } */
3 /* { dg-options } */
4 /* { dg-options "-march=i486" { target { { i?86-*-* x86_64-*-* } && ilp32 } } } */
5 /* { dg-options "-mcpu=v9" { target sparc*-*-* } } */
6
7 /* Test basic functionality of the intrinsics.  The operations should
8    not be optimized away if no one checks the return values.  */
9
10 __extension__ typedef __SIZE_TYPE__ size_t;
11
12 extern void abort (void);
13 extern void *memcpy (void *, const void *, size_t);
14
15 static int AI[12];
16 static int init_noret_si[12] = { 0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0 };
17 static int test_noret_si[12] = { 1, 1, 1, 0, 1, 4, 22, -12, 7, 8, 9, 7 };
18
19 static void
20 do_noret_si (void)
21 {
22   __sync_val_compare_and_swap(AI+0, 0, 1);
23   __sync_bool_compare_and_swap(AI+1, 0, 1);
24   __sync_lock_test_and_set(AI+2, 1);
25   __sync_lock_release(AI+3);
26
27   __sync_fetch_and_add(AI+4, 1);
28   __sync_fetch_and_add(AI+5, 4);
29   __sync_fetch_and_add(AI+6, 22);
30   __sync_fetch_and_sub(AI+7, 12);
31   __sync_fetch_and_and(AI+8, 7);
32   __sync_fetch_and_or(AI+9, 8);
33   __sync_fetch_and_xor(AI+10, 9);
34   __sync_fetch_and_nand(AI+11, 7);
35 }
36
37 static long AL[12];
38 static long init_noret_di[12] = { 0, 0, 0, 1, 0, 0, 0, 0, -1, 0, 0, 0 };
39 static long test_noret_di[12] = { 1, 1, 1, 0, 1, 4, 22, -12, 7, 8, 9, 7 };
40
41 static void
42 do_noret_di (void)
43 {
44   __sync_val_compare_and_swap(AL+0, 0, 1);
45   __sync_bool_compare_and_swap(AL+1, 0, 1);
46   __sync_lock_test_and_set(AL+2, 1);
47   __sync_lock_release(AL+3);
48
49   __sync_fetch_and_add(AL+4, 1);
50   __sync_fetch_and_add(AL+5, 4);
51   __sync_fetch_and_add(AL+6, 22);
52   __sync_fetch_and_sub(AL+7, 12);
53   __sync_fetch_and_and(AL+8, 7);
54   __sync_fetch_and_or(AL+9, 8);
55   __sync_fetch_and_xor(AL+10, 9);
56   __sync_fetch_and_nand(AL+11, 7);
57 }
58
59 int main()
60 {
61   memcpy(AI, init_noret_si, sizeof(init_noret_si));
62   memcpy(AL, init_noret_di, sizeof(init_noret_di));
63
64   do_noret_si ();
65   do_noret_di ();
66
67   if (memcmp (AI, test_noret_si, sizeof(test_noret_si)))
68     abort ();
69   if (memcmp (AL, test_noret_di, sizeof(test_noret_di)))
70     abort ();
71
72   return 0;
73 }