From 5e908464b9603e9cd95047d2edd00de5f78fedaf Mon Sep 17 00:00:00 2001 From: Jakub Jelinek Date: Wed, 13 Oct 2010 22:27:03 -0400 Subject: Implement accurate fma. --- sysdeps/powerpc/fpu/s_fma.S | 33 +++++++++++++++++++++++++++++++++ sysdeps/powerpc/fpu/s_fmaf.S | 28 ++++++++++++++++++++++++++++ 2 files changed, 61 insertions(+) create mode 100644 sysdeps/powerpc/fpu/s_fma.S create mode 100644 sysdeps/powerpc/fpu/s_fmaf.S (limited to 'sysdeps/powerpc/fpu') diff --git a/sysdeps/powerpc/fpu/s_fma.S b/sysdeps/powerpc/fpu/s_fma.S new file mode 100644 index 0000000000..9c650eab07 --- /dev/null +++ b/sysdeps/powerpc/fpu/s_fma.S @@ -0,0 +1,33 @@ +/* Compute x * y + z as ternary operation. PowerPC version. + Copyright (C) 2010 Free Software Foundation, Inc. + This file is part of the GNU C Library. + + The GNU C Library is free software; you can redistribute it and/or + modify it under the terms of the GNU Lesser General Public + License as published by the Free Software Foundation; either + version 2.1 of the License, or (at your option) any later version. + + The GNU C Library is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + Lesser General Public License for more details. + + You should have received a copy of the GNU Lesser General Public + License along with the GNU C Library; if not, write to the Free + Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA + 02111-1307 USA. */ + +#include + +ENTRY(__fma) +/* double [f1] fma (double [f1] x, double [f2] y, double [f3] z); */ + fmadd fp1,fp1,fp2,fp3 + blr +END(__fma) + +weak_alias (__fma,fma) + +#ifdef NO_LONG_DOUBLE +weak_alias (__fma,__fmal) +weak_alias (__fma,fmal) +#endif diff --git a/sysdeps/powerpc/fpu/s_fmaf.S b/sysdeps/powerpc/fpu/s_fmaf.S new file mode 100644 index 0000000000..1a755fe2db --- /dev/null +++ b/sysdeps/powerpc/fpu/s_fmaf.S @@ -0,0 +1,28 @@ +/* Compute x * y + z as ternary operation. PowerPC version. + Copyright (C) 2010 Free Software Foundation, Inc. + This file is part of the GNU C Library. + + The GNU C Library is free software; you can redistribute it and/or + modify it under the terms of the GNU Lesser General Public + License as published by the Free Software Foundation; either + version 2.1 of the License, or (at your option) any later version. + + The GNU C Library is distributed in the hope that it will be useful, + but WITHOUT ANY WARRANTY; without even the implied warranty of + MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE. See the GNU + Lesser General Public License for more details. + + You should have received a copy of the GNU Lesser General Public + License along with the GNU C Library; if not, write to the Free + Software Foundation, Inc., 59 Temple Place, Suite 330, Boston, MA + 02111-1307 USA. */ + +#include + +ENTRY(__fmaf) +/* float [f1] fmaf (float [f1] x, float [f2] y, float [f3] z); */ + fmadds fp1,fp1,fp2,fp3 + blr +END(__fmaf) + +weak_alias (__fmaf,fmaf) -- cgit 1.4.1