X-Git-Url: http://nsz.repo.hu/git/?p=libm;a=blobdiff_plain;f=src%2Fmath%2Fscalblnl.c;fp=src%2Fmath%2Fscalblnl.c;h=82ebbed055d25960d19bad841328597340610d80;hp=4199e441ff4f50c3001c9e205c06fccd7e4a7a3a;hb=0a036507374004156ba6dfd5db9d0c8efa70e78a;hpb=5718e964d8a5c273a91b4d86d16926f54151c58f

diff --git a/src/math/scalblnl.c b/src/math/scalblnl.c
index 4199e44..82ebbed 100644
--- a/src/math/scalblnl.c
+++ b/src/math/scalblnl.c
@@ -1,5 +1,12 @@
 #include <limits.h>
 #include "libm.h"
+
+#if LDBL_MANT_DIG == 53 && LDBL_MAX_EXP == 1024
+long double scalblnl(long double x, long n)
+{
+	return scalbln(x, n);
+}
+#else
 long double scalblnl(long double x, long n)
 {
 	if (n > INT_MAX)
@@ -8,3 +15,4 @@ long double scalblnl(long double x, long n)
 		n = INT_MIN;
 	return scalbnl(x, n);
 }
+#endif