annotate libgomp/testsuite/libgomp.c-c++-common/pr64868.c @ 158:494b0b89df80 default tip

...
author Shinji KONO <kono@ie.u-ryukyu.ac.jp>
date Mon, 25 May 2020 18:13:55 +0900
parents 84e7813d76e9
children
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
131
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
1 /* PR c/64868 */
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
2 /* { dg-do run } */
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
3
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
4 float f = 2.0f;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
5 double d = 4.0;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
6 long double ld = 8.0L;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
7
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
8 void
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
9 foo ()
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
10 {
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
11 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
12 f = 1.0f / f;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
13 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
14 f = 1 / f;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
15 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
16 f = f / 2.0f;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
17 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
18 f = f / 2;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
19 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
20 f /= 2.0f;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
21 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
22 f /= 2;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
23 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
24 d = 1.0 / d;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
25 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
26 d = 1 / d;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
27 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
28 d = d / 2.0;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
29 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
30 d = d / 2;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
31 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
32 d /= 2.0;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
33 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
34 d /= 2;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
35 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
36 ld = 1.0L / ld;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
37 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
38 ld = 1 / ld;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
39 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
40 ld = ld / 2.0L;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
41 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
42 ld = ld / 2;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
43 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
44 ld /= 2.0L;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
45 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
46 ld /= 2;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
47 if (f != 0.125f || d != 0.25 || ld != 0.5L)
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
48 __builtin_abort ();
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
49 }
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
50
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
51 #ifdef __cplusplus
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
52 template <typename T, int N1, int N2>
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
53 void
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
54 bar ()
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
55 {
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
56 T v = ::d;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
57 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
58 v *= 16;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
59 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
60 v = 1.0 / v;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
61 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
62 v = N1 / v;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
63 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
64 v = v / 2.0;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
65 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
66 v = v / N2;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
67 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
68 v /= 2.0;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
69 #pragma omp atomic
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
70 v /= N2;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
71 if (v != 0.25)
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
72 __builtin_abort ();
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
73 }
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
74 #endif
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
75
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
76 int
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
77 main ()
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
78 {
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
79 foo ();
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
80 #ifdef __cplusplus
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
81 bar<float, 1, 2> ();
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
82 bar<double, 1, 2> ();
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
83 bar<long double, 1, 2> ();
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
84 #endif
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
85 return 0;
84e7813d76e9 gcc-8.2
mir3636
parents:
diff changeset
86 }