summaryrefslogtreecommitdiff
path: root/utf8.c
diff options
context:
space:
mode:
authorKarl Williamson <public@khwilliamson.com>2011-05-19 21:10:15 -0600
committerKarl Williamson <public@khwilliamson.com>2011-05-20 08:49:19 -0600
commitbd3f2f9401e14d1dfc000f7f6b0f188ea43461fa (patch)
treec86662d09a0dd156c09ef6e85ff2aca8cd42f5ae /utf8.c
parent3df5101b1783b3f7e6ff145a0a810c25c512f8c5 (diff)
downloadperl-bd3f2f9401e14d1dfc000f7f6b0f188ea43461fa.tar.gz
utf8.c: revise comment
Diffstat (limited to 'utf8.c')
-rw-r--r--utf8.c5
1 files changed, 3 insertions, 2 deletions
diff --git a/utf8.c b/utf8.c
index 2c15946ae1..5f0e08ca78 100644
--- a/utf8.c
+++ b/utf8.c
@@ -2855,8 +2855,9 @@ Perl__swash_inversion_hash(pTHX_ SV* const swash)
* express the capitalization, for example, of all consecutive
* letters with a single line: 0061\t007A\t0041 This maps 0061 to
* 0041, 0062 to 0042, etc. I (khw) have never understood 'none',
- * and it's not documented, and perhaps not even currently used,
- * but I copied the semantics from swash_get(), just in case */
+ * and it's not documented; it appears to be used only in
+ * implementing tr//; I copied the semantics from swash_get(), just
+ * in case */
if (!none || val < none) {
++val;
}