xref: /openbsd-src/lib/libc/arch/hppa/gen/fabs.c (revision aeb694e3afa554db8dd44ee8140d036724efada5)
1 /*	$OpenBSD: fabs.c,v 1.7 2011/07/08 22:28:33 martynas Exp $	*/
2 
3 /*
4  * Written by Miodrag Vallat.  Public domain
5  */
6 
7 #include <sys/cdefs.h>
8 
9 double
10 fabs(double val)
11 {
12 
13 	__asm__ __volatile__("fabs,dbl %0,%0" : "+f" (val));
14 	return (val);
15 }
16 
17 __weak_alias(fabsl, fabs);
18