xref: /openbsd/lib/libm/arch/hppa/s_ceilf.c (revision 642e4c0c)
1*642e4c0cSmiod /*	$OpenBSD: s_ceilf.c,v 1.9 2023/01/27 16:43:33 miod Exp $	*/
229c788c4Smickey /*
329c788c4Smickey  * Written by Michael Shalayeff. Public Domain
429c788c4Smickey  */
529c788c4Smickey 
629c788c4Smickey #include <sys/types.h>
729c788c4Smickey #include <machine/ieeefp.h>
829c788c4Smickey #include "math.h"
929c788c4Smickey 
1029c788c4Smickey float
ceilf(float x)11b11582bcSmickey ceilf(float x)
1229c788c4Smickey {
130c764565Smickey 	u_int64_t ofpsr, fpsr;
1429c788c4Smickey 
15*642e4c0cSmiod 	__asm__ volatile("fstds %%fr0,0(%1)" : "=m" (ofpsr) : "r" (&ofpsr));
160c764565Smickey 	fpsr = (ofpsr & ~((u_int64_t)FP_RM << (9 + 32))) |
170c764565Smickey 	    ((u_int64_t)FP_RP << (9 + 32));
18*642e4c0cSmiod 	__asm__ volatile("fldds 0(%0), %%fr0" :: "r" (&fpsr), "m" (fpsr));
1929c788c4Smickey 
20b5aa3b33Sguenther 	__asm__ volatile("frnd,sgl %0,%0" : "+f" (x));
2129c788c4Smickey 
22*642e4c0cSmiod 	__asm__ volatile("fldds 0(%0), %%fr0" :: "r" (&ofpsr), "m" (ofpsr));
2329c788c4Smickey 	return (x);
2429c788c4Smickey }
252f2c0062Sguenther DEF_STD(ceilf);
26