From 952228e1b598f2a7e635f41e6ecd87e81145781e Mon Sep 17 00:00:00 2001 From: Tom Smeding Date: Mon, 3 Jun 2024 18:09:13 +0200 Subject: ImportQualifiedPost everywhere --- bench/Main.hs | 3 ++- test/Gen.hs | 13 +++++++------ test/Main.hs | 3 ++- test/Util.hs | 3 ++- 4 files changed, 13 insertions(+), 9 deletions(-) diff --git a/bench/Main.hs b/bench/Main.hs index 16a7d3b..fdb7f25 100644 --- a/bench/Main.hs +++ b/bench/Main.hs @@ -1,8 +1,9 @@ +{-# LANGUAGE ImportQualifiedPost #-} {-# LANGUAGE NumericUnderscores #-} {-# LANGUAGE TypeApplications #-} module Main where -import qualified Numeric.LinearAlgebra as LA +import Numeric.LinearAlgebra qualified as LA import Test.Tasty.Bench import Data.Array.Nested diff --git a/test/Gen.hs b/test/Gen.hs index 3e879b9..5f84ce0 100644 --- a/test/Gen.hs +++ b/test/Gen.hs @@ -1,5 +1,6 @@ {-# LANGUAGE DataKinds #-} {-# LANGUAGE GADTs #-} +{-# LANGUAGE ImportQualifiedPost #-} {-# LANGUAGE NumericUnderscores #-} {-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE RankNTypes #-} @@ -11,20 +12,20 @@ {-# OPTIONS_GHC -fplugin GHC.TypeLits.KnownNat.Solver #-} module Gen where -import qualified Data.ByteString as BS +import Data.ByteString qualified as BS import Data.Foldable (toList) -import qualified Data.Vector.Storable as VS +import Data.Vector.Storable qualified as VS import Foreign import GHC.TypeLits -import qualified GHC.TypeNats as TN +import GHC.TypeNats qualified as TN import Data.Array.Mixed.Types import Data.Array.Nested import Hedgehog -import qualified Hedgehog.Gen as Gen -import qualified Hedgehog.Range as Range -import qualified System.Random as Random +import Hedgehog.Gen qualified as Gen +import Hedgehog.Range qualified as Range +import System.Random qualified as Random import Util diff --git a/test/Main.hs b/test/Main.hs index 7e62641..d3b97ab 100644 --- a/test/Main.hs +++ b/test/Main.hs @@ -1,8 +1,9 @@ +{-# LANGUAGE ImportQualifiedPost #-} module Main where import Test.Tasty -import qualified Tests.C +import Tests.C qualified main :: IO () diff --git a/test/Util.hs b/test/Util.hs index 9afa922..a358d30 100644 --- a/test/Util.hs +++ b/test/Util.hs @@ -1,5 +1,6 @@ {-# LANGUAGE DataKinds #-} {-# LANGUAGE GADTs #-} +{-# LANGUAGE ImportQualifiedPost #-} {-# LANGUAGE PatternSynonyms #-} {-# LANGUAGE ScopedTypeVariables #-} {-# LANGUAGE TypeApplications #-} @@ -8,7 +9,7 @@ {-# OPTIONS_GHC -fplugin GHC.TypeLits.KnownNat.Solver #-} module Util where -import qualified Data.Array.RankedS as OR +import Data.Array.RankedS qualified as OR import GHC.TypeLits import Data.Array.Mixed.Types (fromSNat') -- cgit v1.2.3-70-g09d2