[commit: ghc] master: Testsuite: mark T7653 with high_memory_usage (3bbc01a)

[git at git.haskell.org]

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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/3bbc01a425f8a0b395751a7394c40d1507e77bbc/ghc

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

commit 3bbc01a425f8a0b395751a7394c40d1507e77bbc
Author: Thomas Miedema <thomasmiedema at gmail.com>
Date:   Sat Dec 26 14:32:55 2015 +0100

    Testsuite: mark T7653 with high_memory_usage


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

3bbc01a425f8a0b395751a7394c40d1507e77bbc
 libraries/base/tests/all.T | 3 ++-
 1 file changed, 2 insertions(+), 1 deletion(-)

diff --git a/libraries/base/tests/all.T b/libraries/base/tests/all.T
index da14cb2..0cb48bb 100644
--- a/libraries/base/tests/all.T
+++ b/libraries/base/tests/all.T
@@ -141,7 +141,8 @@ test('T7773', when(opsys('mingw32'), skip), compile_and_run, [''])
 test('CatPairs', normal, compile, [''])
 test('CatEntail', normal, compile, [''])
 
-test('T7653', normal, compile_and_run, [''])
+# When running with WAY=ghci, T7653 uses a lot of memory.
+test('T7653', high_memory_usage, compile_and_run, [''])
 test('T7787', normal, compile_and_run, [''])
 
 test('topHandler01', when(opsys('mingw32'), skip), compile_and_run, [''])