1/* $OpenBSD: fabs.c,v 1.11 2014/04/18 15:09:52 guenther Exp $ */ 2 3/* 4 * Written by Miodrag Vallat. Public domain 5 */ 6 7#include <sys/types.h> 8#include <math.h> 9 10double 11fabs(double val) 12{ 13 14 __asm__ volatile("fabs,dbl %0,%0" : "+f" (val)); 15 return (val); 16} 17 18__strong_alias(fabsl, fabs); 19