diff options
author | Father Chrysostomos <sprout@cpan.org> | 2012-04-28 00:18:30 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2012-12-09 18:47:20 -0800 |
commit | c58b680b06b94939ee921d7062cd14927136ae30 (patch) | |
tree | e8012ebb94b4e9a7bee7bfebc5f073744237b7f9 /pp_sys.c | |
parent | 9423a867e1bcf854b0ed9fff9eacaadd6f48ca8d (diff) | |
download | perl-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.c | 4 |
1 files changed, 0 insertions, 4 deletions
@@ -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; } |