Commit dc587fe7 authored by's avatar

Test case for #10141

parent d4cf5591
{-# LANGUAGE TypeFamilies, PolyKinds #-}
module T10141 where
type family G (a :: k) where
G Int = Bool
G Bool = Int
G a = a
T10141.hs:6:6: error:
The first argument of ‘G’ should have kind ‘k’,
but ‘Int’ has kind ‘*’
In the type ‘Int’
In the type family declaration for ‘G’
......@@ -136,3 +136,4 @@ test('T6088', normal, compile_fail, [''])
test('T7788', normal, compile_fail, [''])
test('T8550', normal, compile_fail, [''])
test('T9554', normal, compile_fail, [''])
test('T10141', 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