Mercurial > emacs

annotate admin/charsets/kuten.awk @ 89731:e4b184cef172

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Kenichi Handa <handa@m17n.org>
date Sat, 24 Jan 2004 09:13:35 +0000
parents 375f2633d815
children e0e4e6a0599f
Ignore whitespace changes - Everywhere: Within whitespace: At end of lines:
rev   line source
88123
375f2633d815 New directory
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
1 /^[0-9]/ {
375f2633d815 New directory
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
2 ku=substr($1, 3, 2) + 32;
375f2633d815 New directory
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
3 ten=substr($1, 5, 2) + 32;
375f2633d815 New directory
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
4 printf "0x%02X%02X %s\n", ku, ten, $2;
375f2633d815 New directory
Kenichi Handa <handa@m17n.org>
parents:
diff changeset
5 }