[commit: ghc] master: change topHandler02/topHandler03 tests to use signal_exit_code function (238fd05)

[git at git.haskell.org]

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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/238fd05ee514bf3308be17aebb0ab8e805349b3e/ghc

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

commit 238fd05ee514bf3308be17aebb0ab8e805349b3e
Author: Karel Gardas <karel.gardas at centrum.cz>
Date:   Sun Aug 10 22:40:37 2014 +0200

    change topHandler02/topHandler03 tests to use signal_exit_code function
    
    Test Plan: validate
    
    Reviewers: simonmar, austin
    
    Reviewed By: austin
    
    Subscribers: phaskell, simonmar, relrod, ezyang, carter
    
    Differential Revision: https://phabricator.haskell.org/D127


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

238fd05ee514bf3308be17aebb0ab8e805349b3e
 libraries/base/tests/all.T | 5 ++---
 1 file changed, 2 insertions(+), 3 deletions(-)

diff --git a/libraries/base/tests/all.T b/libraries/base/tests/all.T
index aa752c2..8b18d63 100644
--- a/libraries/base/tests/all.T
+++ b/libraries/base/tests/all.T
@@ -146,14 +146,13 @@ test('topHandler02',
       # ignore the stdout here, we only care about the exit code (which itself
       # is messed up because of the shell, using 128+sig encoding)
       ignore_output,
-      exit_code(130)  # actually signal 2 SIGINT
+      signal_exit_code(2)
      ], compile_and_run, [''])
 test('topHandler03',
      [when(opsys('mingw32'), skip),
       # As above, shells, grrr.
       ignore_output,
-      when(opsys('solaris2'), exit_code(15)), # Solaris signals 15 correctly
-      when(not opsys('solaris2'), exit_code(143)) # actually signal 15 SIGTERM
+      signal_exit_code(15)
      ], compile_and_run, [''])