diff options
| author | Simon Marchi <simon.marchi@polymtl.ca> | 2018-08-07 22:45:43 -0400 |
|---|---|---|
| committer | Simon Marchi <simon.marchi@polymtl.ca> | 2018-08-07 22:46:37 -0400 |
| commit | 045cf012860ed0fd6c01892505cab747ee27a21d (patch) | |
| tree | ca47ec3b6805f2327488b2f49389f3f6a30c73f5 | |
| parent | 09ce46f230fee766c386384cd1f5672d12fde276 (diff) | |
| download | gdb-045cf012860ed0fd6c01892505cab747ee27a21d.zip gdb-045cf012860ed0fd6c01892505cab747ee27a21d.tar.gz gdb-045cf012860ed0fd6c01892505cab747ee27a21d.tar.bz2 | |
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".
| -rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
| -rwxr-xr-x | gdb/testsuite/gdb.fortran/nested-funcs.exp | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 349aac9..c79e1e8 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 2056930..2481d25 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"
|