utf8.c: Comment non-obvious fcn param meaning

Perl · Jun 14, 2021 · d540b30 · d540b30
1 parent 5c7539f
commit d540b30
Showing 1 changed file with 2 additions and 1 deletion.
diff --git a/utf8.c b/utf8.c
@@ -286,7 +286,8 @@ Perl_uvoffuni_to_utf8_flags_msgs(pTHX_ U8 *d, UV input_uv, const UV flags, HV**
             if (UNLIKELY(      input_uv > MAX_LEGAL_CP
                          && ! (flags & UNICODE_ALLOW_ABOVE_IV_MAX)))
             {
-                Perl_croak(aTHX_ "%s", form_cp_too_large_msg(16, NULL, 0, input_uv));
+                Perl_croak(aTHX_ "%s", form_cp_too_large_msg(16, /* Hex output */
+                                                             NULL, 0, input_uv));
             }
             if (       (flags & UNICODE_WARN_SUPER)
                 || (   (flags & UNICODE_WARN_PERL_EXTENDED)