1 /* $NetBSD: fabs.c,v 1.6 2018/11/08 16:29:50 riastradh Exp $ */ 2 3 /* $OpenBSD: fabs.c,v 1.3 2002/10/21 18:41:05 mickey Exp $ */ 4 5 /* 6 * Written by Miodrag Vallat. Public domain 7 */ 8 9 #include <sys/cdefs.h> 10 11 #include <math.h> 12 13 #ifndef __HAVE_LONG_DOUBLE __strong_alias(fabsl,fabs)14__strong_alias(fabsl, fabs) 15 #endif 16 17 double 18 fabs(double val) 19 { 20 21 __asm volatile("fabs,dbl %0,%0" : "+f" (val)); 22 return (val); 23 } 24