diff options
| author | Jacob Bachmeyer <jcb62281@gmail.com> | 2018-12-16 16:22:14 +1100 |
|---|---|---|
| committer | Ben Elliston <bje@gnu.org> | 2018-12-16 16:22:14 +1100 |
| commit | b53b22c29880f785ae5e9e1c72925d2583a4c76d (patch) | |
| tree | c2aef20176f13f219060c4c6071110b151f456d5 /runtest.exp | |
| parent | 8a29223aa411b2ccacc08862b8e0757628f955c5 (diff) | |
| download | dejagnu-b53b22c29880f785ae5e9e1c72925d2583a4c76d.zip dejagnu-b53b22c29880f785ae5e9e1c72925d2583a4c76d.tar.gz dejagnu-b53b22c29880f785ae5e9e1c72925d2583a4c76d.tar.bz2 | |
* runtest.exp: Move processing of -V|--version option to first
pass through command line arguments instead of delaying it.
Signed-off-by: Ben Elliston <bje@gnu.org>
Diffstat (limited to 'runtest.exp')
| -rw-r--r-- | runtest.exp | 16 |
1 files changed, 8 insertions, 8 deletions
diff --git a/runtest.exp b/runtest.exp index 09ffcf0..bea8f29 100644 --- a/runtest.exp +++ b/runtest.exp @@ -450,6 +450,14 @@ for { set i 0 } { $i < $argc } { incr i } { } switch -glob -- $option { + "--V*" - + "--vers*" { # (--version) version numbers + send_user "DejaGnu version\t$frame_version\n" + send_user "Expect version\t[exp_version]\n" + send_user "Tcl version\t[ info tclversion ]\n" + exit 0 + } + "--bu*" { # (--build) the build host configuration set arg_build_triplet $optarg continue @@ -1060,14 +1068,6 @@ for { set i 0 } { $i < $argc } { incr i } { } switch -glob -- $option { - "--V*" - - "--vers*" { # (--version) version numbers - send_user "DejaGnu version\t$frame_version\n" - send_user "Expect version\t[exp_version]\n" - send_user "Tcl version\t[ info tclversion ]\n" - exit 0 - } - "--v*" { # (--verbose) verbose output # Already parsed. continue |