Branch: refs/heads/blead
Home: https://github.com/Perl/perl5
Commit: 907549069d51f344f31646b6ff2107bd43593781
https://github.com/Perl/perl5/commit/907549069d51f344f31646b6ff2107bd43593781
Author: Mike Fulton <[email protected]>
Date: 2022-01-01 (Sat, 01 Jan 2022)
Changed paths:
M util.c
Log Message:
-----------
z/OS ASCII needs file descriptors on pipes tagged as ASCII
Add code to change the file descriptor on the file descriptors opened from
``Perl_my_popen_list`` and ``Perl_my_popen`` so that the CCSID of the file
descriptor is 819. This change is only when the code is built for
ASCII ``#if (__CHARSET_LIB == 1)`` on z/OS ``#if defined(OEMVS)``.