* lib/gdb.exp (gdb_run_cmd): Special handling for targets use stubs.
authorKung Hsu <kung@cygnus>
Fri, 31 Mar 1995 00:43:47 +0000 (00:43 +0000)
committerKung Hsu <kung@cygnus>
Fri, 31 Mar 1995 00:43:47 +0000 (00:43 +0000)
        * gdb.base/break.exp: ditto.
        * gdb.base/list.exp: ditto.
        * gdb.base/bitfields.c: Add #ifdef usestubs in main().
        * gdb.base/run.c: ditto.
        * gdb.base/list0.c: ditto.
        * gdb.base/funcargs.c: ditto.

gdb/testsuite/ChangeLog
gdb/testsuite/gdb.base/break.exp
gdb/testsuite/gdb.base/list.exp

index 0eaadcf..b6a32b0 100644 (file)
@@ -1,3 +1,13 @@
+Thu Mar 30 15:36:55 1995  Kung Hsu  <kung@mexican.cygnus.com>
+
+       * lib/gdb.exp (gdb_run_cmd): Special handling for targets use stubs.
+       * gdb.base/break.exp: ditto.
+       * gdb.base/list.exp: ditto.
+       * gdb.base/bitfields.c: Add #ifdef usestubs in main().
+       * gdb.base/run.c: ditto.
+       * gdb.base/list0.c: ditto.
+       * gdb.base/funcargs.c: ditto.
+
 Wed Mar 29 17:09:29 1995  Stu Grossman  (grossman@cygnus.com)
 
        * testsuite/config/rom68k.exp (gdb_target_rom68k):  Use
index 5fb51fb..1b53a2b 100644 (file)
@@ -143,10 +143,7 @@ if !$usestubs then {
   }
 }
 
-if $usestubs {
-    gdb_test $cmd "Starting program.*Breakpoint \[0-9\]+,.*main .*argc.*argv.* at .*$srcfile:56.*56\[\t \]+if .argc.*" \
-       "run until function breakpoint"
-}
+#if $usestubs {}
 
 #
 # run until the breakpoint at a line number
index 25c30c4..16214c9 100644 (file)
@@ -900,6 +900,14 @@ gdb_start
 gdb_reinitialize_dir $srcdir/$subdir
 gdb_load $objdir/$subdir/$binfile
 
+if $usestubs {
+    send "step\n"
+    # if use stubs step out of the breakpoint() function.
+    expect {
+        -re "main.* at .*$prompt $" {}
+        timeout { fail "single step at breakpoint() (timeout)" ; return 0 }
+    }
+
 send "set width 0\n"
 expect -re "$prompt $"