hasql-th 0.2 → 0.2.1

raw patch · 2 files changed

+14/−8 lines, 2 filesdep ~base-preludePVP ok

version bump matches the API change (PVP)

Dependency ranges changed: base-prelude

API changes (from Hackage documentation)

Files

• hasql-th.cabal +3/−3
• library/Hasql/TH.hs +11/−5

@@ -1,7 +1,7 @@ name:   hasql-th version:-  0.2+  0.2.1 category:   Hasql, Database, PostgreSQL, Template Haskell synopsis:@@ -38,7 +38,7 @@     library   ghc-options:   default-extensions:-    Arrows, BangPatterns, ConstraintKinds, DataKinds, DefaultSignatures, DeriveDataTypeable, DeriveFoldable, DeriveFunctor, DeriveGeneric, DeriveTraversable, EmptyDataDecls, FlexibleContexts, FlexibleInstances, FunctionalDependencies, GADTs, GeneralizedNewtypeDeriving, ImpredicativeTypes, LambdaCase, LiberalTypeSynonyms, MagicHash, MultiParamTypeClasses, MultiWayIf, NoImplicitPrelude, NoMonomorphismRestriction, OverloadedStrings, PatternGuards, ParallelListComp, QuasiQuotes, RankNTypes, RecordWildCards, ScopedTypeVariables, StandaloneDeriving, TemplateHaskell, TupleSections, TypeFamilies, TypeOperators, UnboxedTuples+    Arrows, BangPatterns, ConstraintKinds, DataKinds, DefaultSignatures, DeriveDataTypeable, DeriveFoldable, DeriveFunctor, DeriveGeneric, DeriveTraversable, EmptyDataDecls, FlexibleContexts, FlexibleInstances, FunctionalDependencies, GADTs, GeneralizedNewtypeDeriving, LambdaCase, LiberalTypeSynonyms, MagicHash, MultiParamTypeClasses, MultiWayIf, NoImplicitPrelude, NoMonomorphismRestriction, OverloadedStrings, PatternGuards, ParallelListComp, QuasiQuotes, RankNTypes, RecordWildCards, ScopedTypeVariables, StandaloneDeriving, TemplateHaskell, TupleSections, TypeFamilies, TypeOperators, UnboxedTuples   default-language:     Haskell2010   other-modules:@@ -53,4 +53,4 @@     bytestring >= 0.10 && < 0.11,     text >= 1 && < 2,     -- general:-    base-prelude >= 0.1.19 && < 0.2+    base-prelude >= 0.1.19 && < 2

@@ -1,7 +1,11 @@-module Hasql.TH where+module Hasql.TH+(+  readFileAsSQL,+)+where  import Hasql.TH.Prelude-import Language.Haskell.TH+import Language.Haskell.TH.Syntax import qualified Hasql.TH.Renderers as Renderers import qualified Data.ByteString @@ -19,7 +23,9 @@ -- >  Hasql.Session.sql $(Hasql.TH.readFileAsSQL "sql/migration-1.sql") --  readFileAsSQL :: String -> Q Exp-readFileAsSQL path =-  fmap Renderers.byteStringExp $-  runIO $ Data.ByteString.readFile path+readFileAsSQL =+  fmap Renderers.byteStringExp . readFileAsBytes +readFileAsBytes :: String -> Q ByteString+readFileAsBytes =+  (*>) <$> addDependentFile <*> runIO . Data.ByteString.readFile