diff options
| author | Father Chrysostomos <sprout@cpan.org> | 2014-08-26 22:37:03 -0700 |
|---|---|---|
| committer | Father Chrysostomos <sprout@cpan.org> | 2014-08-28 13:04:17 -0700 |
| commit | 8ce2f624198802e520eba6523c32ad6429463198 (patch) | |
| tree | d94c81a3414c97c6434b2a06157aa684b651e385 /intrpvar.h | |
| parent | f9ce0dc199e851f50f497823f03a06ae52048045 (diff) | |
| download | perl-8ce2f624198802e520eba6523c32ad6429463198.tar.gz | |
intrpvar.h: Correct comment
This description has been a little faulty for quite some time, not
just because of the last few commits. Any time pad_free or pad_swipe
is called, that pad slot becomes available and PL_padix is reset.
So ‘max used’ is not accurate.
Diffstat (limited to 'intrpvar.h')
| -rw-r--r-- | intrpvar.h | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/intrpvar.h b/intrpvar.h index be61875b88..db763adb36 100644 --- a/intrpvar.h +++ b/intrpvar.h @@ -531,7 +531,8 @@ PERLVAR(I, subline, I32) /* line this subroutine began on */ PERLVAR(I, min_intro_pending, I32) /* start of vars to introduce */ PERLVAR(I, max_intro_pending, I32) /* end of vars to introduce */ -PERLVAR(I, padix, I32) /* max used index in current "register" pad */ +PERLVAR(I, padix, I32) /* lowest unused index - 1 + in current "register" pad */ PERLVAR(I, padix_floor, I32) /* how low may inner block reset padix */ |