blob: 392666f3dd583457d41b7a3d04c59762b9415c76 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
|
/* Test floating-point contraction occurs only within source language
expressions. */
/* { dg-do run } */
/* { dg-options "-std=c99 -pedantic-errors" } */
/* { dg-skip-if "ptx only loosely follows IEEE" { "nvptx-*-*" } } */
extern void abort (void);
extern void exit (int);
volatile float a = 1 + 0x1p-23f, b = 1 - 0x1p-23f, c = -1;
int
main (void)
{
float av = a, bv = b, cv = c;
float p = av * bv;
float r = p + cv;
if (r == 0)
exit (0);
else
abort ();
}
|