blob: 53714f1a6862c5107958823adbca642c0304b66d (
plain)
1
2
3
4
5
6
7
8
9
10
|
{-# LANGUAGE PolyKinds #-}
module Bug11592 where
data A (a :: a) = MkA String
data B b (a :: a b) = MkB String
data C b (a :: b a) = MkC String
data D b c (a :: c a b) = MkD String
|