1 files changed, 2 insertions, 9 deletions
diff --git a/math/s_nanl.c b/math/s_nanl.c
index 73387a9116..e6149bc0c7 100644
--- a/math/s_nanl.c
+++ b/math/s_nanl.c
@@ -1,5 +1,5 @@
 /* Return quiet nan.
-   Copyright (C) 1997-2015 Free Software Foundation, Inc.
+   Copyright (C) 1997-2016 Free Software Foundation, Inc.
    This file is part of the GNU C Library.
    Contributed by Ulrich Drepper <drepper@cygnus.com>, 1997.
 
@@ -28,13 +28,6 @@
 long double
 __nanl (const char *tagp)
 {
-  if (tagp[0] != '\0')
-    {
-      char buf[6 + strlen (tagp)];
-      sprintf (buf, "NAN(%s)", tagp);
-      return strtold (buf, NULL);
-    }
-
-  return NAN;
+  return __strtold_nan (tagp, NULL, 0);
 }
 weak_alias (__nanl, nanl)