summaryrefslogtreecommitdiff
path: root/perl.c
diff options
context:
space:
mode:
authorGurusamy Sarathy <gsar@cpan.org>2000-04-27 19:46:57 +0000
committerGurusamy Sarathy <gsar@cpan.org>2000-04-27 19:46:57 +0000
commit24944567cd431bac90d270c4c84c69294f9784d9 (patch)
tree126e4c88f0f364266fd45633bcf4a0c23e260b30 /perl.c
parentbf93d4cc8827842d1e2d40eecc0cc5927a17f3cd (diff)
downloadperl-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.c1
1 files changed, 1 insertions, 0 deletions
diff --git a/perl.c b/perl.c
index e7a9bc27a9..f81648c80d 100644
--- a/perl.c
+++ b/perl.c
@@ -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;
}