diff options
author | Father Chrysostomos <sprout@cpan.org> | 2013-11-01 05:48:41 -0700 |
---|---|---|
committer | Father Chrysostomos <sprout@cpan.org> | 2013-11-01 12:41:01 -0700 |
commit | 307ed07106218f2ff26c0138504fc3da02cd262f (patch) | |
tree | 6aaaf8cd5854b76332c8d983588a55492d133b69 /toke.c | |
parent | 279b35adf32a369d98486e3ddcd7975d2e1863ab (diff) | |
download | perl-307ed07106218f2ff26c0138504fc3da02cd262f.tar.gz |
toke.c:S_tokeq: add comment
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 2 |
1 files changed, 1 insertions, 1 deletions
@@ -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); |