testsuite/tests/module/mod17.hs

   1 -- !!! Testing non-member function in explicit class export list
   2 module M(C(m1,m2,m3,Left)) where
   3 class C a where
   4   m1 :: a
   5   m2, m3 :: a