GDB 7.6.50

gdb/testsuite/gdb.base/interp.exp

Index: gdb/testsuite/gdb.base/interp.exp
diff --git a/gdb/testsuite/gdb.base/interp.exp b/gdb/testsuite/gdb.base/interp.exp
index 621cbd03ca35fc3a4a3cb5415953e36b973ef084..7e5ca3c9520269cf7f86955155239d2e451d0efe 100644
--- a/gdb/testsuite/gdb.base/interp.exp
+++ b/gdb/testsuite/gdb.base/interp.exp
@@ -1,4 +1,4 @@
-# Copyright 2004-2005, 2007-2012 Free Software Foundation, Inc.
+# Copyright 2004-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
@@ -15,9 +15,9 @@
 
 # interp.exp   Test interpreter-exec command
 
-set testfile "interp"
+standard_testfile
 
-if { [prepare_for_testing ${testfile}.exp ${testfile} ${testfile}.c {debug}] } {
+if { [prepare_for_testing ${testfile}.exp ${testfile} $srcfile {debug}] } {
     return -1
 }
 
@@ -86,7 +86,7 @@ gdb_test_multiple $cmd $cmd {
 
 if ![runto_main] then {
   fail "run to main"
-  return -1;
+  return -1
 }
 
 gdb_test "list" ".*\[0-9\].*main \\(int argc.*" "can list sources"