1 /* $NetBSD: fabs.c,v 1.2 2005/12/02 09:33:48 skrll 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 <math.h> 10 11 double 12 fabs(double val) 13 { 14 15 __asm__ __volatile__("fabs,dbl %0,%0" : "+f" (val)); 16 return (val); 17 } 18