summaryrefslogtreecommitdiff
path: root/acos.c
diff options
context:
space:
mode:
authorpelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4>2004-03-12 13:17:53 +0000
committerpelissip <pelissip@280ebfd0-de03-0410-8827-d642c229c3f4>2004-03-12 13:17:53 +0000
commitd6568c76d7e653f2335aee4aeeaa9f80e35d4c4f (patch)
tree4949e5f949b63e063dd7bdee69c44f83ec3d9c48 /acos.c
parent49fe0fbfb5609bc3cf91dece29f9b3148ea059c6 (diff)
downloadmpfr-d6568c76d7e653f2335aee4aeeaa9f80e35d4c4f.tar.gz
Fix bug of inexact flag for acos(0).
git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@2838 280ebfd0-de03-0410-8827-d642c229c3f4
Diffstat (limited to 'acos.c')
-rw-r--r--acos.c5
1 files changed, 2 insertions, 3 deletions
diff --git a/acos.c b/acos.c
index 907335197..b30514641 100644
--- a/acos.c
+++ b/acos.c
@@ -19,7 +19,6 @@ along with the MPFR Library; see the file COPYING.LIB. If not, write to
the Free Software Foundation, Inc., 59 Temple Place - Suite 330, Boston,
MA 02111-1307, USA. */
-
#include "mpfr-impl.h"
int
@@ -50,9 +49,9 @@ mpfr_acos (mpfr_ptr acos, mpfr_srcptr x, mp_rnd_t rnd_mode)
{
MPFR_ASSERTD(MPFR_IS_ZERO(x));
/* acos(0)=Pi/2 */
- mpfr_const_pi (acos, rnd_mode);
+ inexact = mpfr_const_pi (acos, rnd_mode);
MPFR_SET_EXP (acos, MPFR_GET_EXP (acos) - 1);
- return 1; /* inexact */
+ return mpfr_check_range (acos, inexact, rnd_mode);
}
}
MPFR_CLEAR_FLAGS(x);