Mercurial > emacs
diff src/.gdbinit @ 64321:18dde5f76662
(pitx): Fix output format. Print string charpos.
author | Kim F. Storm <storm@cua.dk> |
---|---|
date | Thu, 14 Jul 2005 11:30:35 +0000 |
parents | a8fa7c632ee4 |
children | f14bee895419 532e0a9335a9 187d6a1f84f7 |
line wrap: on
line diff
--- a/src/.gdbinit Thu Jul 14 11:30:10 2005 +0000 +++ b/src/.gdbinit Thu Jul 14 11:30:35 2005 +0000 @@ -129,20 +129,24 @@ end if ($it->what == IT_CHARACTER) if ($it->len == 1 && $it->c >= ' ' && it->c < 255) - printf "ch='%c'", $it->c + printf " ch='%c'", $it->c else - printf "ch=[%d,%d]", $it->c, $it->len + printf " ch=[%d,%d]", $it->c, $it->len end else if ($it->what == IT_IMAGE) - printf "IMAGE=%d", $it->image_id + printf " IMAGE=%d", $it->image_id else + printf " " output $it->what end end if ($it->method != GET_FROM_BUFFER) printf " next=" output $it->method + if ($it->method == GET_FROM_STRING) + printf "[%d]", $it->current.string_pos.charpos + end end printf "\n" if ($it->region_beg_charpos >= 0)