aboutsummaryrefslogtreecommitdiffstats
path: root/src/Store/Query/Type.hs
diff options
context:
space:
mode:
Diffstat (limited to 'src/Store/Query/Type.hs')
-rw-r--r--src/Store/Query/Type.hs10
1 files changed, 10 insertions, 0 deletions
diff --git a/src/Store/Query/Type.hs b/src/Store/Query/Type.hs
index 912d020..2f1f5ec 100644
--- a/src/Store/Query/Type.hs
+++ b/src/Store/Query/Type.hs
@@ -11,6 +11,8 @@ module Store.Query.Type
JoinType (..),
Query (..),
WhereClause (..),
+ LimitClause (..),
+ OffsetClause (..),
)
where
@@ -28,6 +30,8 @@ data Query
(JoinClauses FilePath)
(EmbedClauses FilePath)
(Maybe WhereClause)
+ (Maybe LimitClause)
+ (Maybe OffsetClause)
| Update Collection J.Value (Maybe WhereClause)
data FieldSelector
@@ -64,3 +68,9 @@ data WhereClause
data Comparison
= Eq (Either J.Value Field) (Either J.Value Field)
deriving (Show)
+
+data LimitClause = Limit Int
+ deriving (Show)
+
+data OffsetClause = Offset Int
+ deriving (Show)