Mercurial > emacs

annotate admin/charsets/kuten.awk @ 103613:6a16d54ca1af

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
*** empty log message ***
author Michael Albinus <michael.albinus@gmx.de>
date Sun, 28 Jun 2009 15:22:37 +0000
parents e0e4e6a0599f
children ef719132ddfa
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 }
89916
e0e4e6a0599f Changes from arch/CVS synchronization
Miles Bader <miles@gnu.org>
parents: 88123
diff changeset
6
e0e4e6a0599f Changes from arch/CVS synchronization
Miles Bader <miles@gnu.org>
parents: 88123
diff changeset
7 # arch-tag: dade6b45-b4c5-42ab-9d49-d6bf23a710b6