mirror of
git://sourceware.org/git/glibc.git
synced 2024-11-27 03:41:23 +08:00
f5baa731d0
* sysdeps/generic/dl-sysdep.c (_dl_important_hwcaps): Fix typo. * iconvdata/gap.pl: Avoid using %#06x. 1998-03-31 19:55 Zack Weinberg <zack@rabi.phys.columbia.edu> * Makerules: Use $? instead of S^ when invoking ar. 1998-03-31 Ulrich Drepper <drepper@cygnus.com>
17 lines
395 B
Raku
17 lines
395 B
Raku
$first=$last=$idx=0;
|
|
while (<>) {
|
|
local($ucs,$rest) = split;
|
|
local($u)=hex($ucs);
|
|
if ($u - $last > 6) {
|
|
if ($last != 0) {
|
|
printf (" { start: 0x%04x, end: 0x%04x, idx: %5d },\n",
|
|
$first, $last, $idx - $first);
|
|
$idx += $last - $first + 1;
|
|
}
|
|
$first=$u;
|
|
}
|
|
$last=$u;
|
|
}
|
|
printf (" { start: 0x%04x, end: 0x%04x, idx: %5d },\n",
|
|
$first, $last, $idx - $first);
|