[commit: packages/base] master: Revert "length001 passes now" (426c287)

[git at git.haskell.org]

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

On branch  : master
Link       : http://ghc.haskell.org/trac/ghc/changeset/426c28721fa9e19a26fbe84f48d3190b663a1dbf/base

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

commit 426c28721fa9e19a26fbe84f48d3190b663a1dbf
Author: Austin Seipp <aseipp at pobox.com>
Date:   Sun Sep 8 16:19:17 2013 -0500

    Revert "length001 passes now"
    
    This reverts commit 1be0171fc8c911a7ce3d1e3926475e789d077724.


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

426c28721fa9e19a26fbe84f48d3190b663a1dbf
 tests/all.T |    6 +++++-
 1 file changed, 5 insertions(+), 1 deletion(-)

diff --git a/tests/all.T b/tests/all.T
index 36f22d5..37e3c13 100644
--- a/tests/all.T
+++ b/tests/all.T
@@ -53,7 +53,11 @@ test('char002', 	normal, compile_and_run, [''])
 
 test('cstring001', 	normal, compile_and_run, [''])
 
-test('length001', normal, compile_and_run, [''])
+test('length001',
+     # This fails without -O, as it relies on a RULE being applied
+     expect_fail_for(['normal', 'threaded1', 'llvm']),
+     compile_and_run,
+     [''])
 
 test('ratio001', 	normal, compile_and_run, [''])