hasql-cursor-query 0.4.5.2 → 0.4.5.3

raw patch · 3 files changed

+80/−12 lines, 3 filesdep +basedep −base-preludedep ~hasqlPVP ok

version bump matches the API change (PVP)

Dependencies added: base

Dependencies removed: base-prelude

Dependency ranges changed: hasql

API changes (from Hackage documentation)

Files

• hasql-cursor-query.cabal +4/−4
• library/Hasql/CursorQuery/Private/Prelude.hs +63/−1
• tasty/Main/IO.hs +13/−7

@@ -1,6 +1,6 @@ cabal-version: 3.0 name: hasql-cursor-query-version: 0.4.5.2+version: 0.4.5.3 category: Hasql, Database, PostgreSQL, Streaming synopsis: A declarative abstraction over PostgreSQL Cursor homepage: https://github.com/nikita-volkov/hasql-cursor-query@@ -13,7 +13,7 @@  source-repository head   type: git-  location: git://github.com/nikita-volkov/hasql-cursor-query.git+  location: https://github.com/nikita-volkov/hasql-cursor-query  common base   default-language: Haskell2010@@ -86,11 +86,11 @@     Hasql.CursorQuery.Transactions    build-depends:-    base-prelude >=1 && <2,+    base >=4.11 && <5,     bytestring >=0.10 && <0.14,     contravariant >=1.3 && <2,     foldl >1 && <2,-    hasql >=1.8 && <1.10,+    hasql >=1.9 && <1.10,     hasql-cursor-transaction >=0.6 && <0.7,     hasql-transaction >=1.1 && <1.2,     profunctors >=5 && <6,

@@ -3,7 +3,69 @@   ) where -import BasePrelude as Exports hiding (assert, error, isLeft, isRight, left, right)+import Control.Applicative as Exports+import Control.Arrow as Exports+import Control.Category as Exports+import Control.Concurrent as Exports+import Control.Exception as Exports+import Control.Monad as Exports hiding (fail, forM, forM_, join, mapM, mapM_, msum, sequence, sequence_)+import Control.Monad.Fail as Exports+import Control.Monad.Fix as Exports hiding (fix)+import Control.Monad.IO.Class as Exports+import Control.Monad.ST as Exports+import Data.Bits as Exports+import Data.Bool as Exports import Data.ByteString as Exports (ByteString)+import Data.Char as Exports+import Data.Coerce as Exports+import Data.Complex as Exports+import Data.Data as Exports+import Data.Dynamic as Exports+import Data.Either as Exports+import Data.Fixed as Exports+import Data.Foldable as Exports hiding (toList)+import Data.Function as Exports hiding (id, (.))+import Data.Functor as Exports hiding (unzip)+import Data.Functor.Contravariant as Exports import Data.Functor.Contravariant.Divisible as Exports+import Data.Functor.Identity as Exports+import Data.IORef as Exports+import Data.Int as Exports+import Data.Ix as Exports+import Data.List as Exports hiding (all, and, any, concat, concatMap, elem, find, foldl, foldl', foldl1, foldr, foldr1, isSubsequenceOf, mapAccumL, mapAccumR, maximum, maximumBy, minimum, minimumBy, notElem, or, product, sortOn, sum, uncons)+import Data.Maybe as Exports+import Data.Monoid as Exports hiding (Alt, First (..), Last (..), (<>))+import Data.Ord as Exports import Data.Profunctor.Unsafe as Exports+import Data.Proxy as Exports+import Data.Ratio as Exports+import Data.STRef as Exports+import Data.Semigroup as Exports+import Data.String as Exports+import Data.Traversable as Exports+import Data.Tuple as Exports+import Data.Unique as Exports+import Data.Version as Exports+import Data.Word as Exports+import Debug.Trace as Exports+import Foreign.ForeignPtr as Exports+import Foreign.Ptr as Exports+import Foreign.StablePtr as Exports+import Foreign.Storable as Exports hiding (alignment, sizeOf)+import GHC.Conc as Exports hiding (threadWaitRead, threadWaitReadSTM, threadWaitWrite, threadWaitWriteSTM, withMVar)+import GHC.Exts as Exports (IsList (..), groupWith, inline, lazy, sortWith)+import GHC.Generics as Exports (Generic, Generic1)+import GHC.IO.Exception as Exports+import Numeric as Exports+import System.Environment as Exports+import System.Exit as Exports+import System.IO as Exports+import System.IO.Error as Exports+import System.IO.Unsafe as Exports+import System.Mem as Exports+import System.Mem.StableName as Exports+import System.Timeout as Exports+import Text.Printf as Exports (hPrintf, printf)+import Text.Read as Exports (Read (..), readEither, readMaybe)+import Unsafe.Coerce as Exports+import Prelude as Exports hiding (all, and, any, concat, concatMap, elem, fail, foldl, foldl1, foldr, foldr1, id, mapM, mapM_, maximum, minimum, notElem, or, product, sequence, sequence_, sum, (.))

@@ -1,6 +1,9 @@ module Main.IO where  import qualified Hasql.Connection as B+import qualified Hasql.Connection.Setting as Setting+import qualified Hasql.Connection.Setting.Connection as Connection+import qualified Hasql.Connection.Setting.Connection.Param as Param import qualified Hasql.Session as A import Rebase.Prelude @@ -17,13 +20,16 @@           ExceptT $ B.acquire settings           where             settings =-              B.settings host port user password database-              where-                host = "localhost"-                port = 5432-                user = "postgres"-                password = "postgres"-                database = "postgres"+              [ Setting.connection+                  ( Connection.params+                      [ Param.host "localhost",+                        Param.port 5432,+                        Param.user "postgres",+                        Param.password "postgres",+                        Param.dbname "postgres"+                      ]+                  )+              ]         use connection =           lift $ handler connection         release connection =