File tree Expand file tree Collapse file tree 1 file changed +6
-6
lines changed
beam-core/Database/Beam/Query Expand file tree Collapse file tree 1 file changed +6
-6
lines changed Original file line number Diff line number Diff line change @@ -339,9 +339,9 @@ limit_ limit' (Q q) =
339
339
340
340
-- | Conditionally limit the number of results returned by a query.
341
341
limitMaybe_ :: forall s a be db
342
- . ( Projectible be a
343
- , ThreadRewritable (QNested s ) a )
344
- => Maybe Integer -> Q be db (QNested s ) a -> Q be db s (WithRewrittenThread (QNested s ) s a )
342
+ . ( Projectible be a
343
+ , ThreadRewritable (QNested s ) a )
344
+ => Maybe Integer -> Q be db (QNested s ) a -> Q be db s (WithRewrittenThread (QNested s ) s a )
345
345
limitMaybe_ (Just limit') (Q q) =
346
346
Q (liftF (QLimit limit' q (rewriteThread (Proxy @ s ))))
347
347
limitMaybe_ Nothing (Q q) = Q (unsafeCoerce q)
@@ -356,9 +356,9 @@ offset_ offset' (Q q) =
356
356
357
357
-- | Conditionally drop the first `offset'` results.
358
358
offsetMaybe_ :: forall s a be db
359
- . ( Projectible be a
360
- , ThreadRewritable (QNested s ) a )
361
- => Maybe Integer -> Q be db (QNested s ) a -> Q be db s (WithRewrittenThread (QNested s ) s a )
359
+ . ( Projectible be a
360
+ , ThreadRewritable (QNested s ) a )
361
+ => Maybe Integer -> Q be db (QNested s ) a -> Q be db s (WithRewrittenThread (QNested s ) s a )
362
362
offsetMaybe_ (Just offset') (Q q) =
363
363
Q (liftF (QOffset offset' q (rewriteThread (Proxy @ s ))))
364
364
offsetMaybe_ Nothing (Q q) = Q (unsafeCoerce q)
You can’t perform that action at this time.
0 commit comments