Index: gdb/testsuite/gdb.base/whatis.exp |
diff --git a/gdb/testsuite/gdb.base/whatis.exp b/gdb/testsuite/gdb.base/whatis.exp |
index 18edc4c48b3f28ede87dd3e6dea16e28b9279dac..7cfaf2b6f2cff329e20f6b96dc1ba62b478cbd64 100644 |
--- a/gdb/testsuite/gdb.base/whatis.exp |
+++ b/gdb/testsuite/gdb.base/whatis.exp |
@@ -1,5 +1,4 @@ |
-# Copyright 1988, 1990-1992, 1994-1997, 1999, 2002-2004, 2007-2012 Free |
-# Software Foundation, Inc. |
+# Copyright 1988-2013 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 |
@@ -26,9 +25,8 @@ if [target_info exists no_long_long] { |
set exec_opts [list debug] |
} |
-set testfile whatis |
-set srcfile ${testfile}.c |
-set binfile ${objdir}/${subdir}/${testfile} |
+standard_testfile .c |
+ |
if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable $exec_opts] != "" } { |
untested whatis.exp |
return -1 |
@@ -37,15 +35,12 @@ if { [gdb_compile "${srcdir}/${subdir}/${srcfile}" "${binfile}" executable $exe |
# Create and source the file that provides information about the compiler |
# used to compile the test case. |
if [get_compiler_info] { |
- return -1; |
+ return -1 |
} |
# Start with a fresh gdb. |
-gdb_exit |
-gdb_start |
-gdb_reinitialize_dir $srcdir/$subdir |
-gdb_load $binfile |
+clean_restart $binfile |
# Define a procedure to set up an xfail for all targets that put out a |
# `long' type as an `int' type. |