From: Simon Marchi <simon.marchi@polymtl.ca>
Date: Wed, 8 Aug 2018 02:45:43 +0000 (-0400)
Subject: Fix gdb.fortran/nested-funcs.exp failure
X-Git-Url: https://git.libre-soc.org/?a=commitdiff_plain;h=045cf012860ed0fd6c01892505cab747ee27a21d;p=binutils-gdb.git

Fix gdb.fortran/nested-funcs.exp failure

Commit 87d6a7aa931f ("Add DWARF index cache") broke
gdb.fortran/nested-funcs.exp.  Because of the new "set index-cache"
command, the expression "set index = 42" now fails:

  set index = 42
  Undefined set index-cache command: "= 42".  Try "help set index-cache".
  (gdb) PASS: gdb.fortran/nested-funcs.exp: set index = 42

Fix it by changing it to "set variable index = 42".  Also, use
gdb_test_no_output to confirm that it worked (since that particular test
wrongfully passed).

gdb/testsuite/ChangeLog:

	* gdb.fortran/nested-funcs.exp: Replace "set index = 42" with
	"set variable index = 42".
---

diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog
index 349aac9ef9b..c79e1e8f20c 100644
--- a/gdb/testsuite/ChangeLog
+++ b/gdb/testsuite/ChangeLog
@@ -1,3 +1,8 @@
+2018-08-07  Simon Marchi  <simon.marchi@polymtl.ca>
+
+	* gdb.fortran/nested-funcs.exp: Replace "set index = 42" with
+	"set variable index = 42".
+
 2018-08-07  Simon Marchi  <simon.marchi@ericsson.com>
 
 	* boards/index-cache-gdb.exp: New file.
diff --git a/gdb/testsuite/gdb.fortran/nested-funcs.exp b/gdb/testsuite/gdb.fortran/nested-funcs.exp
index 20569307b93..2481d256af6 100755
--- a/gdb/testsuite/gdb.fortran/nested-funcs.exp
+++ b/gdb/testsuite/gdb.fortran/nested-funcs.exp
@@ -35,7 +35,7 @@ if ![runto MAIN__] then {
 gdb_breakpoint [gdb_get_line_number "! BP_outer"]
 gdb_continue_to_breakpoint "! BP_outer" ".*! BP_outer"
 gdb_test "print index" "= 13" "print index at BP_outer"
-gdb_test "set index = 42"
+gdb_test_no_output "set variable index = 42"
 gdb_test "print index" "= 42" "print index at BP_outer, manipulated"
 gdb_test "print local_int" "= 19" "print local_int in outer function"