Repository : ssh://darcs.haskell.org//srv/darcs/testsuite On branch : master
http://hackage.haskell.org/trac/ghc/changeset/bd0f7424562965419f1cc0cea9c9aedb8acd9ce2 >--------------------------------------------------------------- commit bd0f7424562965419f1cc0cea9c9aedb8acd9ce2 Author: Simon Marlow <[email protected]> Date: Mon Jan 28 09:28:40 2013 +0000 test for #2435 >--------------------------------------------------------------- tests/rename/should_compile/T2435.hs | 4 ++++ tests/rename/should_compile/T2435Foo.hs | 3 +++ tests/rename/should_compile/all.T | 2 ++ 3 files changed, 9 insertions(+), 0 deletions(-) diff --git a/tests/rename/should_compile/T2435.hs b/tests/rename/should_compile/T2435.hs new file mode 100644 index 0000000..ab58f2b --- /dev/null +++ b/tests/rename/should_compile/T2435.hs @@ -0,0 +1,4 @@ +{-# LANGUAGE TypeFamilies #-} +module Bar where +import qualified T2435Foo as Foo +instance Foo.C Int where type T Int = Int diff --git a/tests/rename/should_compile/T2435Foo.hs b/tests/rename/should_compile/T2435Foo.hs new file mode 100644 index 0000000..47fba68 --- /dev/null +++ b/tests/rename/should_compile/T2435Foo.hs @@ -0,0 +1,3 @@ +{-# LANGUAGE TypeFamilies #-} +module T2435Foo where +class C a where type T a diff --git a/tests/rename/should_compile/all.T b/tests/rename/should_compile/all.T index f31b0a0..a1f1965 100644 --- a/tests/rename/should_compile/all.T +++ b/tests/rename/should_compile/all.T @@ -202,3 +202,5 @@ test('dodgy', ['dodgy', '-v0']) test('T7167', normal, compile, ['']) test('T7336', normal, compile, ['-Wall']) + +test('T2435', normal, multimod_compile, ['T2435','-v0']) _______________________________________________ ghc-commits mailing list [email protected] http://www.haskell.org/mailman/listinfo/ghc-commits
