# HG changeset patch
# User Kenichi Handa <handa@m17n.org>
# Date 1246947945 0
# Node ID e949a1712db66f77746d08f2c482c63ad3ae656b
# Parent  851a95a239f8fa82aeed0f0fa2d07812231f036d
(xcharset): Fix the treating $arg0.

diff -r 851a95a239f8 -r e949a1712db6 src/.gdbinit
--- a/src/.gdbinit	Tue Jul 07 06:25:20 2009 +0000
+++ b/src/.gdbinit	Tue Jul 07 06:25:45 2009 +0000
@@ -1009,7 +1009,7 @@
 define xcharset
   set $tmp = (struct Lisp_Hash_Table *) ((Vcharset_hash_table & $valmask) | gdb_data_seg_bits)
   set $tmp = (struct Lisp_Vector *) (($tmp->key_and_value & $valmask) | gdb_data_seg_bits)
-  p $tmp->contents[$arg0->hash_index * 2]
+  p $tmp->contents[charset_table[$arg0].hash_index * 2]
   pr
 end
 document xcharset