fix hash dump gdb function

diff --git a/support-d/.gdbinit b/support-d/.gdbinit
index 329bc347776fba95891f6a81bd1cc4182e7b7e67..eb94cc908b5f63b6e2b6a2f6731ef614a6ca13e9 100755 (executable)
--- a/support-d/.gdbinit
+++ b/support-d/.gdbinit
@@ -29,14 +29,16 @@ define hash_it_str
        set $i = 0
        set $idx = 0
        set $len = $arg0->tablelength
+       printf "len: %d\n", $arg0->tablelength
 
        while($idx < $len)
-         set $x=$arg0->table->[$idx]
+         set $x = $arg0->table[$idx]
          while($x != 0x0)
            printf "key: %s valueptr: %p\n", $x->k, $x->v
            set $x = $x->next
            set $i = $i + 1
          end
+         set $idx = $idx + 1
        end
 end
 document hash_it_str