Repository : ssh://darcs.haskell.org//srv/darcs/testsuite On branch : master
http://hackage.haskell.org/trac/ghc/changeset/fd30482f38c5cb5527f03afee233839611652997 >--------------------------------------------------------------- commit fd30482f38c5cb5527f03afee233839611652997 Author: Simon Peyton Jones <[email protected]> Date: Thu May 24 14:04:35 2012 +0100 Test Trac #6120 >--------------------------------------------------------------- tests/rename/should_compile/T6120.hs | 10 ++++++++++ tests/rename/should_compile/all.T | 1 + 2 files changed, 11 insertions(+), 0 deletions(-) diff --git a/tests/rename/should_compile/T6120.hs b/tests/rename/should_compile/T6120.hs new file mode 100644 index 0000000..e35d221 --- /dev/null +++ b/tests/rename/should_compile/T6120.hs @@ -0,0 +1,10 @@ +module T6120 where + +infix 3 +++ + +class C a where + (+++) :: a -> a -> a + +{-# DEPRECATED fail "fail is deprecated" #-} +fail :: String -> String +fail = id diff --git a/tests/rename/should_compile/all.T b/tests/rename/should_compile/all.T index 0fb103f..95174b1 100644 --- a/tests/rename/should_compile/all.T +++ b/tests/rename/should_compile/all.T @@ -190,3 +190,4 @@ test('T5867', extra_clean(['T5867a.hi', 'T5867a.o']), multimod_compile, ['T5867', '-v0']) test('T6027', normal, compile, ['']) +test('T6120', normal, compile, ['']) _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
