diff options
| author | Chip Salzenberg <chip@pobox.com> | 1999-07-22 09:43:36 -0400 |
|---|---|---|
| committer | Gurusamy Sarathy <gsar@cpan.org> | 1999-07-26 11:03:07 +0000 |
| commit | f5d5a27c761624409884a263632e1a922439502b (patch) | |
| tree | c60b2eb2941b78a30c58667c88e3e27b071a5417 /dump.c | |
| parent | fad39ff13c300fe483c6155ea2883280e12fc89c (diff) | |
| download | perl-f5d5a27c761624409884a263632e1a922439502b.tar.gz | |
optimize method name lookup
Message-ID: <19990722134336.Q391@perlsupport.com>
Subject: [PATCH] OP_METHOD_NAMED
p4raw-id: //depot/perl@3768
Diffstat (limited to 'dump.c')
| -rw-r--r-- | dump.c | 1 |
1 files changed, 1 insertions, 0 deletions
@@ -522,6 +522,7 @@ Perl_do_op_dump(pTHX_ I32 level, PerlIO *file, OP *o) Perl_dump_indent(aTHX_ level, file, "GV = NULL\n"); break; case OP_CONST: + case OP_METHOD_NAMED: Perl_dump_indent(aTHX_ level, file, "SV = %s\n", SvPEEK(cSVOPo->op_sv)); break; case OP_SETSTATE: |