add `LIMIT`, `ORDER BY` clausesmain

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)