[commit: ghc] master: Testsuite: fix T10482a (4036c1f)

[git at git.haskell.org]

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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/4036c1f110578f8e2813295116b79a5a06e2bf59/ghc

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

commit 4036c1f110578f8e2813295116b79a5a06e2bf59
Author: Thomas Miedema <thomasmiedema at gmail.com>
Date:   Mon Jul 25 01:36:20 2016 +0200

    Testsuite: fix T10482a


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

4036c1f110578f8e2813295116b79a5a06e2bf59
 testsuite/tests/stranal/should_compile/all.T | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/testsuite/tests/stranal/should_compile/all.T b/testsuite/tests/stranal/should_compile/all.T
index 97c3a6f..0f57c3b 100644
--- a/testsuite/tests/stranal/should_compile/all.T
+++ b/testsuite/tests/stranal/should_compile/all.T
@@ -37,8 +37,10 @@ test('T8743', [ extra_clean(['T8743.o-boot', 'T8743a.hi', 'T8743a.o', 'T8743.hi-
 #   The intent here is to check that $wfoo has type
 #         $wfoo :: Int# -> Int# -> Int
 #   with two unboxed args.  See Trac #10482 for background
-test('T10482',  [ grepCoreString(r'wfoo.*Int') ], compile, ['-dppr-cols=200 -ddump-simpl'])
-test('T10482a', [ grepCoreString(r'wf.*Int') ],   compile, ['-dppr-cols=200 -ddump-simpl'])
+# 
+# Set -dppr-cols to ensure output doesn't wrap
+test('T10482',  [ grepCoreString(r'wfoo.*Int#') ], compile, ['-dppr-cols=200 -ddump-simpl'])
+test('T10482a', [ grepCoreString(r'wf.*Int#') ],   compile, ['-dppr-cols=200 -ddump-simpl'])
 
 test('T9208', when(compiler_debugged(), expect_broken(9208)), compile, [''])
 # T9208 fails (and should do so) if you have assertion checking on in the compiler