diff options
| author | Karl Williamson <khw@cpan.org> | 2019-10-05 21:59:53 -0600 |
|---|---|---|
| committer | Nicolas R <atoomic@cpan.org> | 2019-11-08 12:01:12 -0700 |
| commit | 6ec3ee8fe7d3c1aae780f1e30076b7a6d8d19da4 (patch) | |
| tree | 064ed37e812ed5dfa12be55c88882f3044c8e71e /dist/Devel-PPPort | |
| parent | ab53572cca1222fbaa077bad894a6f8890cc9902 (diff) | |
| download | perl-6ec3ee8fe7d3c1aae780f1e30076b7a6d8d19da4.tar.gz | |
isPSXSPC() is a synonym for isSPACE
They used to have a slightly different meaning, but that was changed a
long time ago.
(cherry picked from commit baa6a68a10d1cd881d989a5c593d58e04593d0e1)
Signed-off-by: Nicolas R <atoomic@cpan.org>
Diffstat (limited to 'dist/Devel-PPPort')
| -rw-r--r-- | dist/Devel-PPPort/parts/inc/misc | 22 |
1 files changed, 18 insertions, 4 deletions
diff --git a/dist/Devel-PPPort/parts/inc/misc b/dist/Devel-PPPort/parts/inc/misc index ab3f371001..e53e0aad24 100644 --- a/dist/Devel-PPPort/parts/inc/misc +++ b/dist/Devel-PPPort/parts/inc/misc @@ -329,6 +329,23 @@ __UNDEFINED__ UNI_TO_NATIVE(c) (c) EBCDIC is not supported on versions earlier than 5.7.1 */ +/* The meaning of this changed; use the modern version */ +#undef isPSXSPC +#undef isPSXSPC_A +#undef isPSXSPC_L1 + +/* Hint: isPSXSPC, isPSXSPC_A, isPSXSPC_L1, isPSXSPC_utf8_safe + This is equivalent to the corresponding isSPACE-type macro. On perls + before 5.18, this matched a vertical tab and SPACE didn't. But the + ppport.h SPACE version does match VT in all perl releases. Since VT's are + extremely rarely found in real-life files, this difference effectively + doesn't matter */ + +/* Hint: isSPACE, isSPACE_A, isSPACE_L1, isSPACE_utf8_safe + Until Perl 5.18, this did not match the vertical tab (VT). The ppport.h + version does match it in all perl releases. Since VT's are extremely rarely + found in real-life files, this difference effectively doesn't matter */ + #ifdef EBCDIC /* This is the first version where these macros are fully correct on EBCDIC @@ -377,9 +394,6 @@ __UNDEFINED__ UNI_TO_NATIVE(c) (c) # undef isPRINT # undef isPRINT_A # undef isPRINT_L1 -# undef isPSXSPC -# undef isPSXSPC_A -# undef isPSXSPC_L1 # undef isPUNCT # undef isPUNCT_A # undef isPUNCT_L1 @@ -686,7 +700,7 @@ __UNDEFINED__ isIDFIRST_utf8_safe(s,e) D_PPP_IS_GENERIC_UTF8_SAFE(s, e, IDFIRST __UNDEFINED__ isLOWER_utf8_safe(s,e) D_PPP_IS_GENERIC_UTF8_SAFE(s, e, LOWER) __UNDEFINED__ isPRINT_utf8_safe(s,e) D_PPP_IS_GENERIC_UTF8_SAFE(s, e, PRINT) -#undef isPSXSPC_utf8_safe /* Use the modern definition */ +# undef isPSXSPC_utf8_safe /* Use the modern definition */ __UNDEFINED__ isPSXSPC_utf8_safe(s,e) isSPACE_utf8_safe(s,e) __UNDEFINED__ isPUNCT_utf8_safe(s,e) D_PPP_IS_GENERIC_UTF8_SAFE(s, e, PUNCT) |