diff options
author | Nicholas Clark <nick@ccl4.org> | 2008-01-24 13:25:05 +0000 |
---|---|---|
committer | Nicholas Clark <nick@ccl4.org> | 2008-01-24 13:25:05 +0000 |
commit | c25bf6989edf21dd302c4e306179cfffbc11bb5f (patch) | |
tree | 25d041060e081377bb256454dcd055d22feb2bfb /scope.c | |
parent | c6fdafd0fef3b735d3a7b9441840698d27fe4e6b (diff) | |
download | perl-c25bf6989edf21dd302c4e306179cfffbc11bb5f.tar.gz |
Merge CXt_LOOP_STACK's use of itermax for the reverse minimum with
iterary, as the two structure members are not used simultaneously.
p4raw-id: //depot/perl@33062
Diffstat (limited to 'scope.c')
-rw-r--r-- | scope.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -1097,7 +1097,7 @@ Perl_cx_dump(pTHX_ PERL_CONTEXT *cx) PerlIO_printf(Perl_debug_log, "BLK_LOOP.ITERIX = %ld\n", (long)cx->blk_loop.iterix); PerlIO_printf(Perl_debug_log, "BLK_LOOP.ITERARY = 0x%"UVxf"\n", - PTR2UV(cx->blk_loop.iterary)); + PTR2UV(cx->blk_loop.ary_min_u.iterary)); PerlIO_printf(Perl_debug_log, "BLK_LOOP.ITERVAR = 0x%"UVxf"\n", PTR2UV(CxITERVAR(cx))); if (CxITERVAR(cx)) |