Repository : ssh://darcs.haskell.org//srv/darcs/testsuite On branch : master
http://hackage.haskell.org/trac/ghc/changeset/a04e3fd08896d61f9ab9a611d3c69890af2fe179 >--------------------------------------------------------------- commit a04e3fd08896d61f9ab9a611d3c69890af2fe179 Author: Simon Marlow <[email protected]> Date: Tue Jul 12 11:47:13 2011 +0100 add test for #5243 >--------------------------------------------------------------- tests/ghc-regress/parser/should_compile/T5243.hs | 1 + .../ghc-regress/parser/should_compile/T5243.stderr | 3 +++ tests/ghc-regress/parser/should_compile/T5243A.hs | 2 ++ tests/ghc-regress/parser/should_compile/all.T | 2 ++ 4 files changed, 8 insertions(+), 0 deletions(-) diff --git a/tests/ghc-regress/parser/should_compile/T5243.hs b/tests/ghc-regress/parser/should_compile/T5243.hs new file mode 100644 index 0000000..e58ace2 --- /dev/null +++ b/tests/ghc-regress/parser/should_compile/T5243.hs @@ -0,0 +1 @@ + { import T5243A; main = print bar } diff --git a/tests/ghc-regress/parser/should_compile/T5243.stderr b/tests/ghc-regress/parser/should_compile/T5243.stderr new file mode 100644 index 0000000..450e001 --- /dev/null +++ b/tests/ghc-regress/parser/should_compile/T5243.stderr @@ -0,0 +1,3 @@ +[1 of 2] Compiling T5243A ( T5243A.hs, T5243A.o ) +[2 of 2] Compiling Main ( T5243.hs, T5243.o ) +Linking T5243 ... diff --git a/tests/ghc-regress/parser/should_compile/T5243A.hs b/tests/ghc-regress/parser/should_compile/T5243A.hs new file mode 100644 index 0000000..2332c84 --- /dev/null +++ b/tests/ghc-regress/parser/should_compile/T5243A.hs @@ -0,0 +1,2 @@ +module T5243A where +bar = True diff --git a/tests/ghc-regress/parser/should_compile/all.T b/tests/ghc-regress/parser/should_compile/all.T index 6609e26..328c065 100644 --- a/tests/ghc-regress/parser/should_compile/all.T +++ b/tests/ghc-regress/parser/should_compile/all.T @@ -90,3 +90,5 @@ test('NondecreasingIndentation', normal, compile, ['']) test('mc15', normal, compile, ['']) test('mc16', normal, compile, ['']) test('EmptyDecls', normal, compile, ['']) + +test('T5243', normal, multimod_compile, ['T5243','']) _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
