[commit: ghc] master: testsuite: Remove uniques from T15243's stderr output (93220d4)
git at git.haskell.org
git at git.haskell.org
Mon Jun 11 02:28:10 UTC 2018
Repository : ssh://git@git.haskell.org/ghc
On branch : master
Link : http://ghc.haskell.org/trac/ghc/changeset/93220d46fceabf3afeae36f1fda94e1698c3639a/ghc
>---------------------------------------------------------------
commit 93220d46fceabf3afeae36f1fda94e1698c3639a
Author: Ben Gamari <ben at smart-cactus.org>
Date: Sun Jun 10 22:26:13 2018 -0400
testsuite: Remove uniques from T15243's stderr output
>---------------------------------------------------------------
93220d46fceabf3afeae36f1fda94e1698c3639a
testsuite/tests/th/T15243.stderr | 20 ++++++++++----------
1 file changed, 10 insertions(+), 10 deletions(-)
diff --git a/testsuite/tests/th/T15243.stderr b/testsuite/tests/th/T15243.stderr
index 26082a1..4e50186 100644
--- a/testsuite/tests/th/T15243.stderr
+++ b/testsuite/tests/th/T15243.stderr
@@ -1,12 +1,12 @@
T15243.hs:(10,3)-(15,6): Splicing declarations
- [d| type family F_at5 (a_at7 :: k_at6) :: k_at6 where
- F_at5 'Unit = 'Unit
- F_at5 '(,) = '(,)
- F_at5 '[] = '[]
- F_at5 '(:) = '(:) |]
+ [d| type family F (a :: k) :: k where
+ F 'Unit = 'Unit
+ F '(,) = '(,)
+ F '[] = '[]
+ F '(:) = '(:) |]
======>
- type family F_a3ZE (a_a3ZG :: k_a3ZF) :: k_a3ZF where
- F_a3ZE 'Unit = 'Unit
- F_a3ZE '(,) = '(,)
- F_a3ZE '[] = '[]
- F_a3ZE '(:) = '(:)
+ type family F (a :: k) :: k where
+ F 'Unit = 'Unit
+ F '(,) = '(,)
+ F '[] = '[]
+ F '(:) = '(:)
More information about the ghc-commits
mailing list