Repository : ssh://darcs.haskell.org//srv/darcs/testsuite On branch : master
http://hackage.haskell.org/trac/ghc/changeset/5e7a83f55da6b8a83291f560631c6a25f773e612 >--------------------------------------------------------------- commit 5e7a83f55da6b8a83291f560631c6a25f773e612 Author: Simon Peyton Jones <[email protected]> Date: Fri Mar 30 13:35:47 2012 +0100 Test Trac #5968 >--------------------------------------------------------------- tests/th/T5968.hs | 6 ++++++ tests/th/all.T | 1 + 2 files changed, 7 insertions(+), 0 deletions(-) diff --git a/tests/th/T5968.hs b/tests/th/T5968.hs new file mode 100644 index 0000000..d483d84 --- /dev/null +++ b/tests/th/T5968.hs @@ -0,0 +1,6 @@ +{-# LANGUAGE TemplateHaskell #-} +module T5968 where + +data Bar a = Bar $( [t| a |] ) + + diff --git a/tests/th/all.T b/tests/th/all.T index 87521ab..4bf6a32 100644 --- a/tests/th/all.T +++ b/tests/th/all.T @@ -227,4 +227,5 @@ test('T5886', extra_clean(['T5886a.hi','T5886a.o']), multimod_compile, ['T5886','-v0']) test('T4135', normal, compile, ['-v0']) test('T5971', normal, compile_fail, ['-v0 -dsuppress-uniques']) +test('T5968', normal, compile, ['-v0']) _______________________________________________ Cvs-ghc mailing list [email protected] http://www.haskell.org/mailman/listinfo/cvs-ghc
