diff options
Diffstat (limited to 'testsuite/tests/rename/should_compile')
-rw-r--r-- | testsuite/tests/rename/should_compile/RnAux017.hs | 4 | ||||
-rw-r--r-- | testsuite/tests/rename/should_compile/T3221.hs | 2 | ||||
-rw-r--r-- | testsuite/tests/rename/should_compile/rn029.hs | 10 | ||||
-rw-r--r-- | testsuite/tests/rename/should_compile/rn041.hs | 6 | ||||
-rw-r--r-- | testsuite/tests/rename/should_compile/rn043.hs | 4 | ||||
-rw-r--r-- | testsuite/tests/rename/should_compile/rn049.hs | 5 | ||||
-rw-r--r-- | testsuite/tests/rename/should_compile/timing001.hs | 2 |
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!!! |