diff options
author | Karl Williamson <public@khwilliamson.com> | 2013-04-06 12:56:52 -0600 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2013-08-29 09:56:06 -0600 |
commit | 2ca8589c5190f9016bfcdbc996f56ad0b8557fef (patch) | |
tree | 317f5b4f693d9429ff62160b62ec6ec79bfdd864 /regcomp.c | |
parent | 80e0b38f646b11e453a9c2a9b9246021446ff851 (diff) | |
download | perl-2ca8589c5190f9016bfcdbc996f56ad0b8557fef.tar.gz |
regcomp.c: In EBCDIC [i-j] exclude also ASCII
i and j are not adjacent in EBCDIC. This excluded any alphabetic
characters between them, but allowed other ascii ones.
Diffstat (limited to 'regcomp.c')
-rw-r--r-- | regcomp.c | 2 |
1 files changed, 2 insertions, 0 deletions
@@ -13191,6 +13191,8 @@ parseit: && (prevvalue >= 'a' && value <= 'z') || (prevvalue >= 'A' && value <= 'Z')) { + _invlist_intersection(this_range, PL_ASCII, + &this_range); _invlist_intersection(this_range, PL_Posix_ptrs[_CC_ALPHA], &this_range); } |