diff options
author | Karl Williamson <khw@cpan.org> | 2021-05-25 10:33:32 -0600 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2021-06-30 08:32:25 +0000 |
commit | 993d875ed9fa768b16cc370dd5550b05a81b71f0 (patch) | |
tree | 9e2285cedb9ab7072b089646f9605a6318a5b268 /dist | |
parent | 9d01359457b066b1a6c0ee815f85a90e6eee8da0 (diff) | |
download | perl-993d875ed9fa768b16cc370dd5550b05a81b71f0.tar.gz |
Dumper.xs: Port ESC_NATIVE back on EBCDIC
Wrap its definition with LATIN1_TO_NATIVE() which will automatically
port it back as far as possible.
This is the only use of ESC_NATIVE on cpan, so I don't think it's worth
putting it in ppport.h
Diffstat (limited to 'dist')
-rw-r--r-- | dist/Data-Dumper/Dumper.xs | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/dist/Data-Dumper/Dumper.xs b/dist/Data-Dumper/Dumper.xs index 150a33a21a..59458b948e 100644 --- a/dist/Data-Dumper/Dumper.xs +++ b/dist/Data-Dumper/Dumper.xs @@ -22,7 +22,7 @@ * calling this .xs file for releases where they aren't defined */ #ifndef ESC_NATIVE /* \e */ -# define ESC_NATIVE 27 +# define ESC_NATIVE LATIN1_TO_NATIVE(27) #endif /* SvPVCLEAR only from perl 5.25.6 */ |