[commit: ghc] master, wip/deploy-docs, wip/packaging-fail, wip/run-nofib, wip/windows-32bit: testsuite: Display observed exit code on failure due to bad exit code (3394a7c)

[git at git.haskell.org]

Repository : ssh://git@git.haskell.org/ghc

On branches: master,wip/deploy-docs,wip/packaging-fail,wip/run-nofib,wip/windows-32bit
Link       : http://ghc.haskell.org/trac/ghc/changeset/3394a7cd27cec64a577ee0a9df887a431ccb3696/ghc

>---------------------------------------------------------------

commit 3394a7cd27cec64a577ee0a9df887a431ccb3696
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Thu Mar 7 10:13:13 2019 -0500

    testsuite: Display observed exit code on failure due to bad exit code


>---------------------------------------------------------------

3394a7cd27cec64a577ee0a9df887a431ccb3696
 testsuite/driver/testlib.py | 2 +-
 1 file changed, 1 insertion(+), 1 deletion(-)

diff --git a/testsuite/driver/testlib.py b/testsuite/driver/testlib.py
index ed336c9..a2e7dde 100644
--- a/testsuite/driver/testlib.py
+++ b/testsuite/driver/testlib.py
@@ -1402,7 +1402,7 @@ def simple_run(name, way, prog, extra_run_opts):
             print('Wrong exit code for ' + name + '(' + way + ')' + '(expected', opts.exit_code, ', actual', exit_code, ')')
             dump_stdout(name)
             dump_stderr(name)
-        return failBecause('bad exit code')
+        return failBecause('bad exit code (%d)' % exit_code)
 
     if not (opts.ignore_stderr or stderr_ok(name, way) or opts.combined_output):
         return failBecause('bad stderr')