OSDN Git Service

* gcc.dg/980827-1.c: New test.
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.dg / 980827-1.c
1 /* { dg-do run { target powerpc*-*-* } } */
2 /* { dg-options -O2 } */
3
4 void splat (double d);
5
6 int main(void)
7 {
8   splat(0);
9   if (dval == 0)
10     abort();
11   exit (0);
12 }
13
14 void splat (double d)
15 {
16   union {
17     double f;
18     unsigned int l[2];
19   } u;
20   
21   u.f = d + d;
22   u.l[1] |= 1;
23   asm volatile ("stfd %0,dval@sdarel(13)" : : "f" (u.f));
24 }