URL https://opencores.org/ocsvn/openrisc/openrisc/trunk

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-dev/] [or1k-gcc/] [gcc/] [testsuite/] [gcc.c-torture/] [compile/] [pr27341-1.c] - Blame information for rev 749


extern double R_NaReal;
void z_atan2 (double _Complex * r, double _Complex * ccs)
{
    if (*ccs == 0)
        __imag__ *r = R_NaReal;
}
 

Line No.	Rev	Author	Line
1	688	jeremybenn	`extern double R_NaReal;`
2			`void z_atan2 (double _Complex * r, double _Complex * ccs)`
3			`{`
4			`if (*ccs == 0)`
5			`__imag__ *r = R_NaReal;`
6			`}`
7