summaryrefslogtreecommitdiff
path: root/testsuite/tests/rename/should_compile
diff options
context:
space:
mode:
authorThomas Miedema <thomasmiedema@gmail.com>2016-06-18 22:44:19 +0200
committerThomas Miedema <thomasmiedema@gmail.com>2016-06-20 16:22:07 +0200
commit915e07c33b143126e3c8de1d2ec22ccc709a9a24 (patch)
treefcde0a7ffc1466b6e53dbee6df835af07e9a7ecc /testsuite/tests/rename/should_compile
parent46ff80f26d1892e1b50e3f10c5d3fded33da6e81 (diff)
downloadhaskell-915e07c33b143126e3c8de1d2ec22ccc709a9a24.tar.gz
Testsuite: tabs -> spaces [skip ci]
Diffstat (limited to 'testsuite/tests/rename/should_compile')
-rw-r--r--testsuite/tests/rename/should_compile/RnAux017.hs4
-rw-r--r--testsuite/tests/rename/should_compile/T3221.hs2
-rw-r--r--testsuite/tests/rename/should_compile/rn029.hs10
-rw-r--r--testsuite/tests/rename/should_compile/rn041.hs6
-rw-r--r--testsuite/tests/rename/should_compile/rn043.hs4
-rw-r--r--testsuite/tests/rename/should_compile/rn049.hs5
-rw-r--r--testsuite/tests/rename/should_compile/timing001.hs2
7 files changed, 16 insertions, 17 deletions
diff --git a/testsuite/tests/rename/should_compile/RnAux017.hs b/testsuite/tests/rename/should_compile/RnAux017.hs
index 5514524fee..5eb076ddd1 100644
--- a/testsuite/tests/rename/should_compile/RnAux017.hs
+++ b/testsuite/tests/rename/should_compile/RnAux017.hs
@@ -1,6 +1,6 @@
module RnAux017 where
-import Test -- Import main module so there really is a loop
- -- (avoid warning message)
+import Test -- Import main module so there really is a loop
+ -- (avoid warning message)
data Wibble = Wibble
data Wobble = Wobble
diff --git a/testsuite/tests/rename/should_compile/T3221.hs b/testsuite/tests/rename/should_compile/T3221.hs
index 5550fd3fa7..970abfb403 100644
--- a/testsuite/tests/rename/should_compile/T3221.hs
+++ b/testsuite/tests/rename/should_compile/T3221.hs
@@ -1,7 +1,7 @@
{-# OPTIONS_GHC -Werror -fwarn-unused-binds #-}
-- Test Trac #3221: the constructors are used by the deriving
--- clause, even though they are not exported
+-- clause, even though they are not exported
module T3221( Foo ) where
diff --git a/testsuite/tests/rename/should_compile/rn029.hs b/testsuite/tests/rename/should_compile/rn029.hs
index 76dd993dc9..20439d2ab6 100644
--- a/testsuite/tests/rename/should_compile/rn029.hs
+++ b/testsuite/tests/rename/should_compile/rn029.hs
@@ -3,12 +3,12 @@ module ShouldCompile where
import Data.List ( reverse, sort )
-sort :: Int -- Clashes with Data.List.sort,
-sort = 4 -- but never used, so OK
-
+sort :: Int -- Clashes with Data.List.sort,
+sort = 4 -- but never used, so OK
-reverse :: Int -- Clashes with Data.List.reverse,
-reverse = 3 -- but the only uses are qualified
+
+reverse :: Int -- Clashes with Data.List.reverse,
+reverse = 3 -- but the only uses are qualified
x = ShouldCompile.reverse
diff --git a/testsuite/tests/rename/should_compile/rn041.hs b/testsuite/tests/rename/should_compile/rn041.hs
index 454227c14d..1606e537ce 100644
--- a/testsuite/tests/rename/should_compile/rn041.hs
+++ b/testsuite/tests/rename/should_compile/rn041.hs
@@ -4,10 +4,10 @@
module ShouldCompile( t ) where
-f x = f x -- Unused
+f x = f x -- Unused
-g x = h x -- Unused
+g x = h x -- Unused
h x = g x
-t x = t x -- Used by export list
+t x = t x -- Used by export list
diff --git a/testsuite/tests/rename/should_compile/rn043.hs b/testsuite/tests/rename/should_compile/rn043.hs
index e88e8426df..e1b01135f9 100644
--- a/testsuite/tests/rename/should_compile/rn043.hs
+++ b/testsuite/tests/rename/should_compile/rn043.hs
@@ -2,5 +2,5 @@
module ShouldCompile (module M) where
- import Rn043_A as M -- x, M.x
- import Rn043_B -- x, Rn043_A.x
+ import Rn043_A as M -- x, M.x
+ import Rn043_B -- x, Rn043_A.x
diff --git a/testsuite/tests/rename/should_compile/rn049.hs b/testsuite/tests/rename/should_compile/rn049.hs
index 83f6c5c276..82c78b7742 100644
--- a/testsuite/tests/rename/should_compile/rn049.hs
+++ b/testsuite/tests/rename/should_compile/rn049.hs
@@ -1,7 +1,7 @@
-- GHC 6.4.1 said
-- test.hs:1:5:
--- Warning: accepting non-standard pattern guards
--- (-fglasgow-exts to suppress this message)
+-- Warning: accepting non-standard pattern guards
+-- (-fglasgow-exts to suppress this message)
-- [x <- ((1 * 2) + 3) * 4, undefined]
-- Note the wrongly-parenthesised expression
@@ -10,4 +10,3 @@
module ShouldCompile where
main | x <- 1*2+3*4 = x
- \ No newline at end of file
diff --git a/testsuite/tests/rename/should_compile/timing001.hs b/testsuite/tests/rename/should_compile/timing001.hs
index b84b341f19..af4d9cc147 100644
--- a/testsuite/tests/rename/should_compile/timing001.hs
+++ b/testsuite/tests/rename/should_compile/timing001.hs
@@ -504,4 +504,4 @@ a495 = a496
a496 = a497
a497 = a498
a498 = a499
-a499 = [] -- !!! ta-dah!!!
+a499 = [] -- !!! ta-dah!!!