From 6074c108b66ec9cd2230852addb60782a8b17e0a Mon Sep 17 00:00:00 2001 From: Thomas Miedema Date: Mon, 22 Feb 2016 21:32:51 +0100 Subject: Testsuite: delete Windows line endings [skip ci] (#11631) --- testsuite/tests/driver/Shared001.hs | 18 +++++++++--------- testsuite/tests/driver/recomp010/X1.hs | 20 ++++++++++---------- testsuite/tests/driver/recomp010/X2.hs | 20 ++++++++++---------- 3 files changed, 29 insertions(+), 29 deletions(-) (limited to 'testsuite/tests/driver') diff --git a/testsuite/tests/driver/Shared001.hs b/testsuite/tests/driver/Shared001.hs index 4f6a3d9c3d..4d827b85ba 100644 --- a/testsuite/tests/driver/Shared001.hs +++ b/testsuite/tests/driver/Shared001.hs @@ -1,9 +1,9 @@ -{-# LANGUAGE ForeignFunctionInterface #-} -module Shared001 where - --- Test for building DLLs with ghc -shared, see #2745 - -f :: Int -> Int -f x = x+1 - -foreign export ccall f :: Int -> Int +{-# LANGUAGE ForeignFunctionInterface #-} +module Shared001 where + +-- Test for building DLLs with ghc -shared, see #2745 + +f :: Int -> Int +f x = x+1 + +foreign export ccall f :: Int -> Int diff --git a/testsuite/tests/driver/recomp010/X1.hs b/testsuite/tests/driver/recomp010/X1.hs index 7906d4beef..84768c9349 100644 --- a/testsuite/tests/driver/recomp010/X1.hs +++ b/testsuite/tests/driver/recomp010/X1.hs @@ -1,10 +1,10 @@ -module X (x, D1(..), D2(..)) -where - -data D1 = D { f :: D2 } -- deriving Show -data D2 = A | B -- deriving Show - -x :: D1 -x = D { f = A } - - +module X (x, D1(..), D2(..)) +where + +data D1 = D { f :: D2 } -- deriving Show +data D2 = A | B -- deriving Show + +x :: D1 +x = D { f = A } + + diff --git a/testsuite/tests/driver/recomp010/X2.hs b/testsuite/tests/driver/recomp010/X2.hs index e120124551..d57bda6a74 100644 --- a/testsuite/tests/driver/recomp010/X2.hs +++ b/testsuite/tests/driver/recomp010/X2.hs @@ -1,10 +1,10 @@ -module X (x, D1(..), D2(..)) -where - -data D1 = D { f :: D2 } -- deriving Show -data D2 = A | B -- deriving Show - -x :: D1 -x = D { f = B } - - +module X (x, D1(..), D2(..)) +where + +data D1 = D { f :: D2 } -- deriving Show +data D2 = A | B -- deriving Show + +x :: D1 +x = D { f = B } + + -- cgit v1.2.1