summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorDave Mitchell <davem@fdisolutions.com>2007-05-05 17:38:12 +0000
committerDave Mitchell <davem@fdisolutions.com>2007-05-05 17:38:12 +0000
commitbc177e6b66d4907a90c81f2862ce55ad78b6496f (patch)
treec5d5a48ea379b96c206696e7091532a97420284c /op.c
parent7c1f70cbf29b1c0cfc4cf8a13260aa01453de093 (diff)
downloadperl-bc177e6b66d4907a90c81f2862ce55ad78b6496f.tar.gz
move PL_lex_state into the PL_parser struct
p4raw-id: //depot/perl@31154
Diffstat (limited to 'op.c')
-rw-r--r--op.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/op.c b/op.c
index 2f043c065e..40b415d924 100644
--- a/op.c
+++ b/op.c
@@ -2818,7 +2818,7 @@ Perl_mad_free(pTHX_ MADPROP* mp)
return;
if (mp->mad_next)
mad_free(mp->mad_next);
-/* if (PL_lex_state != LEX_NOTPARSING && mp->mad_vlen)
+/* if (PL_parser && PL_parser->lex_state != LEX_NOTPARSING && mp->mad_vlen)
PerlIO_printf(PerlIO_stderr(), "DESTROYING '%c'=<%s>\n", mp->mad_key & 255, mp->mad_val); */
switch (mp->mad_type) {
case MAD_NULL: