develooper Front page | perl.perl5.porters | Postings from April 2014

z/OS regcomp.c

From:
Yaroslav Kuzmin
Date:
April 25, 2014 08:45
Subject:
z/OS regcomp.c
Message ID:
c82e132abf354affae8e24f2d995b515@wal-s-mbx2.rocketsoftware.com
perl-5.19

In file regcomp.c in function  S_regclass in define EBCDIC

string

14002             if (literal_endpoint == 2
14003                 && ((prevvalue >= 'a' && value <= 'z')
14004                     || (prevvalue >= 'A' && value <= 'Z')))
14005             {
14006                 _invlist_intersection(this_range, PL_ASCII,
14007                                       &this_range);

Old define PL_ASCII .



------------------------------------------------------------------------
 Yaroslav Kuzmin
Developer C/C++ ,z/OS , Linux
3 Zhukovskiy Street * Miass, Chelyabinsk region 456318 * Russia
Tel:  +7.922.2.38.33.38
Email: YKuzmin@rocketsoftware.com
Web: www.rocketsoftware.com



nntp.perl.org: Perl Programming lists via nntp and http.
Comments to Ask Bjørn Hansen at ask@perl.org | Group listing | About