Update.

[thirdparty/glibc.git] / sysdeps / libm-ieee754 / s_ctanhf.c

diff --git a/sysdeps/libm-ieee754/s_ctanhf.c b/sysdeps/libm-ieee754/s_ctanhf.c
index aec02fe7c41195e51c90f9eab8f418def4f02764..fd66648d79a6201d677dd381f4362379d47bf335 100644 (file)
--- a/sysdeps/libm-ieee754/s_ctanhf.c
+++ b/sysdeps/libm-ieee754/s_ctanhf.c
@@ -19,6 +19,7 @@
    Boston, MA 02111-1307, USA.  */
 
 #include <complex.h>
+#include <fenv.h>
 #include <math.h>
 
 #include "math_private.h"
@@ -44,6 +45,11 @@ __ctanhf (__complex__ float x)
        {
          __real__ res = __nanf ("");
          __imag__ res = __nanf ("");
+
+#ifdef FE_INVALID
+         if (__isinff (__imag__ x))
+           feraiseexcept (FE_INVALID);
+#endif
        }
     }
   else