Merge GDB 7.5.1

gdb/testsuite/gdb.reverse/machinestate-precsave.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
@@ skipping 22 matching lines @@
 #   heap variable (pointer)...
 #   overlay variables...
 #   Test forward replay
 #
 
 # This test suitable only for process record-replay
 if ![supports_process_record] {
     return
 }
 
-set testfile "machinestate"
-set srcfile  ${testfile}.c
-set srcfile1 ms1.c
+standard_testfile machinestate.c ms1.c
+set precsave [standard_output_file machinestate.precsave]
 
-if { [prepare_for_testing $testfile.exp $testfile {machinestate.c ms1.c} ] } {
+if { [prepare_for_testing $testfile.exp $testfile \
+          [list $srcfile $srcfile2]] } {
     return -1
 }
 
 set newline "\[\r\n\]+"
 
 set beginmain [gdb_get_line_number " begin main " $srcfile]
 set endmain   [gdb_get_line_number " end main "   $srcfile]
 
 # Test begins
 
 runto main
 
 if [supports_process_record] {
     # Activate process record/replay
     gdb_test_no_output "record" "Turn on process record"
 }
 
 gdb_test "break $endmain" \
     "Breakpoint $decimal at .*/$srcfile, line $endmain\." \
     "BP at end of main"
 
 gdb_test "continue" "Breakpoint .* end main .*" "run to end of main"
 
-gdb_test "record save machinestate.precsave" \
-    "Saved core file machinestate.precsave with execution log\."  \
+gdb_test "record save $precsave" \
+    "Saved core file $precsave with execution log\."  \
     "save process recfile"
 
 gdb_test "kill" "" "Kill process, prepare to debug log file" \
     "Kill the program being debugged\\? \\(y or n\\) " "y"
 
-gdb_test "record restore machinestate.precsave" \
+gdb_test "record restore $precsave" \
     "Program terminated with signal .*" \
     "reload prec save file"
 
 # Proceed to end of main
 
 gdb_test "break $endmain" \
     "Breakpoint.* file .*/$srcfile, line $endmain.*" ""
 
 gdb_test_multiple "continue" "go to end of main forward" {
     -re ".*Breakpoint $decimal,.*/$srcfile:$endmain.*$gdb_prompt $"  {
@@ skipping 157 matching lines @@
 gdb_test "tbreak $breakloc" ".*/$srcfile, line $breakloc.*" ""
 gdb_test "continue"         ".*/$srcfile:$breakloc.*" "forward to $breakloc"
 
 gdb_test "print aglobal" ".* = 0$newline"  "module global forward-breakpoint"
 gdb_test "reverse-step"  ".*hide.*" ""
 gdb_test "step"          ".*$newline$breakloc.*" ""
 gdb_test "print aglobal" ".* = 0$newline"  "module global forward step-to"
 gdb_test "step"          ".* module global post-change .*" ""
 gdb_test "print aglobal" ".* = 1$newline"  "module global step post-change"