[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