blob: e4a39ce56eeed0b10036d3874edf33249ea78a1c (
plain)
1
2
3
4
5
6
7
8
9
10
|
{-# LANGUAGE TypeFamilies #-}
{-# LANGUAGE ConstraintKinds #-}
{-# LANGUAGE FlexibleContexts #-}
module T12866 where
type Test2 a = (Eq (TestM a))
class Test a where
type TestM :: *
|