diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2011-07-01 08:12:41 +0100 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2011-07-01 08:12:41 +0100 |
| commit | 3780ba1ebd2e6e614ec2f05f25902122eb48e7c1 (patch) | |
| tree | 4a7a0fd65d3b070bf9188829fc3938281c339dee /testsuite/tests | |
| parent | aac4335ebcd903a0a8f90c6d889085c214122af4 (diff) | |
| download | haskell-3780ba1ebd2e6e614ec2f05f25902122eb48e7c1.tar.gz | |
Test Trac #1595
Diffstat (limited to 'testsuite/tests')
3 files changed, 8 insertions, 0 deletions
diff --git a/testsuite/tests/ghc-regress/rename/should_fail/T1595.hs b/testsuite/tests/ghc-regress/rename/should_fail/T1595.hs new file mode 100644 index 0000000000..8029878da5 --- /dev/null +++ b/testsuite/tests/ghc-regress/rename/should_fail/T1595.hs @@ -0,0 +1,5 @@ +module T1595 where + +a, b :: Integer -> Tpyo +a = undefined +b = undefined diff --git a/testsuite/tests/ghc-regress/rename/should_fail/T1595.stderr b/testsuite/tests/ghc-regress/rename/should_fail/T1595.stderr new file mode 100644 index 0000000000..82ad07c7ac --- /dev/null +++ b/testsuite/tests/ghc-regress/rename/should_fail/T1595.stderr @@ -0,0 +1,2 @@ + +T1595.hs:3:20: Not in scope: type constructor or class `Tpyo' diff --git a/testsuite/tests/ghc-regress/rename/should_fail/all.T b/testsuite/tests/ghc-regress/rename/should_fail/all.T index 40fca63bdd..6b56ae7990 100644 --- a/testsuite/tests/ghc-regress/rename/should_fail/all.T +++ b/testsuite/tests/ghc-regress/rename/should_fail/all.T @@ -80,3 +80,4 @@ test('T4042', normal, compile_fail, ['']) test('mc13', normal, compile_fail, ['']) test('mc14', normal, compile_fail, ['']) test('T5211', normal, compile, ['']) # Warnings only +test('T1595', normal, compile_fail, ['']) |