[Git][ghc/ghc][master] Add testcase for #816
Marge Bot
gitlab at gitlab.haskell.org
Sat Oct 31 13:27:40 UTC 2020
Marge Bot pushed to branch master at Glasgow Haskell Compiler / GHC
Commits:
eb368078 by Andrzej Rybczak at 2020-10-31T09:27:34-04:00
Add testcase for #816
- - - - -
2 changed files:
- + testsuite/tests/typecheck/should_compile/T816.hs
- testsuite/tests/typecheck/should_compile/all.T
Changes:
=====================================
testsuite/tests/typecheck/should_compile/T816.hs
=====================================
@@ -0,0 +1,14 @@
+{-# LANGUAGE FlexibleInstances #-}
+{-# LANGUAGE FunctionalDependencies #-}
+{-# LANGUAGE UndecidableInstances #-}
+
+module T816 where
+
+class Foo x y | x -> y where
+ foo :: x -> y
+
+class Bar x y where
+ bar :: x -> y -> Int
+
+instance (Foo x y, Bar y z) => Bar x z where
+ bar x z = bar (foo x) z
=====================================
testsuite/tests/typecheck/should_compile/all.T
=====================================
@@ -266,6 +266,7 @@ test('FD3', normal, compile_fail, [''])
test('FD4', normal, compile, [''])
test('faxen', normal, compile, [''])
+test('T816', normal, compile, [''])
test('T1495', normal, compile, [''])
test('T2045', normal, compile, ['']) # Needs -fhpc
test('T2478', normal, compile, [''])
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/eb368078204bceba51e3c80e387ce1d776762cfd
--
View it on GitLab: https://gitlab.haskell.org/ghc/ghc/-/commit/eb368078204bceba51e3c80e387ce1d776762cfd
You're receiving this email because of your account on gitlab.haskell.org.
-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://mail.haskell.org/pipermail/ghc-commits/attachments/20201031/cf008fa4/attachment.html>
More information about the ghc-commits
mailing list