diff options
| author | Tom de Vries <tdevries@suse.de> | 2023-05-02 17:37:58 +0200 |
|---|---|---|
| committer | Tom de Vries <tdevries@suse.de> | 2023-05-02 17:37:58 +0200 |
| commit | 69330acb2014b3b520206f53a244815226897f9b (patch) | |
| tree | d6d0c628d73a8738c11921a9b58c6fe9aead4524 | |
| parent | a047f82b3c5e34072f1ca77af486a77a744ccdd5 (diff) | |
| download | gdb-69330acb2014b3b520206f53a244815226897f9b.zip gdb-69330acb2014b3b520206f53a244815226897f9b.tar.gz gdb-69330acb2014b3b520206f53a244815226897f9b.tar.bz2 | |
[gdb/testsuite] Use set in lmap in gdb.dwarf2/dw2-abs-hi-pc.exp
In gdb.dwarf2/dw2-abs-hi-pc.exp we do:
...
set sources [lmap i $sources { expr { "$srcdir/$subdir/$i" } }]
...
The use of expr is not idiomatic. Fix this by using set instead:
...
set sources [lmap i $sources { set tmp $srcdir/$subdir/$i }]
...
Reported-By: Tom Tromey <tom@tromey.com>
Reviewed-By: Andreas Schwab <schwab@suse.de>
| -rw-r--r-- | gdb/testsuite/gdb.dwarf2/dw2-abs-hi-pc.exp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/gdb/testsuite/gdb.dwarf2/dw2-abs-hi-pc.exp b/gdb/testsuite/gdb.dwarf2/dw2-abs-hi-pc.exp index 2ea6a5c..5b5d678 100644 --- a/gdb/testsuite/gdb.dwarf2/dw2-abs-hi-pc.exp +++ b/gdb/testsuite/gdb.dwarf2/dw2-abs-hi-pc.exp @@ -24,7 +24,7 @@ set sources \ ${testfile}.c \ ${testfile}-hello.c \ ${testfile}-world.c] -set sources [lmap i $sources { expr { "$srcdir/$subdir/$i" } }] +set sources [lmap i $sources { set tmp $srcdir/$subdir/$i }] lassign [function_range hello $sources] \ hello_start hello_len |