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/roles/should_compile/Roles13.stderr | |
parent | b4ab30d54540573fbda3f561377d2c5968eb215c (diff) | |
download | haskell-1e3ca733694f0c9c8cc1d95237eb4b09cee4206f.tar.gz |
Update to tests due to change in syntax for role annotations.
Diffstat (limited to 'testsuite/tests/roles/should_compile/Roles13.stderr')
-rw-r--r-- | testsuite/tests/roles/should_compile/Roles13.stderr | 20 |
1 files changed, 20 insertions, 0 deletions
diff --git a/testsuite/tests/roles/should_compile/Roles13.stderr b/testsuite/tests/roles/should_compile/Roles13.stderr new file mode 100644 index 0000000000..647e59ba51 --- /dev/null +++ b/testsuite/tests/roles/should_compile/Roles13.stderr @@ -0,0 +1,20 @@ + +==================== Tidy Core ==================== +Result size of Tidy Core = {terms: 5, types: 9, coercions: 5} + +a :: Roles13.Wrap Roles13.Age -> Roles13.Wrap Roles13.Age +[GblId, Arity=1, Caf=NoCafRefs, Str=DmdType] +a = \ (ds :: Roles13.Wrap Roles13.Age) -> ds + +Roles13.convert :: Roles13.Wrap Roles13.Age -> GHC.Types.Int +[GblId, Arity=1, Caf=NoCafRefs, Str=DmdType] +Roles13.convert = + a + `cast` (<Roles13.Wrap Roles13.Age>_R + -> Roles13.NTCo:Wrap[0] Roles13.NTCo:Age[0] + :: (Roles13.Wrap Roles13.Age -> Roles13.Wrap Roles13.Age) + ~# + (Roles13.Wrap Roles13.Age -> GHC.Types.Int)) + + + |