on 8de0eec help sign in
rel8/src/Rel8/Query.hs-boot
19 lines 391 B history raw
1{-# language StandaloneKindSignatures #-}
3module Rel8.Query
4 ( Query( Query )
5 )
6where
8-- base
9import Data.Kind ( Type )
10import Data.Monoid ( Any )
11import Prelude ()
13-- opaleye
14import qualified Opaleye.Internal.HaskellDB.PrimQuery as Opaleye
15import qualified Opaleye.Select as Opaleye
18type Query :: Type -> Type
19newtype Query a = Query ([Opaleye.PrimExpr] -> Opaleye.Select (Any, a))