[commit: ghc] master: Add more variants of T3064 (in comments) (156db6b)

[git at git.haskell.org]

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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/156db6b2e2b7be13f6d22316eea7e1ba8d312f18/ghc

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

commit 156db6b2e2b7be13f6d22316eea7e1ba8d312f18
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Fri Oct 14 17:42:00 2016 +0100

    Add more variants of T3064 (in comments)


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

156db6b2e2b7be13f6d22316eea7e1ba8d312f18
 testsuite/tests/perf/compiler/T3064.hs | 23 +++++++++++++----------
 1 file changed, 13 insertions(+), 10 deletions(-)

diff --git a/testsuite/tests/perf/compiler/T3064.hs b/testsuite/tests/perf/compiler/T3064.hs
index 53a87b5..dacca79 100644
--- a/testsuite/tests/perf/compiler/T3064.hs
+++ b/testsuite/tests/perf/compiler/T3064.hs
@@ -56,20 +56,23 @@ runCA action = runCtxM (runCAT (unCA action))
 runCtxM :: (forall c. CtxM c v) -> IO v
 runCtxM action = runReaderT (unResourceT action) Ctx
 
--- test11 :: IO ()
--- test11 = runCA(newRgn(newRgn(newRgn(newRgn(newRgn(
---   newRgn(newRgn(newRgn(newRgn(return()))))))))))
+{-
 
--- test12 :: IO ()
--- test12 = runCA(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(
---   newRgn(newRgn(newRgn(newRgn(return())))))))))))
+test4 :: IO ()
+test4 = runCA(newRgn(newRgn(newRgn(newRgn(return())))))
 
--- test13 :: IO ()
--- test13 = runCA(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(
---   newRgn(newRgn(newRgn(newRgn(return()))))))))))))
+test11 :: IO ()
+test11 = runCA(newRgn(newRgn(newRgn(newRgn(newRgn(
+               newRgn(newRgn(newRgn(newRgn(return()))))))))))
 
+test12 :: IO ()
+test12 = runCA(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(
+               newRgn(newRgn(newRgn(newRgn(return())))))))))))
+
+test13 :: IO ()
+test13 = runCA(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(
+               newRgn(newRgn(newRgn(newRgn(return()))))))))))))
 
-{-
 test14 :: IO ()
 test14 = runCA(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(
                newRgn(newRgn(newRgn(newRgn(return())))))))))))))