diff options
| author | Vincent Pit <perl@profvince.com> | 2012-06-22 15:55:55 +0200 |
|---|---|---|
| committer | Vincent Pit <perl@profvince.com> | 2012-06-22 15:56:29 +0200 |
| commit | 83f29afad70b612d23a170f28fca57f0c8ca24af (patch) | |
| tree | 9f78339bae9fdd7957da5b2283e39cce20274318 /regen | |
| parent | 7762c3748b5616504fc9a8c5dd0c0e078d85eec5 (diff) | |
| download | perl-83f29afad70b612d23a170f28fca57f0c8ca24af.tar.gz | |
Reset the iterator when an array is cleared
This fixes RT #75596.
Diffstat (limited to 'regen')
| -rw-r--r-- | regen/mg_vtable.pl | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/regen/mg_vtable.pl b/regen/mg_vtable.pl index 5d0710f904..bfc13e264d 100644 --- a/regen/mg_vtable.pl +++ b/regen/mg_vtable.pl @@ -121,7 +121,7 @@ my %sig = 'isa' => {set => 'setisa', clear => 'clearisa'}, 'isaelem' => {set => 'setisa'}, 'arylen' => {get => 'getarylen', set => 'setarylen', const => 1}, - 'arylen_p' => {free => 'freearylen_p'}, + 'arylen_p' => {clear => 'cleararylen_p', free => 'freearylen_p'}, 'mglob' => {set => 'setmglob'}, 'nkeys' => {get => 'getnkeys', set => 'setnkeys'}, 'taint' => {get => 'gettaint', set => 'settaint'}, |