Merge GDB 7.5.1

gdb/testsuite/gdb.base/default.exp

 #   Copyright 1988, 1990-1992, 1994-2003, 2005-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
@@ skipping 21 matching lines @@
 
 # test append
 gdb_test "append" "\"append\" must be followed by a subcommand\.\[\r\n\]+List of append subcommands:.*" 
 gdb_test "append binary" "\"append binary\" must be followed by a subcommand\.\[\r\n\]+List of append binary subcommands:.*" 
 gdb_test "append memory" "Missing filename\." 
 gdb_test "append value"  "Missing filename\." 
 gdb_test "append binary memory" "Missing filename\." 
 gdb_test "append binary value"  "Missing filename\." 
 
 if !$use_gdb_stub {
-    setup_xfail "mips-idt-*"
     gdb_test_multiple "attach" "attach" {
         -re "Argument required .(process-id|program) to attach.*$gdb_prompt $"\
             { pass "attach" }
         -re "You can't do that when your target is `None'.*$gdb_prompt $"\
             { pass "attach" }
         -re "You can't do that without a process to debug.*$gdb_prompt $"\
             { pass "attach" }
         -re "Don't know how to attach.  Try \"help target\"..*$gdb_prompt $"\
             { pass "attach" }
         -re "Kill it. .y or n." {
             send_gdb "y\n"
             exp_continue
         }
     }
 
     gdb_test "break" "No default breakpoint address now." "break"
     foreach i "b br bre brea" {
         gdb_test $i "No default breakpoint address now." "break \"$i\" abbreviation"
     }
 
     
-    setup_xfail "mips-idt-*"
     gdb_test "backtrace" "No stack."
 
     # ba and bac are no longer unique command prefixes. So these tests
     # elict an error from GDB.
     # GDB needs to be fixed to map unique alias here for ba bac.
     #
     foreach i "bt ba bac" {
-        setup_xfail "mips-idt-*"
         gdb_test $i "No stack." "backtrace \"$i\" abbreviation"
     }
 } else {
     warning "Skipping backtrace and break tests because of GDB stub."
 }
 
-# This works on the MIPS IDT board, but confuses future tests.
-if ![istarget "mips-idt-*"] then {
-    gdb_test "continue" "The program is not being run." "continue"
-    gdb_test "c" "The program is not being run." "continue \"c\" abbreviation"
-}
+gdb_test "continue" "The program is not being run." "continue"
+gdb_test "c" "The program is not being run." "continue \"c\" abbreviation"
 
 #test call
 gdb_test "call" "The history is empty..*" "call"
 
 
 #test catch
 gdb_test "catch" "Catch requires an event name..*" "catch"
 
 #test cd
 gdb_test "cd" "Argument required .new working directory.*" "cd"
 
 #test clear
 gdb_test "clear" "No source file specified..*" "clear"
 
 #test commands
 gdb_test "commands" "Argument required .one or more breakpoint numbers...*" "commands"
 
 #test condition
 gdb_test "condition" "Argument required .breakpoint number.*" "condition"
 
 #test core-file
-gdb_test "core-file" "No core file now.|GDB can't read core files on this machine." "core-file"
+gdb_test "core-file" "No core file now." "core-file"
 #test delete "d" abbreviation
 gdb_test_no_output "d" "delete \"d\" abbreviation"
 #test delete
 gdb_test_no_output "delete" "delete"
 #test define
 gdb_test "define" "Argument required \[(\]name of command to define\[)\]." "define"
 #test delete breakpoints
 gdb_test_no_output "delete breakpoints" "delete breakpoints"
 #test delete display
 # FIXME -- need to dump full output to detailed log
@@ skipping 159 matching lines @@
 #test info address
 gdb_test "info address" "Argument required." "info address"
 #test info all-registers
 gdb_test "info all-registers" "The program has no registers now." "info all-registers"
 #test info args
 gdb_test "info args" "No frame selected." "info args"
 #test info bogus-gdb-command
 gdb_test "info bogus-gdb-command" "Undefined info command: \"bogus-gdb-command\".  Try \"help info\".*" "info bogus-gdb-command"
 #test info breakpoints
 gdb_test "info breakpoints" "No breakpoints or watchpoints." "info breakpoints"
-#test info catch
-gdb_test "info catch" "No frame selected." "info catch"
 #test info copying
 # FIXME -- doesn't work worth a shit
 #send_gdb "info copying"
 #       -re "GNU GENERAL PUBLIC LICENSE.*#of preserving the free status of all derivatives of our free software and.*#of promoting the sharing and reuse of software generally."# 
 gdb_test "info copying"
 #       }
 #
 #
 #test info display
 gdb_test "info display" "There are no auto-display expressions now." "info display"
@@ skipping 139 matching lines @@
         -re "Starting program:  .*No executable file specified.*Use the \"file\" or \"exec-file\" command.*$gdb_prompt $"\
             { pass "run \"r\" abbreviation" }
         -re "Starting program:  .*No executable specified, use .target exec.\\..*$gdb_prompt $"\
             { pass "run \"r\" abbreviation" }
         -re "Starting program:  .*No image loaded into target.*$gdb_prompt $"\
             { pass "run \"r\" abbreviation" }
         -re "Starting program:  .*No program loaded.*$gdb_prompt $"\
             { pass "run \"r\" abbreviation" }
         -re "Don't know how to run.  Try \"help target\"..*$gdb_prompt $"\
             { pass "run \"r\" abbreviation" }
+        -re "Starting program:  .*Running the default executable on the remote target failed; try \"set remote exec-file\"?.*$gdb_prompt $"\
+            { pass "run \"r\" abbreviation" }
     }
 }
 
 #test run
 if $use_gdb_stub {
     # Only extended-remote supports "run".
 } elseif [istarget "*-*-vxworks*"] then {
     gdb_test "set args" ".*" "" 
 
     gdb_test "run" "Starting program: .*
 You must specify a function name to run, and arguments if any"
     gdb_test "set args main" ".*" "" 
 
 } else {
     gdb_test_multiple "run" "run" {
         -re "Starting program:.*You can't do that when your target is `None'.*$gdb_prompt $"\
             { pass "run" }
         -re "Starting program:  .*No executable file specified.*Use the \"file\" or \"exec-file\" command.*$gdb_prompt $"\
             { pass "run" }
         -re "Starting program:  .*No executable specified, use .target exec.\\..*$gdb_prompt $"\
             { pass "run" }
         -re "Starting program:  .*No image loaded into target.*$gdb_prompt $"\
             { pass "run" }
         -re "Starting program:  .*No program loaded.*$gdb_prompt $"\
             { pass "run" }
         -re "Don't know how to run.  Try \"help target\"..*$gdb_prompt $"\
             { pass "run" }
+        -re "Starting program:  .*Running the default executable on the remote target failed; try \"set remote exec-file\"?.*$gdb_prompt $"\
+            { pass "run" }
     }
 }
 
 #test rbreak
 gdb_test "rbreak" "rbreak"
 
 # test restore
 gdb_test "restore" "You can't do that without a process to debug\."
 
 #test return
@@ skipping 42 matching lines @@
 gdb_test_no_output "set history expansion" "set history expansion"
 #test set history filename
 gdb_test "set history filename" "Argument required .filename to set it to.*" "set history filename"
 #test set history save
 gdb_test_no_output "set history save" "set history save"
 #test set history size
 gdb_test "set history size" "Argument required .integer to set it to.*" "set history size"
 #test set history
 gdb_test "set history" "\"set history\" must be followed by the name of a history subcommand.(\[^\r\n\]*\[\r\n\])+List of set history subcommands:(\[^\r\n\]*\[\r\n\])+set history expansion -- Set history expansion on command input(\[^\r\n\]*\[\r\n\])+set history filename -- Set the filename in which to record the command history(\[^\r\n\]*\[\r\n\])+set history save -- Set saving of the history record on exit(\[^\r\n\]*\[\r\n\])+set history size -- Set the size of the command history(\[^\r\n\]*\[\r\n\])+Type \"help set history\" followed by set history subcommand name for full documentation.(\[^\r\n\]*\[\r\n\])+Command name abbreviations are allowed if unambiguous." "set history"
 #test set language
-gdb_test "set language" "Requires an argument. Valid arguments are auto, local, unknown, ada, c, c.., asm, minimal, d, fortran, objective-c, java, modula-2, opencl, pascal." "set language"
+gdb_test "set language" "Requires an argument. Valid arguments are auto, local, unknown, ada, c, c.., asm, minimal, d, fortran, objective-c, go, java, modula-2, opencl, pascal." "set language"
 #test set listsize
 gdb_test "set listsize" "Argument required .integer to set it to.*" "set listsize"
 #test set print "p" abbreviation
 gdb_test "set p" "\"set print\" must be followed by the name of a print subcommand.(\[^\r\n\]*\[\r\n\])+List of set print subcommands:(\[^\r\n\]*\[\r\n\])+Type \"help set print\" followed by set print subcommand name for full documentation.(\[^\r\n\]*\[\r\n\])+Command name abbreviations are allowed if unambiguous." "set print \"p\" abbreviation"
 #test set print "pr" abbreviation
 gdb_test "set pr" "\"set print\" must be followed by the name of a print subcommand.(\[^\r\n\]*\[\r\n\])+List of set print subcommands:(\[^\r\n\]*\[\r\n\])+Type \"help set print\" followed by set print subcommand name for full documentation.(\[^\r\n\]*\[\r\n\])+Command name abbreviations are allowed if unambiguous." "set print \"pr\" abbreviation"
 #test set print
 gdb_test "set print" "\"set print\" must be followed by the name of a print subcommand.(\[^\r\n\]*\[\r\n\])+List of set print subcommands:(\[^\r\n\]*\[\r\n\])+Type \"help set print\" followed by set print subcommand name for full documentation.(\[^\r\n\]*\[\r\n\])+Command name abbreviations are allowed if unambiguous." "set print"
 #test set print address
 gdb_test_no_output "set print address" "set print address"
@@ skipping 11 matching lines @@
 gdb_test_no_output "set print pretty" "set print pretty"
 #test set print sevenbit-strings
 gdb_test_no_output "set print sevenbit-strings" "set print sevenbit-strings"
 #test set print union
 gdb_test_no_output "set print union" "set print union"
 #test set print vtbl
 gdb_test_no_output "set print vtbl" "set print vtbl"
 # FIXME -- need a test for "set prompt"
 #test set radix
 gdb_test "set radix" "Input and output radices now set to decimal 10, hex a, octal 12.*" "set radix"
-#test set symbol-reloading
-gdb_test_no_output "set symbol-reloading" "set symbol-reloading"
 #test set variable
 gdb_test "set variable" "Argument required .expression to compute.*" "set variable"
 #test set verbose
 gdb_test_no_output "set verbose" "set verbose"
 #test set width
 gdb_test "set width" "Argument required .integer to set it to.*" "set width"
 #test set write
 # This is only supported on targets which use exec.o.
 gdb_test_no_output "set write" "set write"
 #test set
@@ skipping 24 matching lines @@
 #test show convenience
 # This is tricker as there are multiple internal convenience vars and we
 # can't assume any particular order.
 gdb_test_list_exact "show convenience" "show convenience" \
     "\[^\r\n\]+\[\r\n\]+" \
     "\[^\r\n\]+" \
     { \
         {$_sdata = void} \
         {$_siginfo = void} \
         {$_thread = 0} \
+        {$_probe_argc = <error: No frame selected>} \
+        {$_probe_arg0 = <error: No frame selected>} \
+        {$_probe_arg1 = <error: No frame selected>} \
+        {$_probe_arg2 = <error: No frame selected>} \
+        {$_probe_arg3 = <error: No frame selected>} \
+        {$_probe_arg4 = <error: No frame selected>} \
+        {$_probe_arg5 = <error: No frame selected>} \
+        {$_probe_arg6 = <error: No frame selected>} \
+        {$_probe_arg7 = <error: No frame selected>} \
+        {$_probe_arg8 = <error: No frame selected>} \
+        {$_probe_arg9 = <error: No frame selected>} \
+        {$_probe_arg10 = <error: No frame selected>} \
+        {$_probe_arg11 = <error: No frame selected>} \
     }
 
 #test show directories
 gdb_test "show directories" "Source directories searched: .cdir\[:;\].cwd" "show directories"
 #test show editing
 gdb_test "show editing" "Editing of command lines as they are typed is o\[a-z\]*." "show editing"
 #test show height
 gdb_test "show height" "Number of lines gdb thinks are in a page is.*" "show height"
 #test show history expansion
 gdb_test "show history expansion" "History expansion on command input is o\[a-z\]*.*" "show history expansion"
@@ skipping 37 matching lines @@
 gdb_test "show print union" "Printing of unions interior to structures is on." "show print union"
 #test show print vtbl
 gdb_test "show print vtbl" "Printing of C\[+\]+ virtual function tables is on." "show print vtbl"
 #test show prompt
 # In the FAIL case, can't just look for $gdb_prompt because that will match
 # the output, rather than the prompt. So look for $gdb_prompt at the start
 # of a line.
 gdb_test "show prompt" "Gdb's prompt is \"$gdb_prompt \".*" "show prompt"
 #test show radix
 gdb_test "show radix" "Input and output radices set to decimal 10, hex a, octal 12." "show radix"
-#test show symbol-reloading
-gdb_test "show symbol-reloading" "Dynamic symbol table reloading multiple times in one run is on." "show symbol-reloading"
 #test show user
 gdb_test_no_output "show user" "show user"
 #test show values
 gdb_test_no_output "show values" "show values"
 #test show verbose
 gdb_test "show verbose" "Verbose printing of informational messages is o.*|Verbosity is off.*" "show verbose"
 #test show version
 gdb_test "show version" "GNU gdb \[0-9\.\]*(\[^\r\n\]*\[\r\n\])+Copyright \\(C\\) \[0-9\]* Free Software Foundation, Inc(\[^\r\n\]*\[\r\n\])+License GPLv3\\+: GNU GPL version 3 or later <http://gnu.org/licenses/gpl.html>(\[^\r\n\]*\[\r\n\])+This is free software: you are free to change and redistribute it.(\[^\r\n\]*\[\r\n\])+There is NO WARRANTY, to the extent permitted by law.  Type \"show copying\"(\[^\r\n\]*\[\r\n\])+and \"show warranty\" for details..*" "show version" 
 #test show width
 gdb_test "show width" "Number of characters gdb thinks are in a line is.*" "show width"
@@ skipping 143 matching lines @@
 #test whatis
 gdb_test "whatis" "The history is empty." "whatis"
 #test where
 gdb_test "where" "No stack." "where"
 #test x
 gdb_test "x" "Argument required .starting display address.*" "x"
 
 gdb_exit
 
 set timeout $prev_timeout