diff options
author | Dominic Dunlop <domo@computer.org> | 2000-08-16 00:20:52 +0200 |
---|---|---|
committer | Jarkko Hietaniemi <jhi@iki.fi> | 2000-08-15 23:33:23 +0000 |
commit | d764f01a54c0f82174c22184bb83b9dca8be1913 (patch) | |
tree | 8bbd5001c020c405b11f3c868d9926a21019b959 /Porting | |
parent | 9d5a2765247106c08687386ac3cf275028b5a54a (diff) | |
download | perl-d764f01a54c0f82174c22184bb83b9dca8be1913.tar.gz |
(Retracted by #6660)
Subject: [PATCH perl-current] make s?printf() produce two exponent digits where possible
Message-Id: <p04320403b5bf4c32d381@[192.168.1.4]>
p4raw-id: //depot/perl@6645
Diffstat (limited to 'Porting')
-rw-r--r-- | Porting/Glossary | 5 | ||||
-rw-r--r-- | Porting/config.sh | 5 | ||||
-rw-r--r-- | Porting/config_H | 9 |
3 files changed, 16 insertions, 3 deletions
diff --git a/Porting/Glossary b/Porting/Glossary index f289baa41c..8099ea2ae7 100644 --- a/Porting/Glossary +++ b/Porting/Glossary @@ -1118,6 +1118,11 @@ d_PRIi64 (quadfio.U): This variable conditionally defines the PERL_PRIi64 symbol, which indiciates that stdio has a symbol to print 64-bit decimal numbers. +d_printf_exp_digits (d_printfed.U): + This symbol's value is either 2 or 3, corresponding to the + number of exponent digits produced by the system's sprintf %[FGfg] + formats when the modulus of the exponent is 99 or less. + d_PRIo64 (quadfio.U): This variable conditionally defines the PERL_PRIo64 symbol, which indiciates that stdio has a symbol to print 64-bit octal numbers. diff --git a/Porting/config.sh b/Porting/config.sh index b400739efe..1d7e0d5141 100644 --- a/Porting/config.sh +++ b/Porting/config.sh @@ -8,7 +8,7 @@ # Package name : perl5 # Source directory : /m/fs/work/work/permanent/perl/pp4/perl -# Configuration time: Tue Aug 15 18:22:31 EET DST 2000 +# Configuration time: Wed Aug 16 02:27:51 EET DST 2000 # Configured by : jhi # Target system : osf1 alpha.hut.fi v4.0 878 alpha @@ -60,7 +60,7 @@ ccflags_uselargefiles='' ccsymbols='__alpha=1 __LANGUAGE_C__=1 __osf__=1 __unix__=1 _LONGLONG=1 _SYSTYPE_BSD=1 SYSTYPE_BSD=1 unix=1' cf_by='jhi' cf_email='yourname@yourhost.yourplace.com' -cf_time='Tue Aug 15 18:22:31 EET DST 2000' +cf_time='Wed Aug 16 02:27:51 EET DST 2000' charsize='1' chgrp='' chmod='' @@ -260,6 +260,7 @@ d_phostname='undef' d_pipe='define' d_poll='define' d_portable='define' +d_printf_exp_digits='2' d_pthread_yield='undef' d_pwage='undef' d_pwchange='undef' diff --git a/Porting/config_H b/Porting/config_H index a4b4d21e39..dddfdda925 100644 --- a/Porting/config_H +++ b/Porting/config_H @@ -17,7 +17,7 @@ /* * Package name : perl5 * Source directory : /m/fs/work/work/permanent/perl/pp4/perl - * Configuration time: Tue Aug 15 18:22:31 EET DST 2000 + * Configuration time: Wed Aug 16 02:27:51 EET DST 2000 * Configured by : jhi * Target system : osf1 alpha.hut.fi v4.0 878 alpha */ @@ -3136,6 +3136,13 @@ #define PERL_XS_APIVERSION "5.7.0" #define PERL_PM_APIVERSION "5.005" +/* PRINTF_EXP_DIGITS: + * This symbol's value is either 2 or 3, corresponding to the + * number of exponent digits produced by the system's sprintf %[FGfg] + * formats when the modulus of the exponent is 99 or less. + */ +#define PRINTF_EXP_DIGITS 2 + /* I_LIBUTIL: * This symbol, if defined, indicates that <libutil.h> exists and * should be included. |