glibc/iconvdata/gap.pl
Ulrich Drepper f5baa731d0 Update.
* 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>
1998-03-31 22:46:26 +00:00

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);