1 /* $OpenBSD: fabs.c,v 1.5 2008/12/10 00:59:07 deraadt 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