diff options
| author | Simon Peyton Jones <simonpj@microsoft.com> | 2014-07-01 15:23:30 +0100 |
|---|---|---|
| committer | Simon Peyton Jones <simonpj@microsoft.com> | 2014-07-01 15:23:55 +0100 |
| commit | 127c45ea30eaee6b5244b3f30aaa701d0ad327ac (patch) | |
| tree | 6a59d8140baf2680ff2c1a34b47f8a05fc7d45d2 /testsuite/tests/polykinds/T9222.hs | |
| parent | d6ee82b29598dcc1028773dd987b7a2fb17519b7 (diff) | |
| download | haskell-127c45ea30eaee6b5244b3f30aaa701d0ad327ac.tar.gz | |
Test Trac #9222
Diffstat (limited to 'testsuite/tests/polykinds/T9222.hs')
| -rw-r--r-- | testsuite/tests/polykinds/T9222.hs | 7 |
1 files changed, 7 insertions, 0 deletions
diff --git a/testsuite/tests/polykinds/T9222.hs b/testsuite/tests/polykinds/T9222.hs new file mode 100644 index 0000000000..df112519ac --- /dev/null +++ b/testsuite/tests/polykinds/T9222.hs @@ -0,0 +1,7 @@ +{-# LANGUAGE RankNTypes, GADTs, DataKinds, PolyKinds, TypeOperators, TypeFamilies #-} +module T9222 where + +import Data.Proxy + +data Want :: (i,j) -> * where + Want :: (a ~ '(b,c) => Proxy b) -> Want a |