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

On branch  : master

http://hackage.haskell.org/trac/ghc/changeset/18ac8e8a76f6dff07f87d5896a5b931c49ccef6e

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

commit 18ac8e8a76f6dff07f87d5896a5b931c49ccef6e
Author: Simon Peyton Jones <[email protected]>
Date:   Sat Jul 14 13:27:24 2012 +0100

    Test Trac #7023

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

 tests/typecheck/should_run/T7023.hs                |    9 +++++++++
 .../should_run/T7023.stdout}                       |    0 
 tests/typecheck/should_run/all.T                   |    1 +
 3 files changed, 10 insertions(+), 0 deletions(-)

diff --git a/tests/typecheck/should_run/T7023.hs 
b/tests/typecheck/should_run/T7023.hs
new file mode 100644
index 0000000..6df43db
--- /dev/null
+++ b/tests/typecheck/should_run/T7023.hs
@@ -0,0 +1,9 @@
+{-# OPTIONS_GHC -fdefer-type-errors #-}
+
+module Main where
+
+a = ["x", 1 :: Int]
+
+main :: IO ()
+main = putStrLn "Hello World"
+
diff --git a/tests/driver/dynHelloWorld.stdout 
b/tests/typecheck/should_run/T7023.stdout
similarity index 92%
copy from tests/driver/dynHelloWorld.stdout
copy to tests/typecheck/should_run/T7023.stdout
index 557db03..e6f4275 100644
diff --git a/tests/typecheck/should_run/all.T b/tests/typecheck/should_run/all.T
index fb54899..73275ad 100755
--- a/tests/typecheck/should_run/all.T
+++ b/tests/typecheck/should_run/all.T
@@ -94,3 +94,4 @@ test('mc17', normal, compile_and_run, [''])
 test('T5759', normal, compile_and_run, [''])
 test('T5573a', compose(omit_ways(['ghci']),only_compiler_types(['ghc'])), 
compile_and_run, [''])
 test('T5573b', compose(omit_ways(['ghci']),only_compiler_types(['ghc'])), 
compile_and_run, [''])
+test('T7023', normal, compile_and_run, [''])



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

Reply via email to