blob: 29064d6a96316adc9eedcc61cce30d37b56e3e12 (
plain)
1
2
3
4
5
6
7
8
9
|
{-# LANGUAGE DataKinds #-}
{-# LANGUAGE ExistentialQuantification #-}
{-# LANGUAGE KindSignatures #-}
{-# LANGUAGE TypeInType #-}
module T12174 where
data V a
data T = forall (a :: S). MkT (V a)
data S = forall (a :: T). MkS (V a)
|