diff options
| author | Thomas Miedema <thomasmiedema@gmail.com> | 2016-06-18 22:44:19 +0200 |
|---|---|---|
| committer | Thomas Miedema <thomasmiedema@gmail.com> | 2016-06-20 16:22:07 +0200 |
| commit | 3dc1202546e63b50f828a34474717b1ddcbed5c7 (patch) | |
| tree | 745fde8e9712c6d0b0507d9ae4988736c678abdb /testsuite/tests/polykinds | |
| parent | cf6e65693588cd9d40c895279f2e53d3d25a2c58 (diff) | |
| download | haskell-3dc1202546e63b50f828a34474717b1ddcbed5c7.tar.gz | |
Testsuite: tabs -> spaces [skip ci]
Diffstat (limited to 'testsuite/tests/polykinds')
| -rw-r--r-- | testsuite/tests/polykinds/T7238.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/testsuite/tests/polykinds/T7238.hs b/testsuite/tests/polykinds/T7238.hs index 3639a8e089..efe0fb1674 100644 --- a/testsuite/tests/polykinds/T7238.hs +++ b/testsuite/tests/polykinds/T7238.hs @@ -4,11 +4,11 @@ module T7238 where import GHC.Exts class Pair p where - type Ctxt p a :: Constraint - l :: Ctxt p a => p a -> a + type Ctxt p a :: Constraint + l :: Ctxt p a => p a -> a data Unit a = Unit instance Pair Unit where - type Ctxt Unit a = a ~ () - l _ = ()
\ No newline at end of file + type Ctxt Unit a = a ~ () + l _ = () |