Mercurial > emacs

annotate admin/charsets/kuten.awk @ 95081:23f390d273ba

Find changesets by keywords (author, files, the commit message), revision number or hash, or revset expression.
(calc-init-extensions): Add keybindings for `calc-copy-to-register' and `calc-insert-register'. Autoload new register functions.
author Jay Belanger <jay.p.belanger@gmail.com>
date Sun, 18 May 2008 20:34:30 +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