testsuite/lib/mi-support.exp

800 proc mi_runto {func} {
809   set test "mi runto $func"
810   mi_gdb_test "200-break-insert $func" \
811     "200\\^done,bkpt=\{number=\"\[0-9\]+\",type=\"breakpoint\",disp=\"keep\",enabled=\"y\",addr=\"$hex\",func=\"$func\",file=\".*\",line=\"\[0-9\]*\",times=\"0\"\}" \
812     "breakpoint at $func"
821     -re ".*000\\*stopped,reason=\"breakpoint-hit\",bkptno=\"$bkptno\",thread-id=\"$decimal\",frame=\{addr=\"$hex\",func=\"$func\",args=\(\\\[.*\\\]\|\{.*\}\),file=\".*\",line=\"\[0-9\]*\"\}\r\n$mi_gdb_prompt$" {
857 proc mi_execute_to_helper { cmd reason func args file line extra test } {
867 	-re ".*220\\^running\r\n${mi_gdb_prompt}.*220\\*stopped,reason=\"$reason\",thread-id=\"$decimal\",frame=\{addr=\"$hex\",func=\"$func\",args=$args,file=\".*$file\",line=\"$line\"\}$extra\r\n$mi_gdb_prompt$" {
871 	-re ".*220\\^running\r\n${mi_gdb_prompt}.*220\\*stopped,reason=\"$reason\",thread-id=\"$decimal\",frame=\{addr=\"$hex\",func=\".*\",args=\[\\\[\{\].*\[\\\]\}\],file=\".*\",line=\"\[0-9\]*\"\}.*\r\n$mi_gdb_prompt$" {
886 proc mi_execute_to { cmd reason func args file line extra test } {
887     mi_execute_to_helper "$cmd" "$reason" "$func" "\\\[$args\\\]" \
891 proc mi_next_to { func args file line test } {
892     mi_execute_to "exec-next" "end-stepping-range" "$func" "$args" \
896 proc mi_step_to { func args file line test } {
897     mi_execute_to "exec-step" "end-stepping-range" "$func" "$args" \
901 proc mi_finish_to { func args file line result ret test } {
902     mi_execute_to "exec-finish" "function-finished" "$func" "$args" \
908 proc mi_continue_to { bkptno func args file line test } {
910 	"$func" "$args" "$file" "$line" "" "$test"
913 proc mi0_execute_to { cmd reason func args file line extra test } {
914     mi_execute_to_helper "$cmd" "$reason" "$func" "\{$args\}" \
918 proc mi0_next_to { func args file line test } {
919     mi0_execute_to "exec-next" "end-stepping-range" "$func" "$args" \
923 proc mi0_step_to { func args file line test } {
924     mi0_execute_to "exec-step" "end-stepping-range" "$func" "$args" \
928 proc mi0_finish_to { func args file line result ret test } {
929     mi0_execute_to "exec-finish" "function-finished" "$func" "$args" \
935 proc mi0_continue_to { bkptno func args file line test } {
937 	"$func" "$args" "$file" "$line" "" "$test"