diff options
Diffstat (limited to 'testsuite/lib/runtest.exp')
-rw-r--r-- | testsuite/lib/runtest.exp | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/testsuite/lib/runtest.exp b/testsuite/lib/runtest.exp index 4efd0df..299cb0a 100644 --- a/testsuite/lib/runtest.exp +++ b/testsuite/lib/runtest.exp @@ -70,6 +70,13 @@ proc runtest_setup_nested_testsuite {} { } } +proc runtest_copy_nested_testsuite_log { tool } { + verbose -log -- "---- ${tool}.log from failed test ----" + spawn -open [open [testsuite file -object -top tmpdir "${tool}.log"]] + expect { .+ { exp_continue } } + verbose -log -- "---- end ${tool}.log ----" +} + proc runtest_cleanup_nested_testsuite {} { upvar 1 tmpdir tmpdir |