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

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [pch/] [inline-3.hs] - Blame information for rev 868

Go to most recent revision | Details | Compare with Previous | View Log


extern double rint(double);
extern double fmod (double, double);
static inline unsigned foo(double d) {
    double a;
    a = rint(d);
    return (unsigned)(fmod(a, (double)0xFFFFFFFF) + ((d - a) * 0xFFFFFFFF));
}

Line No.	Rev	Author	Line
1	149	jeremybenn	`extern double rint(double);`
2			`extern double fmod (double, double);`
3			`static inline unsigned foo(double d) {`
4			`double a;`
5			`a = rint(d);`
6			`return (unsigned)(fmod(a, (double)0xFFFFFFFF) + ((d - a) * 0xFFFFFFFF));`
7			`}`

Browse

Tools

Subversion Repositories openrisc

[/] [openrisc/] [trunk/] [gnu-old/] [gcc-4.2.2/] [gcc/] [testsuite/] [gcc.dg/] [pch/] [inline-3.hs] - Blame information for rev 868