*** empty log message ***
authorClaus Gittinger <cg@exept.de>
Sun, 08 Dec 2019 22:03:46 +0100
changeset 25088 3a9b967a1065
parent 25087 6be980cf75e3
child 25089 97cb83e058e2
*** empty log message ***
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