summaryrefslogtreecommitdiff
path: root/toke.c
diff options
context:
space:
mode:
authorFather Chrysostomos <sprout@cpan.org>2013-11-01 05:48:41 -0700
committerFather Chrysostomos <sprout@cpan.org>2013-11-01 12:41:01 -0700
commit307ed07106218f2ff26c0138504fc3da02cd262f (patch)
tree6aaaf8cd5854b76332c8d983588a55492d133b69 /toke.c
parent279b35adf32a369d98486e3ddcd7975d2e1863ab (diff)
downloadperl-307ed07106218f2ff26c0138504fc3da02cd262f.tar.gz
toke.c:S_tokeq: add comment
Diffstat (limited to 'toke.c')
-rw-r--r--toke.c2
1 files changed, 1 insertions, 1 deletions
diff --git a/toke.c b/toke.c
index f6e779b2b9..f9d0a62dc9 100644
--- a/toke.c
+++ b/toke.c
@@ -2520,7 +2520,7 @@ S_tokeq(pTHX_ SV *sv)
assert (SvPOK(sv));
assert (SvLEN(sv));
assert (!SvIsCOW(sv));
- if (SvTYPE(sv) >= SVt_PVIV && SvIVX(sv) == -1)
+ if (SvTYPE(sv) >= SVt_PVIV && SvIVX(sv) == -1) /* <<'heredoc' */
goto finish;
s = SvPVX(sv);
send = SvEND(sv);