From: Jarkko Hietaniemi Date: Tue, 11 Jun 2002 19:57:23 +0000 (+0000) Subject: Not that I know anything about Windows compilers X-Git-Url: http://git.shadowcat.co.uk/gitweb/gitweb.cgi?a=commitdiff_plain;h=fc0bf671453fcec7b45b1911adfd5f2cb3c807b5;p=p5sagit%2Fp5-mst-13.2.git Not that I know anything about Windows compilers but Google leads me into believing that while Borland and GCC support the ANSI way of printing long doubles (%L), Visual C really doesn't support printing them. p4raw-id: //depot/perl@17193 --- diff --git a/ext/XS/APItest/APItest.xs b/ext/XS/APItest/APItest.xs index 085198a..1e8ea35 100644 --- a/ext/XS/APItest/APItest.xs +++ b/ext/XS/APItest/APItest.xs @@ -25,7 +25,7 @@ void print_long_double() CODE: #ifdef HAS_LONG_DOUBLE -# if LONG_DOUBLESIZE > DOUBLESIZE +# if defined(PERL_PRIfldbl) && (LONG_DOUBLESIZE > DOUBLESIZE) long double val = 7.0; printf("%5.3" PERL_PRIfldbl "\n",val); # else diff --git a/win32/config_H.bc b/win32/config_H.bc index 5be778c..3fa348c 100644 --- a/win32/config_H.bc +++ b/win32/config_H.bc @@ -2927,10 +2927,10 @@ * This symbol, if defined, contains the string used by stdio to * format long doubles (format 'f') for input. */ -/*#define PERL_PRIfldbl "f" /**/ -/*#define PERL_PRIgldbl "g" /**/ -/*#define PERL_PRIeldbl "e" /**/ -/*#define PERL_SCNfldbl "f" /**/ +#define PERL_PRIfldbl "Lf" /**/ +#define PERL_PRIgldbl "Lg" /**/ +#define PERL_PRIeldbl "Le" /**/ +#define PERL_SCNfldbl "f" /**/ /* Off_t: * This symbol holds the type used to declare offsets in the kernel. diff --git a/win32/config_H.gc b/win32/config_H.gc index a968ec6..85c000a 100644 --- a/win32/config_H.gc +++ b/win32/config_H.gc @@ -2927,9 +2927,9 @@ * This symbol, if defined, contains the string used by stdio to * format long doubles (format 'f') for input. */ -/*#define PERL_PRIfldbl "f" /**/ -/*#define PERL_PRIgldbl "g" /**/ -/*#define PERL_PRIeldbl "e" /**/ +#define PERL_PRIfldbl "Lf" /**/ +#define PERL_PRIgldbl "Lg" /**/ +#define PERL_PRIeldbl "Le" /**/ /*#define PERL_SCNfldbl "f" /**/ /* Off_t: