blob: da87f4a604134571a156684b4d101f58ea2b34d9 (
plain)
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
|
/*
* Written by Michael Shalayeff. Public Domain
*/
#if defined(LIBM_SCCS) && !defined(lint)
static char rcsid[] = "$OpenBSD: s_ceil.c,v 1.2 2002/09/11 15:16:52 mickey Exp $";
#endif
#include <sys/types.h>
#include <machine/ieeefp.h>
#include "math.h"
double
ceil(double x)
{
u_int32_t ofpsr, fpsr;
__asm__ __volatile__("fstw %%fr0,0(%1)" : "=m" (ofpsr) : "r" (&ofpsr));
fpsr = (ofpsr & ~0x600) | (FP_RP << 9);
__asm__ __volatile__("fldw 0(%0), %%fr0" :: "r" (&fpsr));
__asm__ __volatile__("frnd,dbl %0,%0" : "+f" (x));
__asm__ __volatile__("fldw 0(%0), %%fr0" :: "r" (&ofpsr));
return (x);
}
|
