regen/mk_invlists.pl: Output code points as hex

Unicode represents all code points as hex, so follow suit.
I, for one, am used to seeing hex code points, and so eyeballing these
makes more sense when they are in hex.

1 files changed, 4 insertions, 5 deletions

diff --git a/regen/mk_invlists.pl b/regen/mk_invlists.pl
index 9dcc8c3ade..4e3160f276 100644
--- a/regen/mk_invlists.pl
+++ b/regen/mk_invlists.pl
@@ -77,13 +77,12 @@ sub output_invlist ($$;$) {
 
     # The main body are the UVs passed in to this routine.  Do the final
     # element separately
-    for my $i (0 .. @$invlist - 1 - 1) {
-        print $out_fh "\t$invlist->[$i],\n";
+    for my $i (0 .. @$invlist - 1) {
+        printf $out_fh "\t0x%X", $invlist->[$i];
+        print $out_fh "," if $i < @$invlist - 1;
+        print $out_fh "\n";
     }
 
-    # The final element does not have a trailing comma, as C can't handle it.
-    print $out_fh "\t$invlist->[-1]\n";
-
     print $out_fh "};\n";
 }