diff options
| author | Ben Elliston <bje@gnu.org> | 2016-03-29 10:52:29 +1100 |
|---|---|---|
| committer | Ben Elliston <bje@gnu.org> | 2016-03-29 10:52:29 +1100 |
| commit | 85e283265453b698f1f5a22b2eeedc0c05aafe91 (patch) | |
| tree | 9e9a52b78d6078cc5cd9512699015d42f016d5d4 /runtest.exp | |
| parent | 569f8718b534a2cd9511a7d640352eb0126ff492 (diff) | |
| download | dejagnu-85e283265453b698f1f5a22b2eeedc0c05aafe91.zip dejagnu-85e283265453b698f1f5a22b2eeedc0c05aafe91.tar.gz dejagnu-85e283265453b698f1f5a22b2eeedc0c05aafe91.tar.bz2 | |
More fixes identified by the Frink static analyser:
(1) use -- in switch commands for safety,
(2) add braces around exprs,
(3) replace abbreviated "info proc" with "info procs",
(4) use -- in regexp commands for safety where the expression is a
variable that could begin with '-'.
Diffstat (limited to 'runtest.exp')
| -rw-r--r-- | runtest.exp | 2 |
1 files changed, 1 insertions, 1 deletions
diff --git a/runtest.exp b/runtest.exp index 56865c2..d05952b 100644 --- a/runtest.exp +++ b/runtest.exp @@ -398,7 +398,7 @@ proc usage { } { send_user "\t--D\[0-1\]\t\tTcl debugger\n" send_user "\tscript.exp\[=arg(s)\]\tRun these tests only\n" if { [info exists tool] } { - if { [info proc ${tool}_option_help] != "" } { + if { [info procs ${tool}_option_help] != "" } { ${tool}_option_help } } |