1
0
mirror of https://git.savannah.gnu.org/git/emacs.git synced 2024-12-25 10:47:00 +00:00
emacs/admin/charsets/kuten.awk
2004-04-19 20:08:38 +00:00

8 lines
161 B
Awk

/^[0-9]/ {
ku=substr($1, 3, 2) + 32;
ten=substr($1, 5, 2) + 32;
printf "0x%02X%02X %s\n", ku, ten, $2;
}
# arch-tag: dade6b45-b4c5-42ab-9d49-d6bf23a710b6