1 /* $NetBSD: fabs.c,v 1.1 2004/07/24 19:09:29 chs 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 double 10 fabs(double val) 11 { 12 13 __asm__ __volatile__("fabs,dbl %0,%0" : "+f" (val)); 14 return (val); 15 } 16