Skip to content

Commit 6798056

Browse files
committed
Fix CI
1 parent f861d40 commit 6798056

File tree

2 files changed

+9
-12
lines changed

2 files changed

+9
-12
lines changed

Diff for: beam-core/Database/Beam/Query/Combinators.hs

+4-6
Original file line numberDiff line numberDiff line change
@@ -1,6 +1,5 @@
11
{-# LANGUAGE CPP #-}
22
{-# LANGUAGE UndecidableInstances #-}
3-
{-# LANGUAGE CPP #-}
43

54
module Database.Beam.Query.Combinators
65
( -- * Various SQL functions and constructs
@@ -65,22 +64,21 @@ module Database.Beam.Query.Combinators
6564
, orderBy_, asc_, desc_, nullsFirst_, nullsLast_
6665
) where
6766

68-
import Database.Beam.Backend.Types
6967
import Database.Beam.Backend.SQL
68+
import Database.Beam.Backend.Types
7069

7170
import Database.Beam.Query.Internal
72-
import Database.Beam.Query.Ord
7371
import Database.Beam.Query.Operator
72+
import Database.Beam.Query.Ord
7473
import Database.Beam.Query.Types
7574

7675
import Database.Beam.Schema.Tables
7776

78-
import Control.Monad.Identity
79-
import Control.Monad.Free
8077
import Control.Applicative
78+
import Control.Monad.Free
79+
import Control.Monad.Identity
8180

8281
#if !MIN_VERSION_base(4, 11, 0)
83-
import Control.Monad.Writer hiding ((<>))
8482
import Data.Semigroup
8583
#endif
8684

Diff for: beam-core/Database/Beam/Query/SQL92.hs

+5-6
Original file line numberDiff line numberDiff line change
@@ -1,24 +1,23 @@
11
{-# OPTIONS_GHC -fno-warn-name-shadowing -fno-warn-unused-binds #-}
2-
{-# LANGUAGE UndecidableInstances #-}
3-
{-# LANGUAGE ScopedTypeVariables #-}
42
{-# LANGUAGE CPP #-}
3+
{-# LANGUAGE ScopedTypeVariables #-}
4+
{-# LANGUAGE UndecidableInstances #-}
55

66
module Database.Beam.Query.SQL92
77
( buildSql92Query' ) where
88

9-
import Database.Beam.Query.Internal
109
import Database.Beam.Backend.SQL
10+
import Database.Beam.Query.Internal
1111

12-
import Control.Monad.Free.Church
1312
import Control.Monad.Free
13+
import Control.Monad.Free.Church
1414

1515
#if !MIN_VERSION_base(4, 11, 0)
16-
import Control.Monad.Writer hiding ((<>))
1716
import Data.Semigroup
1817
#endif
1918

2019
import Data.Maybe
21-
import Data.Proxy (Proxy(Proxy))
20+
import Data.Proxy (Proxy (Proxy))
2221
import Data.String
2322
import qualified Data.Text as T
2423

0 commit comments

Comments
 (0)