X-Git-Url: http://git.osdn.net/view?a=blobdiff_plain;f=gdb%2Ftestsuite%2Fgdb.ada%2Fassign_1.exp;fp=gdb%2Ftestsuite%2Fgdb.ada%2Fassign_1.exp;h=c27e6d02366564bdea4fbf200175d6d680625beb;hb=cbad6d5ba66a94967eaf14df64463a4abca700d6;hp=93e26a212b4f97b3cf9155236d241e4474f594ac;hpb=b110964dfb2d0779466e4e604983d3afa83993a4;p=pf3gnuchains%2Fpf3gnuchains4x.git

diff --git a/gdb/testsuite/gdb.ada/assign_1.exp b/gdb/testsuite/gdb.ada/assign_1.exp
index 93e26a212b..c27e6d0236 100644
--- a/gdb/testsuite/gdb.ada/assign_1.exp
+++ b/gdb/testsuite/gdb.ada/assign_1.exp
@@ -1,4 +1,4 @@
-# Copyright 2008, 2009, 2010 Free Software Foundation, Inc.
+# Copyright 2008-2012 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
@@ -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"
 
 gdb_exit
@@ -25,8 +21,7 @@ gdb_reinitialize_dir $srcdir/$subdir
 
 # Force the language to Ada, as this will not happen automatically
 # in this case (no test program).
-gdb_test "set lang ada" \
-         "" \
+gdb_test_no_output "set lang ada" \
          "Changing the language to ada"
 
 gdb_test "print \$xxx := 1" \