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 | 915e07c33b143126e3c8de1d2ec22ccc709a9a24 (patch) | |
tree | fcde0a7ffc1466b6e53dbee6df835af07e9a7ecc /testsuite/tests/rebindable/rebindable1.hs | |
parent | 46ff80f26d1892e1b50e3f10c5d3fded33da6e81 (diff) | |
download | haskell-915e07c33b143126e3c8de1d2ec22ccc709a9a24.tar.gz |
Testsuite: tabs -> spaces [skip ci]
Diffstat (limited to 'testsuite/tests/rebindable/rebindable1.hs')
-rw-r--r-- | testsuite/tests/rebindable/rebindable1.hs | 74 |
1 files changed, 37 insertions, 37 deletions
diff --git a/testsuite/tests/rebindable/rebindable1.hs b/testsuite/tests/rebindable/rebindable1.hs index 4ff8ed2d4d..8fcc5d2697 100644 --- a/testsuite/tests/rebindable/rebindable1.hs +++ b/testsuite/tests/rebindable/rebindable1.hs @@ -2,55 +2,55 @@ {-# LANGUAGE RebindableSyntax, NPlusKPatterns #-} module RebindableCase1 where - { --- import Prelude; - import Prelude(String,undefined,Maybe(..), (==), (>=) ); + { +-- import Prelude; + import Prelude(String,undefined,Maybe(..), (==), (>=) ); - return :: a; - return = undefined; + return :: a; + return = undefined; - infixl 1 >>=; - (>>=) :: a; - (>>=) = undefined; + infixl 1 >>=; + (>>=) :: a; + (>>=) = undefined; - infixl 1 >>; - (>>) :: a; - (>>) = undefined; + infixl 1 >>; + (>>) :: a; + (>>) = undefined; - fail :: a; - fail = undefined; + fail :: a; + fail = undefined; - fromInteger :: a; - fromInteger = undefined; + fromInteger :: a; + fromInteger = undefined; - fromRational :: a; - fromRational = undefined; + fromRational :: a; + fromRational = undefined; - negate :: a; - negate = undefined; + negate :: a; + negate = undefined; - (-) :: a; - (-) = undefined; + (-) :: a; + (-) = undefined; - test_do f g = do - { - f; - Just a <- g; - return a; - }; + test_do f g = do + { + f; + Just a <- g; + return a; + }; - test_fromInteger = 1; + test_fromInteger = 1; - test_fromRational = 0.5; + test_fromRational = 0.5; - test_negate a = - a; + test_negate a = - a; - test_fromInteger_pattern 1 = undefined; - test_fromInteger_pattern (-1) = undefined; - test_fromInteger_pattern (a + 7) = a; + test_fromInteger_pattern 1 = undefined; + test_fromInteger_pattern (-1) = undefined; + test_fromInteger_pattern (a + 7) = a; - test_fromRational_pattern 0.5 = undefined; - test_fromRational_pattern (-0.5) = undefined; - test_fromRational_pattern _ = undefined; - } + test_fromRational_pattern 0.5 = undefined; + test_fromRational_pattern (-0.5) = undefined; + test_fromRational_pattern _ = undefined; + } |