diff options
Diffstat (limited to 'testsuite/lib/runtest.exp')
| -rw-r--r-- | testsuite/lib/runtest.exp | 8 |
1 files changed, 6 insertions, 2 deletions
diff --git a/testsuite/lib/runtest.exp b/testsuite/lib/runtest.exp index bbb541b..4efd0df 100644 --- a/testsuite/lib/runtest.exp +++ b/testsuite/lib/runtest.exp @@ -1,4 +1,4 @@ -# Copyright (C) 1992-2016, 2018, 2020 Free Software Foundation, Inc. +# Copyright (C) 1992-2016, 2018, 2020, 2021 Free Software Foundation, Inc. # # This file is part of DejaGnu. # @@ -23,7 +23,11 @@ if { ![info exists RUNTEST] } { } if { ![info exists EXPECT] } { - set EXPECT [findfile $base_dir/../../expect/expect $base_dir/../../expect/expect expect] + if { [info exists ::env(EXPECT)] } { + set EXPECT $::env(EXPECT) + } else { + set EXPECT expect + } verbose "EXPECT defaulting to $EXPECT" 2 } |