From: Marcus Boerger Date: Sun, 13 Jul 2008 21:26:53 +0000 (+0000) Subject: - Improve/fix debugging experience X-Git-Tag: BEFORE_HEAD_NS_CHANGE~1286 X-Git-Url: https://granicus.if.org/sourcecode?a=commitdiff_plain;h=5e9f4b26db8ffc5cb1e5ebca597f220130e572fb;p=php - Improve/fix debugging experience --- diff --git a/.gdbinit b/.gdbinit index 522f16de2d..fbc211a36c 100644 --- a/.gdbinit +++ b/.gdbinit @@ -95,8 +95,8 @@ define ____printzv_contents set $zvalue = $arg0 set $type = $zvalue->type - printf "(refcount=%d", $zvalue->refcount - if $zvalue->is_ref + printf "(refcount=%d", $zvalue->refcount__gc + if $zvalue->is_ref__gc printf ",is_ref" end printf ") " @@ -181,7 +181,20 @@ define ____printzv_contents if $type == 9 end if $type == 10 - printf "(%d): [%p]", $zvalue->value.str.len, $zvalue->value.str.val + printf "(%d): [%p]: \"", $zvalue->value.str.len, $zvalue->value.str.val + set $pos = 0 + while $pos < 20 && $pos < $zvalue->value.str.len + if $zvalue->value.ustr.val[$pos] < 256 + printf "%c", $zvalue->value.ustr.val[$pos] + else + printf "\\u%04X", $zvalue->value.ustr.val[$pos] + end + set $pos = $pos + 1 + end + printf "\"" + if $pos < $zvalue->value.str.len + printf "[...]" + end end if $type > 10 end