# HG changeset patch
# User Kim F. Storm <storm@cua.dk>
# Date 1155549492 0
# Node ID 00776be184664b12e479ef84762793b8556d7225
# Parent  3200b18b9e9e41958ac9349d4b7e7a342c932adb
(pitx): Print iterator position.
Limit stack dump in case iterator is not initialized.

diff -r 3200b18b9e9e -r 00776be18466 src/.gdbinit
--- a/src/.gdbinit	Mon Aug 14 09:58:03 2006 +0000
+++ b/src/.gdbinit	Mon Aug 14 09:58:12 2006 +0000
@@ -164,6 +164,10 @@
   if ($it->current.pos.charpos != $it->current.pos.bytepos)
     printf "[%d]", $it->current.pos.bytepos
   end
+  printf " pos=%d", $it->position.charpos
+  if ($it->position.charpos != $it->position.bytepos)
+    printf "[%d]", $it->position.bytepos
+  end
   printf " start=%d", $it->start.pos.charpos
   if ($it->start.pos.charpos != $it->start.pos.bytepos)
     printf "[%d]", $it->start.pos.bytepos
@@ -218,7 +222,7 @@
   printf " max=%d+%d=%d", $it->max_ascent, $it->max_descent, $it->max_ascent+$it->max_descent
   printf "\n"
   set $i = 0
-  while ($i < $it->sp)
+  while ($i < $it->sp && $i < 4)
     set $e = $it->stack[$i]
     printf "stack[%d]: ", $i
     output $e->method