use upstream persistent
This commit is contained in:
parent
397ece45e2
commit
07167f6474
@ -66,7 +66,7 @@ library
|
|||||||
base >= 4.8 && < 5.0
|
base >= 4.8 && < 5.0
|
||||||
, bytestring
|
, bytestring
|
||||||
, text >= 0.11 && < 1.3
|
, text >= 0.11 && < 1.3
|
||||||
, persistent >= 2.5 && < 2.8
|
, persistent >= 2.7.1 && < 2.8
|
||||||
, transformers >= 0.2
|
, transformers >= 0.2
|
||||||
, unordered-containers >= 0.2
|
, unordered-containers >= 0.2
|
||||||
, tagged >= 0.2
|
, tagged >= 0.2
|
||||||
|
|||||||
@ -54,19 +54,6 @@ import qualified Data.ByteString as B
|
|||||||
import qualified Data.Text as T
|
import qualified Data.Text as T
|
||||||
import qualified Data.Text.Lazy as TL
|
import qualified Data.Text.Lazy as TL
|
||||||
|
|
||||||
class BackendCompatible sup sub where
|
|
||||||
projectBackend :: sub -> sup
|
|
||||||
|
|
||||||
instance BackendCompatible SqlBackend SqlBackend where
|
|
||||||
projectBackend = id
|
|
||||||
|
|
||||||
instance BackendCompatible SqlBackend SqlReadBackend where
|
|
||||||
projectBackend = unSqlReadBackend
|
|
||||||
|
|
||||||
instance BackendCompatible SqlBackend SqlWriteBackend where
|
|
||||||
projectBackend = unSqlWriteBackend
|
|
||||||
|
|
||||||
|
|
||||||
-- | Finally tagless representation of @esqueleto@'s EDSL.
|
-- | Finally tagless representation of @esqueleto@'s EDSL.
|
||||||
class (Functor query, Applicative query, Monad query) =>
|
class (Functor query, Applicative query, Monad query) =>
|
||||||
Esqueleto query expr backend | query -> expr backend, expr -> query backend where
|
Esqueleto query expr backend | query -> expr backend, expr -> query backend where
|
||||||
|
|||||||
@ -3,4 +3,4 @@ packages:
|
|||||||
- '.'
|
- '.'
|
||||||
resolver: lts-6.12
|
resolver: lts-6.12
|
||||||
extra-deps:
|
extra-deps:
|
||||||
- persistent-2.5
|
- persistent-2.7.1
|
||||||
|
|||||||
@ -7,6 +7,7 @@ packages:
|
|||||||
extra-deps:
|
extra-deps:
|
||||||
- doctest-prop-0.2.0.1
|
- doctest-prop-0.2.0.1
|
||||||
- quickcheck-properties-0.1
|
- quickcheck-properties-0.1
|
||||||
|
- persistent-2.7.1
|
||||||
# - http-client-0.5.0
|
# - http-client-0.5.0
|
||||||
# - fail-4.9.0.0
|
# - fail-4.9.0.0
|
||||||
# - http-types-0.9
|
# - http-types-0.9
|
||||||
|
|||||||
Loading…
Reference in New Issue
Block a user