diff options
Diffstat (limited to 'testsuite/tests/typecheck/should_fail/T20443b.hs')
-rw-r--r-- | testsuite/tests/typecheck/should_fail/T20443b.hs | 13 |
1 files changed, 13 insertions, 0 deletions
diff --git a/testsuite/tests/typecheck/should_fail/T20443b.hs b/testsuite/tests/typecheck/should_fail/T20443b.hs new file mode 100644 index 0000000000..03b44f343d --- /dev/null +++ b/testsuite/tests/typecheck/should_fail/T20443b.hs @@ -0,0 +1,13 @@ +module T20443b where + +import Data.Kind + +data Proxy t where + Proxy :: forall {k} (t :: k) . Proxy t + +a :: () -> Proxy Int +-- a = Proxy @Type @Int -- This would, rightfully, not compile +a () = Proxy @Int + +b :: Proxy Int -> () +b (Proxy @Type @Int) = () |