Commit 03b0b8e4 authored by Simon Peyton Jones's avatar Simon Peyton Jones
Browse files

Test Trac #12174

parent 08ba691a
{-# 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)
T12174.hs:9:23: error:
• Type constructor ‘T’ cannot be used here
(it is defined and used in the same recursive group)
• In the kind ‘T’
In the definition of data constructor ‘MkS’
In the data declaration for ‘S’
......@@ -14,3 +14,4 @@ test('InferDependency', normal, compile_fail, [''])
test('KindLevelsB', normal, compile_fail, [''])
test('T11473', normal, compile_fail, [''])
test('T11471', normal, compile_fail, [''])
test('T12174', normal, compile_fail, [''])
Markdown is supported
0% or .
You are about to add 0 people to the discussion. Proceed with caution.
Finish editing this message first!
Please register or to comment