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

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.17.0/] [newlib/] [libm/] [common/] [s_nearbyint.c] - Blame information for rev 455

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


/*
 * ====================================================
 * Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.
 *
 * Developed at SunPro, a Sun Microsystems, Inc. business.
 * Permission to use, copy, modify, and distribute this
 * software is freely granted, provided that this notice
 * is preserved.
 * ====================================================
 */
 
#include <math.h>
#include "fdlibm.h"
 
#ifndef _DOUBLE_IS_32BITS
 
#ifdef __STDC__
        double nearbyint(double x)
#else
        double nearbyint(x)
        double x;
#endif
{
  return rint(x);
}
 
#endif /* _DOUBLE_IS_32BITS */

Line No.	Rev	Author	Line
1	148	jeremybenn	`/*`
2			`* ====================================================`
3			`* Copyright (C) 1993 by Sun Microsystems, Inc. All rights reserved.`
4			`*`
5			`* Developed at SunPro, a Sun Microsystems, Inc. business.`
6			`* Permission to use, copy, modify, and distribute this`
7			`* software is freely granted, provided that this notice`
8			`* is preserved.`
9			`* ====================================================`
10			`*/`
11
12			`#include <math.h>`
13			`#include "fdlibm.h"`
14
15			`#ifndef _DOUBLE_IS_32BITS`
16
17			`#ifdef __STDC__`
18			`double nearbyint(double x)`
19			`#else`
20			`double nearbyint(x)`
21			`double x;`
22			`#endif`
23			`{`
24			`return rint(x);`
25			`}`
26
27			`#endif /* _DOUBLE_IS_32BITS */`

Browse

Tools

Subversion Repositories openrisc_me

[/] [openrisc/] [trunk/] [gnu-src/] [newlib-1.17.0/] [newlib/] [libm/] [common/] [s_nearbyint.c] - Blame information for rev 455