[perl #43425] local $[: fix scoping during parser error handling.
authorDave Mitchell <davem@fdisolutions.com>
Mon, 16 Jul 2007 13:15:37 +0000 (13:15 +0000)
committerDave Mitchell <davem@fdisolutions.com>
Mon, 16 Jul 2007 13:15:37 +0000 (13:15 +0000)
commit503de4705ff6537018ae94e9179e16636748b2a6
treed022d6d730a079eac8721ce355c9ae08c781a689
parent4629c4f60ec83d0f102cd8ac641c8eefa2bb4a6f
 [perl #43425] local $[: fix scoping during parser error handling.

 Change 22306# inadvertently made 'local $[' statement-scoped
 rather than block-scoped; so revert that change and add a
 different fix. The problem was to ensure that the savestack got
 popped correctly while popping errored tokens. We how record the
 current value of PL_savestack_ix with each pushed parser state.

p4raw-id: //depot/perl@31615
op.c
pad.c
parser.h
perly.act
perly.c
perly.tab
perly.y
t/op/local.t