--- hatari/src/uae-cpu/fpp.c 2019/04/09 08:50:34 1.1.1.11 +++ hatari/src/uae-cpu/fpp.c 2019/04/09 08:53:27 1.1.1.13 @@ -7,8 +7,8 @@ * * Adaptation to Hatari by Thomas Huth * - * This file is distributed under the GNU Public License, version 2 or at - * your option any later version. Read the file gpl.txt for details. + * This file is distributed under the GNU General Public License, version 2 + * or at your option any later version. Read the file gpl.txt for details. */ const char FPP_fileid[] = "Hatari fpp.c : " __DATE__ " " __TIME__; @@ -145,7 +145,11 @@ STATIC_INLINE fptype to_pack (uae_u32 wr *cp++ = ((wrd1 >> 20) & 0xf) + '0'; *cp++ = ((wrd1 >> 16) & 0xf) + '0'; *cp = 0; +#if USE_LONG_DOUBLE + sscanf (str, "%Le", &d); +#else sscanf (str, "%le", &d); +#endif return d; } @@ -156,7 +160,11 @@ STATIC_INLINE void from_pack (fptype src char *cp; char str[100]; +#if USE_LONG_DOUBLE + sprintf (str, "%.16Le", src); +#else sprintf (str, "%.16e", src); +#endif cp = str; *wrd1 = *wrd2 = *wrd3 = 0; if (*cp == '-') {