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 | a7160faafd44d64c2b20a4cc65e80136a93e1aaa (patch) | |
tree | c0fa999a4696a5a05e861b0eacfcd92358d77a48 /testsuite/tests/indexed-types/should_compile/ColInference5.hs | |
parent | 5b03dc69389dc387b922c589ab9a8b92079e6a96 (diff) | |
download | haskell-a7160faafd44d64c2b20a4cc65e80136a93e1aaa.tar.gz |
Testsuite: tabs -> spaces [skip ci]
Diffstat (limited to 'testsuite/tests/indexed-types/should_compile/ColInference5.hs')
-rw-r--r-- | testsuite/tests/indexed-types/should_compile/ColInference5.hs | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/testsuite/tests/indexed-types/should_compile/ColInference5.hs b/testsuite/tests/indexed-types/should_compile/ColInference5.hs index b65a90092e..1b623cb1b0 100644 --- a/testsuite/tests/indexed-types/should_compile/ColInference5.hs +++ b/testsuite/tests/indexed-types/should_compile/ColInference5.hs @@ -1,6 +1,6 @@ {-# LANGUAGE TypeFamilies #-} -module ColInference where +module ColInference where type family Elem c @@ -11,7 +11,7 @@ class Col c where add :: c -> Elem c -> c headTail :: c -> (Elem c,c) -sawpOne c1 c2 - = let (x,c1') = headTail c1 +sawpOne c1 c2 + = let (x,c1') = headTail c1 (y,c2') = headTail c2 - in (add c1' y,add c1' y) + in (add c1' y,add c1' y) |