From 065924f7de118bb70b70a8bd3b099de2cba395ac Mon Sep 17 00:00:00 2001 From: Kung Hsu Date: Fri, 31 Mar 1995 00:43:12 +0000 Subject: [PATCH] * lib/gdb.exp (gdb_run_cmd): Special handling for targets use stubs. --- gdb/testsuite/lib/gdb.exp | 18 ++++++++++++++++++ 1 file changed, 18 insertions(+) diff --git a/gdb/testsuite/lib/gdb.exp b/gdb/testsuite/lib/gdb.exp index 943191220b5..b7b94e0b8f1 100644 --- a/gdb/testsuite/lib/gdb.exp +++ b/gdb/testsuite/lib/gdb.exp @@ -136,6 +136,24 @@ proc delete_breakpoints {} { # elsewhere. # proc gdb_run_cmd {} { + global usestubs + global prompt + + if $usestubs!=0 { + send "jump *start\n" + expect { + -re "Line.* Jump anyway.*y or n. $" { + send "y\n" + expect { + -re "Continuing.*$prompt $" {} + timeout { perror "Jump to start() failed"; return } + } + } + timeout { perror "Jump to start() failed (timeout)"; return } + } + send "continue\n" + return + } send "run\n" expect { -re "The program .* has been started already.*y or n. $" { -- 2.30.2