diff options
author | Father Chrysostomos <sprout@cpan.org> | 2011-10-01 06:30:35 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2011-10-01 06:33:49 -0700 |
commit | ba6ff154b0d807025f5294b2c3e9623fd60a6e97 (patch) | |
tree | 93f8ddbbe96480fc1a61caaa2b9599d59319d7a6 /mpeix | |
parent | d78f9ffa7317e24a5eaf54a2cf107e6663784159 (diff) | |
download | perl-ba6ff154b0d807025f5294b2c3e9623fd60a6e97.tar.gz |
[perl #99984] Incorrect errmsg with our $::é
Having PL_parser->error_count set to non-zero when utf8_heavy.pl tries
to do() one of its swashes results in ‘Compilation error’ being placed
in $@ during the do, even if it was successful. This patch sets the
error_count to 0 before calling SWASHNEW, to prevent that. It uses
SAVEI8, to make sure it is restored on scope exit.
Diffstat (limited to 'mpeix')
0 files changed, 0 insertions, 0 deletions