diff options
author | John Peacock <jpeacock@cpan.org> | 2018-04-12 11:22:58 -0400 |
---|---|---|
committer | James E Keenan <jkeenan@cpan.org> | 2018-04-12 13:42:43 -0400 |
commit | d3a5b29c73b5a2fd6524ca1f8c5c779bd8cb0687 (patch) | |
tree | 87be2255b044a35e66c673b487615eb390ad4f73 /vutil.h | |
parent | 1b30b4a8259a74c5ffaee362bc1d881c40fc5279 (diff) | |
download | perl-d3a5b29c73b5a2fd6524ca1f8c5c779bd8cb0687.tar.gz |
Synch cpan/version/* and other files with CPAN version 0.9921.
Committer's note: In large part probably due to the CUSTOMIZED aspect of
'version' in Porting/Maintainer.pl, the regular 'Porting/sync-with-cpan'
program did not give good results when I attempted to use it for version.pm.
So I hacked together my own program, available here:
https://github.com/jkeenan/scripts-misc/blob/master/sync-version-pm.pl
Diffstat (limited to 'vutil.h')
-rw-r--r-- | vutil.h | 47 |
1 files changed, 27 insertions, 20 deletions
@@ -226,33 +226,40 @@ const char * Perl_prescan_version(pTHX_ const char *s, bool strict, const char** #if PERL_VERSION_LT(5,27,9) # define LC_NUMERIC_LOCK # define LC_NUMERIC_UNLOCK -# if PERL_VERSION_LT(5,19,0) -# undef STORE_LC_NUMERIC_SET_STANDARD -# undef RESTORE_LC_NUMERIC -# undef DECLARATION_FOR_LC_NUMERIC_MANIPULATION -# ifdef USE_LOCALE -# define DECLARATION_FOR_LC_NUMERIC_MANIPULATION char *loc -# define STORE_NUMERIC_SET_STANDARD()\ - loc = savepv(setlocale(LC_NUMERIC, NULL)); \ - SAVEFREEPV(loc); \ - setlocale(LC_NUMERIC, "C"); - -# define RESTORE_LC_NUMERIC()\ - setlocale(LC_NUMERIC, loc); -# else -# define DECLARATION_FOR_LC_NUMERIC_MANIPULATION -# define STORE_LC_NUMERIC_SET_STANDARD() -# define RESTORE_LC_NUMERIC() -# endif +# if PERL_VERSION_LT(5,19,0) +# undef STORE_LC_NUMERIC_SET_STANDARD +# undef RESTORE_LC_NUMERIC +# undef DECLARATION_FOR_LC_NUMERIC_MANIPULATION +# ifdef USE_LOCALE +# define DECLARATION_FOR_LC_NUMERIC_MANIPULATION char *loc +# define STORE_NUMERIC_SET_STANDARD()\ + loc = savepv(setlocale(LC_NUMERIC, NULL)); \ + SAVEFREEPV(loc); \ + setlocale(LC_NUMERIC, "C"); +# define RESTORE_LC_NUMERIC()\ + setlocale(LC_NUMERIC, loc); +# else +# define DECLARATION_FOR_LC_NUMERIC_MANIPULATION +# define STORE_LC_NUMERIC_SET_STANDARD() +# define RESTORE_LC_NUMERIC() +# endif # endif #endif #ifndef LOCK_NUMERIC_STANDARD -#define LOCK_NUMERIC_STANDARD() +# define LOCK_NUMERIC_STANDARD() #endif #ifndef UNLOCK_NUMERIC_STANDARD -#define UNLOCK_NUMERIC_STANDARD() +# define UNLOCK_NUMERIC_STANDARD() +#endif + +/* The names of these changed in 5.28 */ +#ifndef LOCK_LC_NUMERIC_STANDARD +# define LOCK_LC_NUMERIC_STANDARD() LOCK_NUMERIC_STANDARD() +#endif +#ifndef UNLOCK_LC_NUMERIC_STANDARD +# define UNLOCK_LC_NUMERIC_STANDARD() UNLOCK_NUMERIC_STANDARD() #endif /* ex: set ro: */ |