Commit afee0039 authored by Simon Peyton Jones's avatar Simon Peyton Jones
Browse files

Test Trac #5798

parent 777dff2e
{-# LANGUAGE PolyKinds #-}
module T5798 where
data Proxy t = ProxyC
test :: Proxy '[Int, Bool]
test = ProxyC
......@@ -16,3 +16,5 @@ test('PolyKinds06', normal, compile_fail, [''])
test('PolyKinds07', normal, compile_fail, [''])
test('PolyKinds12', expect_fail, compile, [''])
test('T5798', normal, compile, [''])
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