Index: gdb/testsuite/gdb.ada/fun_addr.exp |
diff --git a/gdb/testsuite/gdb.ada/fun_addr.exp b/gdb/testsuite/gdb.ada/fun_addr.exp |
index 1c76a1e6b7e93e3316542482d57aad5aba3b7382..99249954532e614f81037db295b2a80949c53ac5 100644 |
--- a/gdb/testsuite/gdb.ada/fun_addr.exp |
+++ b/gdb/testsuite/gdb.ada/fun_addr.exp |
@@ -13,10 +13,6 @@ |
# You should have received a copy of the GNU General Public License |
# along with this program. If not, see <http://www.gnu.org/licenses/>. |
-if $tracelevel then { |
- strace $tracelevel |
-} |
- |
load_lib "ada.exp" |
set testdir "fun_addr" |
@@ -35,7 +31,7 @@ clean_restart ${testfile} |
# the inferior is *not* running (no frame). |
gdb_test "print foo'address" \ |
- "= .* 0x\[0-9a-zA-Z\]+" \ |
+ "= .* 0x\[0-9a-zA-Z\]+ <foo>" \ |
"print foo'address" |