diff options
| author | Richard Eisenberg <eir@seas.upenn.edu> | 2013-08-28 12:05:03 -0400 |
|---|---|---|
| committer | Richard Eisenberg <eir@cis.upenn.edu> | 2013-09-17 21:41:53 -0400 |
| commit | 1e3ca733694f0c9c8cc1d95237eb4b09cee4206f (patch) | |
| tree | 73f31ae153ac841d0f8499b5edd98075881bdec4 /testsuite/tests/typecheck/should_fail/TcCoercibleFail.hs | |
| parent | b4ab30d54540573fbda3f561377d2c5968eb215c (diff) | |
| download | haskell-1e3ca733694f0c9c8cc1d95237eb4b09cee4206f.tar.gz | |
Update to tests due to change in syntax for role annotations.
Diffstat (limited to 'testsuite/tests/typecheck/should_fail/TcCoercibleFail.hs')
| -rw-r--r-- | testsuite/tests/typecheck/should_fail/TcCoercibleFail.hs | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/testsuite/tests/typecheck/should_fail/TcCoercibleFail.hs b/testsuite/tests/typecheck/should_fail/TcCoercibleFail.hs index 54d5d2fc1a..082fbadebf 100644 --- a/testsuite/tests/typecheck/should_fail/TcCoercibleFail.hs +++ b/testsuite/tests/typecheck/should_fail/TcCoercibleFail.hs @@ -5,7 +5,8 @@ import Data.Ord (Down) newtype Age = Age Int deriving Show -data Map a@N b = Map a b deriving Show +type role Map nominal _ +data Map a b = Map a b deriving Show foo1 = coerce $ one :: () |