aboutsummaryrefslogtreecommitdiff
path: root/gdb/testsuite/gdb.base
diff options
context:
space:
mode:
Diffstat (limited to 'gdb/testsuite/gdb.base')
-rw-r--r--gdb/testsuite/gdb.base/opaque.exp23
1 files changed, 5 insertions, 18 deletions
diff --git a/gdb/testsuite/gdb.base/opaque.exp b/gdb/testsuite/gdb.base/opaque.exp
index 544023d..3ba955e 100644
--- a/gdb/testsuite/gdb.base/opaque.exp
+++ b/gdb/testsuite/gdb.base/opaque.exp
@@ -1,4 +1,4 @@
-# Copyright (C) 1992 Free Software Foundation, Inc.
+# Copyright (C) 1992, 1994 Free Software Foundation, Inc.
# This program is free software; you can redistribute it and/or modify
# it under the terms of the GNU General Public License as published by
@@ -156,10 +156,6 @@ if [istarget "mips-idt-*"] then {
gdb_start
}
gdb_reinitialize_dir $srcdir/$subdir
-if [istarget "a29k-*-udi"] then {
- # FIXME: If PR 2415 is fixed, this is not needed.
- gdb_target_udi
-}
gdb_load $objdir/$subdir/$binfile
# Set breakpoint on main, where struct foo is incomplete.
@@ -175,9 +171,9 @@ expect {
# Run until break at main. Struct foo is opaque in the file containing
# main().
-send "run\n"
+gdb_run_cmd
expect {
- -re "Starting program:.*Breakpoint 1.*$prompt $" {}
+ -re "Breakpoint 1.*$prompt $" {}
-re ".*$prompt $" { fail "run until main()" }
timeout { fail "(timeout) run until main()" }
}
@@ -258,10 +254,6 @@ $prompt $" { pass "ptype on opaque struct tagname (dynamically)" }
# have learned reading the symbols during the previous tests.
gdb_reinitialize_dir $srcdir/$subdir
-if [istarget "a29k-*-udi"] then {
- # FIXME: If PR 2415 is fixed, this is not needed.
- gdb_target_udi
-}
gdb_load $objdir/$subdir/$binfile
# Disable the breakoint on main().
@@ -285,9 +277,9 @@ expect {
# Run until break at getfoo(). Struct foo is defined here.
# Retry all the tests we we tried at main() where struct foo was opaque.
-send "run\n"
+gdb_run_cmd
expect {
- -re "Starting program:.*Breakpoint.*$prompt $" {}
+ -re "Breakpoint.*$prompt $" {}
-re ".*$prompt $" { fail "run until getfoo()" }
timeout { fail "(timeout) run until getfoo()" }
}
@@ -360,8 +352,3 @@ $prompt $" { pass "ptype on opaque struct tagname (dynamically)" }
-re ".*$prompt $" { fail "ptype on opaque struct" }
timeout { fail "(timeout) ptype on opaque struct" }
}
-
-if [istarget "a29k-*-udi"] then {
- # FIXME: If PR 2415 is fixed, this is not needed.
- gdb_target_udi
-}