This is a live mirror of the Perl 5 development currently hosted at https://github.com/perl/perl5
Thinko in vms.c:copy_expand_unix_filename_escape().
authorCraig A. Berry <craigberry@mac.com>
Sun, 28 Aug 2011 20:42:58 +0000 (15:42 -0500)
committerCraig A. Berry <craigberry@mac.com>
Sun, 28 Aug 2011 20:42:58 +0000 (15:42 -0500)
commitb931d62c227b836ffd6f1ffd92c58d4e1b859fb8
tree39ed209eac5e020e451bd1365603d2127d79b9c1
parenta62da8e6727f34e800a1b8c33214cc22c872ad0e
Thinko in vms.c:copy_expand_unix_filename_escape().

Turns out comparing a signed byte to values above 0x7f doesn't make
sense.  *All* signed byte integers are less than or equal to 0x9f,
so the other two branches of the if could never be taken.

This code probably needs more review and testing, but we might as
well make it do what it intends to do before reviewing those
intentions and factoring out some of the copy-and-paste verbosity.
vms/vms.c