Merge GDB 7.5.1

gdb/testsuite/gdb.reverse/step-reverse.exp

 # 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
 # the Free Software Foundation; either version 3 of the License, or
 # (at your option) any later version.
 #
 # This program is distributed in the hope that it will be useful,
 # but WITHOUT ANY WARRANTY; without even the implied warranty of
 # MERCHANTABILITY or FITNESS FOR A PARTICULAR PURPOSE.  See the
 # GNU General Public License for more details.
 #
 # You should have received a copy of the GNU General Public License
 # along with this program.  If not, see <http://www.gnu.org/licenses/>.  */
 
 # This file is part of the GDB testsuite.  It tests reverse stepping.
 # Lots of code borrowed from "step-test.exp".
 
 #
 # Test step and next in reverse
 #
 
 if ![supports_reverse] {
     return
 }
 
-set testfile "step-reverse"
-set srcfile  ${testfile}.c
+standard_testfile
 
 if { [prepare_for_testing $testfile.exp $testfile $srcfile] } {
     return -1
 }
 
 runto main
 
 if [supports_process_record] {
     # Activate process record/replay
     gdb_test_no_output "record" "Turn on process record"
@@ skipping 204 matching lines @@
 gdb_test "step" ".*STEP TEST 1.*" "reverse step test 2"
 gdb_test "next" ".*NEXT TEST 1.*" "reverse next test 2"
 
 
 
 # Finish test by running forward to the end.
 # FIXME return to this later...
 # gdb_test_no_output "set exec-dir forward" "set forward execution"
 # gdb_continue_to_end "step-reverse.exp"