haskell/esqueleto
1
0
Fork 0
Code Issues Pull Requests Actions Packages Projects Releases Wiki Activity

Remove from public interface

Browse Source
This commit is contained in:
parsonsmatt 2019-02-01 16:47:19 -07:00
parent f749beafe6
commit 7e96bb54a7
2 changed files with 21 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
src/Database/Esqueleto.hs
View File

@ -38,7 +38,7 @@ module Database.Esqueleto
-- $gettingstarted -- $gettingstarted
-- * @esqueleto@'s Language -- * @esqueleto@'s Language
Esqueleto( where_, on, groupBy, orderBy, rand, asc, desc, limit, offset where_, on, groupBy, orderBy, rand, asc, desc, limit, offset
, distinct, distinctOn, don, distinctOnOrderBy, having, locking , distinct, distinctOn, don, distinctOnOrderBy, having, locking
, sub_select, (^.), (?.) , sub_select, (^.), (?.)
, val, isNothing, just, nothing, joinV, withNonNull , val, isNothing, just, nothing, joinV, withNonNull
@ -52,7 +52,7 @@ module Database.Esqueleto
, subList_select, valList, justList , subList_select, valList, justList
, in_, notIn, exists, notExists , in_, notIn, exists, notExists
, set, (=.), (+=.), (-=.), (*=.), (/=.) , set, (=.), (+=.), (-=.), (*=.), (/=.)
, case_, toBaseId) , case_, toBaseId
, ToBaseId(..) , ToBaseId(..)
, when_ , when_
, then_ , then_
@ -402,8 +402,8 @@ import qualified Database.Persist
-- | @valkey i = 'val' . 'toSqlKey'@ -- | @valkey i = 'val' . 'toSqlKey'@
-- (<https://github.com/prowdsponsor/esqueleto/issues/9>). -- (<https://github.com/prowdsponsor/esqueleto/issues/9>).
valkey :: (Esqueleto query expr backend, ToBackendKey SqlBackend entity, PersistField (Key entity)) => valkey :: (ToBackendKey SqlBackend entity, PersistField (Key entity)) =>
Int64 -> expr (Value (Key entity)) Int64 -> SqlExpr (Value (Key entity))
valkey = val . toSqlKey valkey = val . toSqlKey
@ -417,8 +417,8 @@ valkey = val . toSqlKey
-- (<https://github.com/prowdsponsor/esqueleto/pull/69>). -- (<https://github.com/prowdsponsor/esqueleto/pull/69>).
-- --
-- /Since: 1.4.2/ -- /Since: 1.4.2/
valJ :: (Esqueleto query expr backend, PersistField (Key entity)) => valJ :: (PersistField (Key entity)) =>
Value (Key entity) -> expr (Value (Key entity)) Value (Key entity) -> SqlExpr (Value (Key entity))
valJ = val . unValue valJ = val . unValue

15
src/Database/Esqueleto/Internal/Language.hs
View File

@ -41,6 +41,21 @@ module Database.Esqueleto.Internal.Language
, when_ , when_
, then_ , then_
, else_ , else_
, where_, on, groupBy, orderBy, rand, asc, desc, limit, offset
, distinct, distinctOn, don, distinctOnOrderBy, having, locking
, sub_select, (^.), (?.)
, val, isNothing, just, nothing, joinV, withNonNull
, countRows, count, countDistinct
, not_, (==.), (>=.), (>.), (<=.), (<.), (!=.), (&&.), (||.)
, (+.), (-.), (/.), (*.)
, random_, round_, ceiling_, floor_
, min_, max_, sum_, avg_, castNum, castNumM
, coalesce, coalesceDefault
, lower_, like, ilike, (%), concat_, (++.), castString
, subList_select, valList, justList
, in_, notIn, exists, notExists
, set, (=.), (+=.), (-=.), (*=.), (/=.)
, case_, toBaseId, (<#), (<&>)
) where ) where
import Database.Esqueleto.Internal.PersistentImport import Database.Esqueleto.Internal.PersistentImport