Commit 6cc2d276 authored by Simon Peyton Jones's avatar Simon Peyton Jones
Browse files

Test Trac #5938

parent a312fd1b
{-# LANGUAGE PolyKinds, TypeFamilies, DataKinds #-}
module T5938 where
type family KindFam a
type instance KindFam (a :: *) = Int
type instance KindFam (a :: Bool) = Bool
type instance KindFam (a :: Maybe k) = Char -- doesn't work
......@@ -31,5 +31,4 @@ test('T5881', normal, run_command, ['$MAKE -s --no-print-directory T5881'])
test('T5716', normal, compile_fail, [''])
test('T5937', normal, compile, [''])
test('T5935', normal, compile, [''])
test('T5938', normal, compile, [''])
Supports Markdown
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