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

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/cec7971b204a2725e30b5747d41bff682eeae412

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

commit cec7971b204a2725e30b5747d41bff682eeae412
Author: Simon Marlow <[email protected]>
Date:   Thu Dec 1 15:17:11 2011 +0000

    callstack001: add -fno-state-hack to get consistent output

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

 tests/profiling/should_run/all.T               |    2 +-
 tests/profiling/should_run/callstack001.stdout |    4 ++--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/tests/profiling/should_run/all.T b/tests/profiling/should_run/all.T
index d1ac005..18c1eec 100644
--- a/tests/profiling/should_run/all.T
+++ b/tests/profiling/should_run/all.T
@@ -102,7 +102,7 @@ test('T5559', # unicode in cost centre names
 
 test('callstack001',
      [ req_profiling, extra_ways(['prof']), only_ways(prof_ways) ],
-     compile_and_run, [''])
+     compile_and_run, ['-fno-state-hack'])
 
 test('callstack002',
      [ req_profiling, extra_ways(['prof']), only_ways(prof_ways) ],
diff --git a/tests/profiling/should_run/callstack001.stdout 
b/tests/profiling/should_run/callstack001.stdout
index 6169cc9..7c33871 100644
--- a/tests/profiling/should_run/callstack001.stdout
+++ b/tests/profiling/should_run/callstack001.stdout
@@ -1,2 +1,2 @@
-["Main.main","Main.mapM","Main.mapM.go","Main.f"]
-["Main.main","Main.mapM","Main.mapM.go","Main.f"]
+["Main.CAF","Main.main","Main.mapM","Main.mapM.go","Main.f"]
+["Main.CAF","Main.main","Main.mapM","Main.mapM.go","Main.f"]



_______________________________________________
Cvs-ghc mailing list
[email protected]
http://www.haskell.org/mailman/listinfo/cvs-ghc

Reply via email to