# HG changeset patch
# User Claus Gittinger <cg@exept.de>
# Date 1575839026 -3600
# Node ID 3a9b967a106554125fc61e713c1613f8614c942a
# Parent  6be980cf75e351c9bc172730ad69f9c61fc97196
*** empty log message ***

diff -r 6be980cf75e3 -r 3a9b967a1065 LongFloat.st
--- a/LongFloat.st	Sun Dec 08 22:03:13 2019 +0100
+++ b/LongFloat.st	Sun Dec 08 22:03:46 2019 +0100
@@ -317,11 +317,12 @@
 #ifndef NO_STRTOLD
 	    long double strtold(const char *, char**);
 	    LONGFLOAT_t val = strtold(cp+idx, NULL);
+	    __qMKLFLOAT(newFloat, val);
+	    RETURN (newFloat);
 #else
 # ifndef NO_SSCANF_LONGFLOAT
 	    LONGFLOAT_t val;
 	    sscanf(cp+idx, "%Lf", &val);
-# else
 	    __qMKLFLOAT(newFloat, val);
 	    RETURN (newFloat);
 # endif