diff options
author | Gurusamy Sarathy <gsar@cpan.org> | 2000-04-27 19:46:57 +0000 |
---|---|---|
committer | Gurusamy Sarathy <gsar@cpan.org> | 2000-04-27 19:46:57 +0000 |
commit | 24944567cd431bac90d270c4c84c69294f9784d9 (patch) | |
tree | 126e4c88f0f364266fd45633bcf4a0c23e260b30 /perl.c | |
parent | bf93d4cc8827842d1e2d40eecc0cc5927a17f3cd (diff) | |
download | perl-24944567cd431bac90d270c4c84c69294f9784d9.tar.gz |
change#4197 somehow missed initializing PL_errors, meaning
sytax error queueing wasn't working outside eval"" at all;
also fixed eval"" to localize PL_error_count, so that compile-time
eval's don't clobber the error state of the outer context
p4raw-link: @4197 on //depot/perl: 5a844595b9262407e093364ec4d29a22962723f0
p4raw-id: //depot/perl@5974
Diffstat (limited to 'perl.c')
-rw-r--r-- | perl.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -276,6 +276,7 @@ perl_construct(pTHXx) PL_fdpid = newAV(); /* for remembering popen pids by fd */ PL_modglobal = newHV(); /* pointers to per-interpreter module globals */ + PL_errors = newSVpvn("",0); ENTER; } |