diff options
| author | Ben Gamari <ben@smart-cactus.org> | 2020-01-03 21:51:11 -0500 |
|---|---|---|
| committer | Marge Bot <ben+marge-bot@smart-cactus.org> | 2020-02-08 10:17:55 -0500 |
| commit | aede171a59f9b7b8022548c385a1cb8c4589f905 (patch) | |
| tree | 70c3a4e1518592f9392893ea3ad64a25bae0f467 /testsuite/tests/codeGen/should_run | |
| parent | c2e301aeeae353a64be43e5fa9e7d464797d5648 (diff) | |
| download | haskell-aede171a59f9b7b8022548c385a1cb8c4589f905.tar.gz | |
testsuite: Fix -Wcompat-unqualified-imports issues
Diffstat (limited to 'testsuite/tests/codeGen/should_run')
| -rw-r--r-- | testsuite/tests/codeGen/should_run/T1852.hs | 1 | ||||
| -rw-r--r-- | testsuite/tests/codeGen/should_run/cgrun047.hs | 2 | ||||
| -rw-r--r-- | testsuite/tests/codeGen/should_run/compareByteArrays.hs | 2 |
3 files changed, 2 insertions, 3 deletions
diff --git a/testsuite/tests/codeGen/should_run/T1852.hs b/testsuite/tests/codeGen/should_run/T1852.hs index f5d9370741..2564f5f1f9 100644 --- a/testsuite/tests/codeGen/should_run/T1852.hs +++ b/testsuite/tests/codeGen/should_run/T1852.hs @@ -1,5 +1,4 @@ {-# OPTIONS_GHC -funbox-strict-fields #-} -import Data.List data Vec4 = Vec4 !Float !Float !Float !Float diff --git a/testsuite/tests/codeGen/should_run/cgrun047.hs b/testsuite/tests/codeGen/should_run/cgrun047.hs index 8880814e78..f361d2e9d4 100644 --- a/testsuite/tests/codeGen/should_run/cgrun047.hs +++ b/testsuite/tests/codeGen/should_run/cgrun047.hs @@ -6,7 +6,7 @@ module Main where -- specified. Through a process of elimination I've managed to reproduce -- the problemin the following (much simpler) piece of code: -import Data.List +import Data.List (groupBy) test es = concat (groupBy eq (zip [0..(length es) - 1] es)) diff --git a/testsuite/tests/codeGen/should_run/compareByteArrays.hs b/testsuite/tests/codeGen/should_run/compareByteArrays.hs index e08328d27d..5bd0e58588 100644 --- a/testsuite/tests/codeGen/should_run/compareByteArrays.hs +++ b/testsuite/tests/codeGen/should_run/compareByteArrays.hs @@ -8,7 +8,7 @@ module Main (main) where import Control.Monad import Control.Monad.ST -import Data.List +import Data.List (sort, intercalate) import GHC.Exts (Int (..)) import GHC.Prim import GHC.ST (ST (ST)) |