summaryrefslogtreecommitdiff
path: root/gv.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2011-08-25 18:12:35 -0700
committerFather Chrysostomos <sprout@cpan.org>2011-08-25 23:02:10 -0700
commit8af2014272725e01526eb3ee0e591a9460cc770f (patch)
tree9bb3ec56b55df175f8616e380a6875ff1612a29c /gv.c
parent9d3c658e5c246089e541ed0d652aaccf018f16e9 (diff)
downloadperl-8af2014272725e01526eb3ee0e591a9460cc770f.tar.gz
&CORE::getpgrp()
This commit allows &CORE::getpgrp to be called through references and via ampersand syntax. pp_getpgrp is modified to take into account the nulls pushed on to the stack in pp_coreargs, since pp_coreargs has no other way to tell getpgrp how many arguments it’s actually getting.
Diffstat (limited to 'gv.c')
-rw-r--r--gv.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/gv.c b/gv.c
index 6f1756c96c..e22942523a 100644
--- a/gv.c
+++ b/gv.c
@@ -1354,7 +1354,7 @@ Perl_gv_fetchpvn_flags(pTHX_ const char *nambeg, STRLEN full_len, I32 flags,
case KEY_chdir:
case KEY_chomp: case KEY_chop:
case KEY_each: case KEY_eof: case KEY_exec:
- case KEY_getpgrp: case KEY_gmtime:
+ case KEY_gmtime:
case KEY_index: case KEY_keys:
case KEY_localtime: case KEY_lock: case KEY_lstat:
case KEY_mkdir: case KEY_open: case KEY_pop: