summaryrefslogtreecommitdiff
path: root/pp_sys.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2012-04-28 00:18:30 -0700
committerFather Chrysostomos <sprout@cpan.org>2012-12-09 18:47:20 -0800
commitc58b680b06b94939ee921d7062cd14927136ae30 (patch)
treee8012ebb94b4e9a7bee7bfebc5f073744237b7f9 /pp_sys.c
parent9423a867e1bcf854b0ed9fff9eacaadd6f48ca8d (diff)
downloadperl-c58b680b06b94939ee921d7062cd14927136ae30.tar.gz
Stop using PL_glob_index for PL_globhook
If Glob.xs just uses the address of PL_op as its iterator key all the time (when called via PL_globhook too, not just via a glob override), the code is simpler.
Diffstat (limited to 'pp_sys.c')
-rw-r--r--pp_sys.c4
1 files changed, 0 insertions, 4 deletions
diff --git a/pp_sys.c b/pp_sys.c
index 06b3684261..ec77763723 100644
--- a/pp_sys.c
+++ b/pp_sys.c
@@ -376,11 +376,7 @@ PP(pp_glob)
* */
return NORMAL;
}
- /* stack args are: wildcard, gv(_GEN_n) */
-
if (PL_globhook) {
- PUSHs(GvSV(gv));
- PUTBACK;
PL_globhook(aTHX);
return NORMAL;
}