diff options
| author | Andrew Burgess <andrew.burgess@embecosm.com> | 2020-08-04 12:13:37 +0100 |
|---|---|---|
| committer | Andrew Burgess <andrew.burgess@embecosm.com> | 2020-08-04 15:56:08 +0100 |
| commit | 10c381b53f8d0295287b8205f170dfedd953993b (patch) | |
| tree | 54790a4df1f7fafe804cf116b53cc06071935cbf | |
| parent | 789198ca955f924c7928c016d922c68e3e2e6dae (diff) | |
| download | gdb-10c381b53f8d0295287b8205f170dfedd953993b.zip gdb-10c381b53f8d0295287b8205f170dfedd953993b.tar.gz gdb-10c381b53f8d0295287b8205f170dfedd953993b.tar.bz2 | |
gdb/testsuite: Use 'array unset' instead of just 'unset'
In the check-test-names.exp library 'unset' was being used to unset an
array variable. Though this seems to work fine on tcl 8.6, it was
discovered on a CentOS 7.8.2003 machine, running tcl 8.5, that this
doesn't work and 'array unset' should be used instead.
Using 'array unset' should work fine for newer and older versions of
tcl (since 8.3, releases ~2000).
gdb/testsuite/ChangeLog:
* lib/check-test-names.exp (do_reset_vars): Use 'array unset' to
unset the array variable.
| -rw-r--r-- | gdb/testsuite/ChangeLog | 5 | ||||
| -rw-r--r-- | gdb/testsuite/lib/check-test-names.exp | 2 |
2 files changed, 6 insertions, 1 deletions
diff --git a/gdb/testsuite/ChangeLog b/gdb/testsuite/ChangeLog index 1e1b702..38cc7be 100644 --- a/gdb/testsuite/ChangeLog +++ b/gdb/testsuite/ChangeLog @@ -1,3 +1,8 @@ +2020-08-04 Andrew Burgess <andrew.burgess@embecosm.com> + + * lib/check-test-names.exp (do_reset_vars): Use 'array unset' to + unset the array variable. + 2020-08-03 Tom de Vries <tdevries@suse.de> PR symtab/26333 diff --git a/gdb/testsuite/lib/check-test-names.exp b/gdb/testsuite/lib/check-test-names.exp index 4c0fde6..d72de3c 100644 --- a/gdb/testsuite/lib/check-test-names.exp +++ b/gdb/testsuite/lib/check-test-names.exp @@ -150,7 +150,7 @@ namespace eval ::CheckTestNames { CheckTestNames::reset_vars - unset all_test_names + array unset all_test_names foreach nm {paths duplicates} { set counts($nm,count) 0 } |