diff options
author | Karl Williamson <public@khwilliamson.com> | 2011-02-21 09:56:25 -0700 |
---|---|---|
committer | Karl Williamson <public@khwilliamson.com> | 2011-02-21 10:21:04 -0700 |
commit | 967ac236227eee0c091ece49aec6630bc8536093 (patch) | |
tree | 5292a3466ce1c71582a7767bf2e14de4d1deb875 /toke.c | |
parent | c4a9334d2d9cc374d75c8b8254d4703b6983749f (diff) | |
download | perl-967ac236227eee0c091ece49aec6630bc8536093.tar.gz |
toke.c: fix comment
Diffstat (limited to 'toke.c')
-rw-r--r-- | toke.c | 5 |
1 files changed, 3 insertions, 2 deletions
@@ -8791,8 +8791,9 @@ S_pmflag(pTHX_ const char* const valid_flags, U32 * pmfl, char** s) { * following the 'e'). Otherwise, we resolve to the backwards- * compatible, but less likely 's/// le ...', i.e. as meaning * less-than-or-equal. The reason it's not likely is that s// - * returns a number, and so '<=' should be used for comparing, not - * 'le'. */ + * returns a number for code in the field (/r returns a string, but + * that wasn't added until the 5.13 series), and so '<=' should be + * used for comparing, not 'le'. */ if (*((*s) + 1) == 't') { goto deprecate; } |