summaryrefslogtreecommitdiff
path: root/gcc/testsuite/gcc.c-torture/compile/pr27341-1.c
blob: b77e937b9ce13dfcc3fe57198a2f5f66eb027380 (plain)
1
2
3
4
5
6
7
extern double R_NaReal;
void z_atan2 (double _Complex * r, double _Complex * ccs)
{
    if (*ccs == 0)
        __imag__ *r = R_NaReal;
}