make dump_bt work with unicode function names

diff --git a/.gdbinit b/.gdbinit
index 73eb43f257693e5351da96573ac5742640ea0cf9..fb0d4c824b4e3fb0f4eff215334e7f10190f9ebb 100644 (file)
--- a/.gdbinit
+++ b/.gdbinit
@@ -15,27 +15,6 @@ document ____executor_globals
        ZTS detection is automatically based on ext/standard module struct
 end
 
-define dump_bt
-       set $t = $arg0
-       while $t
-               printf "[0x%08x] ", $t
-               if $t->function_state.function->common.function_name
-                       printf "%s() ", $t->function_state.function->common.function_name
-               else
-                       printf "??? "
-               end
-               if $t->op_array != 0
-                       printf "%s:%d ", $t->op_array->filename, $t->opline->lineno
-               end
-               set $t = $t->prev_execute_data
-               printf "\n"
-       end
-end
-
-document dump_bt
-       dumps the current execution stack. usage: dump_bt executor_globals.current_execute_data
-end
-
 define printztype
        ____printz_type $arg0
        printf "\n"
@@ -146,6 +125,28 @@ document printt
        If unicode is 1 the function calls printu, else it uses printf.
 end
 
+define dump_bt
+       set $t = $arg0
+       while $t
+               printf "[0x%08x] ", $t
+               if $t->function_state.function->common.function_name
+                       printu $t->function_state.function->common.function_name.u 50
+                       printf "() "
+               else
+                       printf "??? "
+               end
+               if $t->op_array != 0
+                       printf "%s:%d ", $t->op_array->filename, $t->opline->lineno
+               end
+               set $t = $t->prev_execute_data
+               printf "\n"
+       end
+end
+
+document dump_bt
+       dumps the current execution stack. usage: dump_bt executor_globals.current_execute_data
+end
+
 define ____printzv_contents
        set $zvalue = $arg0
        set $type = $zvalue->type