This is a live mirror of the Perl 5 development currently hosted at
https://github.com/perl/perl5
https://perl5.git.perl.org
/
perl5.git
/ commitdiff
commit
grep
author
committer
pickaxe
?
search:
re
summary
|
shortlog
|
log
|
commit
| commitdiff |
tree
raw
|
patch
| inline |
side by side
(parent:
5656b1f
)
gv.c: document where @- and @+ (and %- and %+ are initialized in gv.c)
author
Yves Orton
<demerphq@gmail.com>
Thu, 13 Oct 2016 16:41:00 +0000
(18:41 +0200)
committer
Yves Orton
<demerphq@gmail.com>
Wed, 19 Oct 2016 11:27:59 +0000
(13:27 +0200)
gv.c
patch
|
blob
|
blame
|
history
diff --git
a/gv.c
b/gv.c
index
3237c53
..
3652ee2
100644
(file)
--- a/
gv.c
+++ b/
gv.c
@@
-2097,8
+2097,8
@@
S_gv_magicalize(pTHX_ GV *gv, HV *stash, const char *name, STRLEN len,
require_tie_mod(gv, '!', "Errno", 5, 1);
break;
- case '-': /* $- */
- case '+': /* $+ */
+ case '-': /* $-
, %-, @-
*/
+ case '+': /* $+
, %+, @+
*/
GvMULTI_on(gv); /* no used once warnings here */
{
AV* const av = GvAVn(gv);