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

unsafeSqlOrderBy

Browse Source
This commit is contained in:
Chris Allen 2017-07-13 18:09:05 -05:00
parent df485bb029
commit b7bbe98c11
1 changed files with 5 additions and 0 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

5
src/Database/Esqueleto/Internal/Sql.hs
View File

@ -668,6 +668,11 @@ unsafeSqlValue :: TLB.Builder -> SqlExpr (Value a)
unsafeSqlValue v = ERaw Never $ const (v, mempty) unsafeSqlValue v = ERaw Never $ const (v, mempty)
{-# INLINE unsafeSqlValue #-} {-# INLINE unsafeSqlValue #-}
-- | (Internal) A raw SQL ordering. The same warning from
-- 'unsafeSqlBinOp' applies to this function as well.
unsafeSqlOrderBy :: TLB.Builder -> SqlExpr OrderBy
unsafeSqlOrderBy v = ERaw Never $ const (v, mempty)
{-# INLINE unsafeSqlOrderBy #-}
-- | (Internal) A raw SQL function. Once again, the same warning -- | (Internal) A raw SQL function. Once again, the same warning
-- from 'unsafeSqlBinOp' applies to this function as well. -- from 'unsafeSqlBinOp' applies to this function as well.