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

On branch  : master

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

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

commit a89189705bb254b9e939da422d5f1f64fe510fda
Author: Simon Peyton Jones <[email protected]>
Date:   Sat Jun 11 14:49:22 2011 +0100

    Tweak UNPACK pramgma test

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

 tests/ghc-regress/typecheck/should_fail/T3966.hs   |    3 ++-
 .../ghc-regress/typecheck/should_fail/T3966.stderr |    3 +--
 2 files changed, 3 insertions(+), 3 deletions(-)

diff --git a/tests/ghc-regress/typecheck/should_fail/T3966.hs 
b/tests/ghc-regress/typecheck/should_fail/T3966.hs
index 0824345..7b1184c 100644
--- a/tests/ghc-regress/typecheck/should_fail/T3966.hs
+++ b/tests/ghc-regress/typecheck/should_fail/T3966.hs
@@ -1,4 +1,5 @@
-{-# OPTIONS_GHC -Werror #-}
+{-# OPTIONS_GHC -Werror -O #-}
+-- Add -O so the UNPACK has some effect
 
 module T3966 where
 
diff --git a/tests/ghc-regress/typecheck/should_fail/T3966.stderr 
b/tests/ghc-regress/typecheck/should_fail/T3966.stderr
index 4159b77..b24087f 100644
--- a/tests/ghc-regress/typecheck/should_fail/T3966.stderr
+++ b/tests/ghc-regress/typecheck/should_fail/T3966.stderr
@@ -1,5 +1,5 @@
 
-T3966.hs:5:16:
+T3966.hs:6:16:
     Warning: Ignoring unusable UNPACK pragma on the
              first argument of `Foo'
     In the definition of data constructor `Foo'
@@ -7,4 +7,3 @@ T3966.hs:5:16:
 
 <no location info>: 
 Failing due to -Werror.
-



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

Reply via email to