summaryrefslogtreecommitdiff
path: root/op.c
diff options
context:
space:
mode:
authorDavid Mitchell <davem@iabyn.com>2010-12-31 14:53:24 +0000
committerDavid Mitchell <davem@iabyn.com>2011-01-02 20:00:27 +0000
commitbd31915d33b7eefea64e1a3f2416f804acf79df2 (patch)
treeb75838c4d4bbfeb64b1eac545f88532ef35316e7 /op.c
parentb66ea8c2ebe539e437c5c1ffe49a40f65c51456c (diff)
downloadperl-bd31915d33b7eefea64e1a3f2416f804acf79df2.tar.gz
ck_glob() - add a little code comment
Diffstat (limited to 'op.c')
-rw-r--r--op.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/op.c b/op.c
index 99d244cd9c..ba9e2e2c57 100644
--- a/op.c
+++ b/op.c
@@ -7638,7 +7638,7 @@ Perl_ck_glob(pTHX_ OP *o)
o = ck_fun(o);
if ((o->op_flags & OPf_KIDS) && !cLISTOPo->op_first->op_sibling)
- op_append_elem(OP_GLOB, o, newDEFSVOP());
+ op_append_elem(OP_GLOB, o, newDEFSVOP()); /* glob() => glob($_) */
if (!((gv = gv_fetchpvs("glob", GV_NOTQUAL, SVt_PVCV))
&& GvCVu(gv) && GvIMPORTED_CV(gv)))