Fixup testcases outputting own name as a test name and standardize failed compilation...

[deliverable/binutils-gdb.git] / gdb / testsuite / gdb.base / cursal.exp

diff --git a/gdb/testsuite/gdb.base/cursal.exp b/gdb/testsuite/gdb.base/cursal.exp
index 69f864a5847198766b47f888230499c3df3560f9..6834d76a8cd60fd4252c325400bcdb20cfea0a5a 100644 (file)
--- a/gdb/testsuite/gdb.base/cursal.exp
+++ b/gdb/testsuite/gdb.base/cursal.exp
@@ -1,4 +1,4 @@
-# Copyright 2004, 2007, 2008, 2009, 2010 Free Software Foundation, Inc.
+# Copyright 2004-2016 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,19 +13,11 @@
 # 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 {
-    strace $tracelevel
-}
-
-set prms_id 0
-set bug_id 0
 
-set testfile "cursal"
-set srcfile ${testfile}.c
-set binfile ${objdir}/${subdir}/${testfile}
+standard_testfile
 
 if {[gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable {debug}] != ""} {
-    untested "Couldn't compile $srcfile"
+    untested "failed to compile"
     return -1
 }
 
@@ -33,8 +25,7 @@ gdb_exit
 gdb_start
 gdb_reinitialize_dir $srcdir/$subdir
 gdb_file_cmd ${binfile}
-gdb_test "set listsize 1" \
-    ".*"
+gdb_test_no_output "set listsize 1"
 
 # initial sal should be first statement in main
 gdb_test "list" \
@@ -66,8 +57,8 @@ gdb_test "list -1" \
     "list after backtrace"
 
 # check the window
-gdb_test "set listsize 3" \
-    ".*"
+gdb_test_no_output "set listsize 3"
+
 if {! [runto_main]} {
     return -1
 }