diff options
| author | Nicholas Clark <nick@ccl4.org> | 2006-09-01 16:27:48 +0000 |
|---|---|---|
| committer | Nicholas Clark <nick@ccl4.org> | 2006-09-01 16:27:48 +0000 |
| commit | 1c75a43bf7257081c0bfa53f793afc33ee95ff02 (patch) | |
| tree | 37fb00e35dc65350aa84c0ec579e2f9aff43ef62 /scope.c | |
| parent | 006bba40b64d69fcc85f3e7a0fe4b845e93164c0 (diff) | |
| download | perl-1c75a43bf7257081c0bfa53f793afc33ee95ff02.tar.gz | |
Access to cx->blk_sub.lval via macros (as it's about to move).
p4raw-id: //depot/perl@28773
Diffstat (limited to 'scope.c')
| -rw-r--r-- | scope.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1045,7 +1045,7 @@ Perl_cx_dump(pTHX_ PERL_CONTEXT *cx) PerlIO_printf(Perl_debug_log, "BLK_SUB.HASARGS = %d\n", (int)CX_SUB_HASARGS_GET(cx)); PerlIO_printf(Perl_debug_log, "BLK_SUB.LVAL = %d\n", - (int)cx->blk_sub.lval); + (int)CX_SUB_LVAL(cx)); PerlIO_printf(Perl_debug_log, "BLK_SUB.RETOP = 0x%"UVxf"\n", PTR2UV(cx->blk_sub.retop)); break; |