OSDN Git Service

26ea259461101ab72cff09f12df33f2df0fe872c
[pf3gnuchains/gcc-fork.git] / gcc / testsuite / gcc.dg / dfp / snan.c
1 /* { dg-do run } */
2 /* { dg-options "" } */
3
4 /* FIXME: this test needs to be conditional to systems with POSIX signals.  */
5
6 #include <signal.h>
7
8 extern void exit(int status);
9 extern void abort(void);
10
11 void go_quietly (int arg)
12 {
13   exit (0);
14 }
15
16 int main()
17 {
18   _Decimal32 d = 1.5df;
19
20   /* Enable signaling NaNs using a scaffolding libgcc function.  */
21   __dfp_enable_traps ();
22   signal (SIGFPE, go_quietly);
23
24   d = d / 0.0df;
25
26   /* Never reached.  */
27   abort ();
28   return 0;
29 }