X-Git-Url: https://git.jankratochvil.net/?p=nethome.git;a=blobdiff_plain;f=.gdbinit;h=f31f82fbbb76623cf5f77b7b52231d0d9bd20c4c;hp=1fbf9687eb9466deabaa1682bb6c64ac2c45c868;hb=e7cafb4c67bc388c7e4bcef1b7719944910a34f8;hpb=02c2070831c36926e60e1aaa6323cf2fa39757dd diff --git a/.gdbinit b/.gdbinit index 1fbf968..f31f82f 100644 --- a/.gdbinit +++ b/.gdbinit @@ -1,9 +1,12 @@ +set break pending on +set style enabled off # See .bashrc: export GDBHISTFILE="$HOME/.gdb_history" # Should also work (untested): # set history filename ~/.gdb_history set history save on # https://bugzilla.redhat.com/bugzilla/show_bug.cgi?id=106814 set complaints 0 +set record insn-number-max 10000000 define javadump call _Jv_DeepDebug($arg0) end @@ -34,14 +37,31 @@ define plist if $argc==1 print *$plist_iter else - print $plist_iter->$arg1 + if $argc==2 + print $plist_iter->$arg1 + else + print$arg2 $plist_iter->$arg1 + end end set var $plist_iter=$plist_iter->next end end document plist List dumper iterating by `->next': -plist [] +plist [] [/] +end +define countlist + set var $countlist_iter=$arg0 + set var $countlist_count=0 + while ($countlist_iter) + set var $countlist_iter=$countlist_iter->next + set var $countlist_count=$countlist_count+1 + end + p $countlist_count +end +document countlist +List elements counter iterating by `->next': +countlist end define debug set debug infrun 1 @@ -51,3 +71,20 @@ document debug set debug infrun 1 set debug lin-lwp 1 end +define sip + stepi + x/i $pc +end +define nip + nexti + x/i $pc +end + +define mycommand + set $i = 0 + set $foo1=$arg1 + while $i < $argc + eval "print $foo%d", $i + set $i = $i + 1 + end +end