fma.c, fms.c: added a comment about apparently incorrect scaling.

git-svn-id: svn://scm.gforge.inria.fr/svn/mpfr/trunk@5468 280ebfd0-de03-0410-8827-d642c229c3f4

1 files changed, 3 insertions, 0 deletions

diff --git a/fms.c b/fms.c
index 4eb5c3e98..645b36638 100644
--- a/fms.c
+++ b/fms.c
@@ -274,6 +274,9 @@ mpfr_fms (mpfr_ptr s, mpfr_srcptr x, mpfr_srcptr y, mpfr_srcptr z,
                 MPFR_ASSERTN (! MPFR_OVERFLOW (flags));  /* TODO... */
                 MPFR_ASSERTN (! MPFR_UNDERFLOW (flags));  /* not possible */
                 inex2 = mpfr_div_2ui (s, s, scale, GMP_RNDN);
+                /* FIXME: this seems incorrect. GMP_RNDN -> rnd_mode?
+                   Also, handle the double rounding case:
+                   s / 2^scale = 2^(emin - 2) in GMP_RNDN. */
                 if (inex2)  /* underflow */
                   inexact = inex2;
               }