[commit: ghc] master: testsuite: Mark print022 as broken on 32-bit platforms (9897440)

[git at git.haskell.org]

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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/9897440ec9fbf17fb609e9a0d9456861c5f7f24a/ghc

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

commit 9897440ec9fbf17fb609e9a0d9456861c5f7f24a
Author: Ben Gamari <ben at smart-cactus.org>
Date:   Sun Jun 17 10:33:00 2018 -0400

    testsuite: Mark print022 as broken on 32-bit platforms
    
    Due to #15061.


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

9897440ec9fbf17fb609e9a0d9456861c5f7f24a
 testsuite/tests/ghci.debugger/scripts/all.T | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/testsuite/tests/ghci.debugger/scripts/all.T b/testsuite/tests/ghci.debugger/scripts/all.T
index a24a254..88acdb0 100644
--- a/testsuite/tests/ghci.debugger/scripts/all.T
+++ b/testsuite/tests/ghci.debugger/scripts/all.T
@@ -21,8 +21,10 @@ test('print018', extra_files(['../Test.hs']), ghci_script, ['print018.script'])
 test('print019', extra_files(['../Test.hs']), ghci_script, ['print019.script'])
 test('print020', extra_files(['../HappyTest.hs']), ghci_script, ['print020.script'])
 test('print021', normal, ghci_script, ['print021.script'])
-test('print022', when(arch('powerpc64'), expect_broken(14455)), ghci_script,
-     ['print022.script'])
+test('print022',
+     [when(arch('powerpc64'), expect_broken(14455)),
+      when(wordsize(32), expect_broken(15061))],
+     ghci_script, ['print022.script'])
 test('print023', extra_files(['../Test.hs']), ghci_script, ['print023.script'])
 test('print024', extra_files(['../Test.hs']), ghci_script, ['print024.script'])
 test('print025', normal, ghci_script, ['print025.script'])