[commit: testsuite] master: Add (in comments) more variants to T3064 (107630d)

[Simon Peyton Jones]

Repository : ssh://darcs.haskell.org//srv/darcs/testsuite

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/107630d4639b96fcb4b25cde9e84782fbc9e52be

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

commit 107630d4639b96fcb4b25cde9e84782fbc9e52be
Author: Simon Peyton Jones <simonpj at microsoft.com>
Date:   Thu Apr 5 13:34:45 2012 +0100

    Add (in comments) more variants to T3064

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

 tests/perf/compiler/T3064.hs |   20 +++++++++++++++++++-
 1 files changed, 19 insertions(+), 1 deletions(-)

diff --git a/tests/perf/compiler/T3064.hs b/tests/perf/compiler/T3064.hs
index 328da45..7b45883 100644
--- a/tests/perf/compiler/T3064.hs
+++ b/tests/perf/compiler/T3064.hs
@@ -60,4 +60,22 @@ runCtxM action = runReaderT (unResourceT action) Ctx
 
 test14 :: IO ()
 test14 = runCA(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(
-  newRgn(newRgn(newRgn(newRgn(return())))))))))))))
+               newRgn(newRgn(newRgn(newRgn(return())))))))))))))
+
+{-
+test28 :: IO ()
+test28 = runCA(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(
+               newRgn(newRgn(newRgn(newRgn(
+               newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(
+               newRgn(newRgn(newRgn(newRgn(return())))))))))))))))))))))))))
+
+test56 :: IO ()
+test56 = runCA(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(
+               newRgn(newRgn(newRgn(newRgn(
+               newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(
+               newRgn(newRgn(newRgn(newRgn(
+               newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(
+               newRgn(newRgn(newRgn(newRgn(
+               newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(newRgn(
+               newRgn(newRgn(newRgn(newRgn(return())))))))))))))))))))))))))))))))))))))))))))))))))
+-}