summaryrefslogtreecommitdiff
path: root/utf8.c
diff options
context:
space:
mode:
authorKarl Williamson <khw@cpan.org>2021-09-05 06:08:20 -0600
committerKarl Williamson <khw@cpan.org>2021-09-05 06:09:49 -0600
commit8447f104452d870a4b784b7522cd54f1904b3b07 (patch)
treea699b197eee24493e110a56531cc5fc8f7981ead /utf8.c
parentfcf33192bfaec4d136c9be98d24673ee37acab7c (diff)
downloadperl-8447f104452d870a4b784b7522cd54f1904b3b07.tar.gz
utf8.c: White-space, comment only
Diffstat (limited to 'utf8.c')
-rw-r--r--utf8.c21
1 files changed, 11 insertions, 10 deletions
diff --git a/utf8.c b/utf8.c
index 98ec8dedc9..988527506b 100644
--- a/utf8.c
+++ b/utf8.c
@@ -3166,22 +3166,23 @@ Perl__is_utf8_perl_idcont(pTHX_ const U8 *p, const U8 * const e)
}
STATIC UV
-S_to_case_cp_list(pTHX_ const UV original,
- const U32 ** const remaining_list,
- Size_t * remaining_count,
- SV *invlist, const I32 * const invmap,
- const U32 * const * const aux_tables,
- const U8 * const aux_table_lengths,
- const char * const normal)
+S_to_case_cp_list(pTHX_
+ const UV original,
+ const U32 ** const remaining_list,
+ Size_t * remaining_count,
+ SV *invlist, const I32 * const invmap,
+ const U32 * const * const aux_tables,
+ const U8 * const aux_table_lengths,
+ const char * const normal)
{
SSize_t index;
I32 base;
- /* Return the changed case of code point 'original'. The first code point of
- * the changed case is returned.
+ /* Calculate the changed case of code point 'original'. The first code
+ * point of the changed case is returned.
*
* If 'remaining_count' is not NULL, *remaining_count will be set to how
- * many other code points are in the changed case. If non-zero and
+ * many *other* code points are in the changed case. If non-zero and
* 'remaining_list' is also not NULL, *remaining_list will be set to point
* to a non-modifiable array containing the second and potentially third
* code points in the changed case. (Unicode guarantees a maximum of 3.)