EntityEmbedTest

Documentation

data ARecordGeneric backend

Constructors

ARecord

Fields

• aRecordName :: !Text

Instances

PersistStore backend => ToBackendKey backend (ARecordGeneric backend)

Defined in EntityEmbedTest

Methods

toBackendKey :: Key (ARecordGeneric backend) -> BackendKey backend

fromBackendKey :: BackendKey backend -> Key (ARecordGeneric backend)

SymbolToField "name" (ARecordGeneric backend) Text

Defined in EntityEmbedTest

Methods

symbolToField :: EntityField (ARecordGeneric backend) Text

SymbolToField "id" (ARecordGeneric backend) (Key (ARecordGeneric backend))

Defined in EntityEmbedTest

Methods

symbolToField :: EntityField (ARecordGeneric backend) (Key (ARecordGeneric backend))

Eq (BackendKey backend) => Eq (Key (ARecordGeneric backend))

Defined in EntityEmbedTest

Methods

(==) :: Key (ARecordGeneric backend) -> Key (ARecordGeneric backend) -> Bool

(/=) :: Key (ARecordGeneric backend) -> Key (ARecordGeneric backend) -> Bool

Eq (ARecordGeneric backend)

Defined in EntityEmbedTest

Methods

(==) :: ARecordGeneric backend -> ARecordGeneric backend -> Bool

(/=) :: ARecordGeneric backend -> ARecordGeneric backend -> Bool

Ord (BackendKey backend) => Ord (Key (ARecordGeneric backend))

Defined in EntityEmbedTest

Methods

compare :: Key (ARecordGeneric backend) -> Key (ARecordGeneric backend) -> Ordering

(<) :: Key (ARecordGeneric backend) -> Key (ARecordGeneric backend) -> Bool

(<=) :: Key (ARecordGeneric backend) -> Key (ARecordGeneric backend) -> Bool

(>) :: Key (ARecordGeneric backend) -> Key (ARecordGeneric backend) -> Bool

(>=) :: Key (ARecordGeneric backend) -> Key (ARecordGeneric backend) -> Bool

max :: Key (ARecordGeneric backend) -> Key (ARecordGeneric backend) -> Key (ARecordGeneric backend)

min :: Key (ARecordGeneric backend) -> Key (ARecordGeneric backend) -> Key (ARecordGeneric backend)

Ord (ARecordGeneric backend)

Defined in EntityEmbedTest

Methods

compare :: ARecordGeneric backend -> ARecordGeneric backend -> Ordering

(<) :: ARecordGeneric backend -> ARecordGeneric backend -> Bool

(<=) :: ARecordGeneric backend -> ARecordGeneric backend -> Bool

(>) :: ARecordGeneric backend -> ARecordGeneric backend -> Bool

(>=) :: ARecordGeneric backend -> ARecordGeneric backend -> Bool

max :: ARecordGeneric backend -> ARecordGeneric backend -> ARecordGeneric backend

min :: ARecordGeneric backend -> ARecordGeneric backend -> ARecordGeneric backend

Read (BackendKey backend) => Read (Key (ARecordGeneric backend))

Defined in EntityEmbedTest

Methods

readsPrec :: Int -> ReadS (Key (ARecordGeneric backend))

readList :: ReadS [Key (ARecordGeneric backend)]

readPrec :: ReadPrec (Key (ARecordGeneric backend))

readListPrec :: ReadPrec [Key (ARecordGeneric backend)]

Read (ARecordGeneric backend)

Defined in EntityEmbedTest

Methods

readsPrec :: Int -> ReadS (ARecordGeneric backend)

readList :: ReadS [ARecordGeneric backend]

readPrec :: ReadPrec (ARecordGeneric backend)

readListPrec :: ReadPrec [ARecordGeneric backend]

Show (BackendKey backend) => Show (Key (ARecordGeneric backend))

Defined in EntityEmbedTest

Methods

showsPrec :: Int -> Key (ARecordGeneric backend) -> ShowS

show :: Key (ARecordGeneric backend) -> String

showList :: [Key (ARecordGeneric backend)] -> ShowS

Show (ARecordGeneric backend)

Defined in EntityEmbedTest

Methods

showsPrec :: Int -> ARecordGeneric backend -> ShowS

show :: ARecordGeneric backend -> String

showList :: [ARecordGeneric backend] -> ShowS

ToJSON (BackendKey backend) => ToJSON (Key (ARecordGeneric backend))

Defined in EntityEmbedTest

Methods

toJSON :: Key (ARecordGeneric backend) -> Value

toEncoding :: Key (ARecordGeneric backend) -> Encoding

toJSONList :: [Key (ARecordGeneric backend)] -> Value

toEncodingList :: [Key (ARecordGeneric backend)] -> Encoding

FromJSON (BackendKey backend) => FromJSON (Key (ARecordGeneric backend))

Defined in EntityEmbedTest

Methods

parseJSON :: Value -> Parser (Key (ARecordGeneric backend))

parseJSONList :: Value -> Parser [Key (ARecordGeneric backend)]

ToHttpApiData (BackendKey backend) => ToHttpApiData (Key (ARecordGeneric backend))

Defined in EntityEmbedTest

Methods

toUrlPiece :: Key (ARecordGeneric backend) -> Text

toEncodedUrlPiece :: Key (ARecordGeneric backend) -> Builder

toHeader :: Key (ARecordGeneric backend) -> ByteString

toQueryParam :: Key (ARecordGeneric backend) -> Text

FromHttpApiData (BackendKey backend) => FromHttpApiData (Key (ARecordGeneric backend))

Defined in EntityEmbedTest

Methods

parseUrlPiece :: Text -> Either Text (Key (ARecordGeneric backend))

parseHeader :: ByteString -> Either Text (Key (ARecordGeneric backend))

parseQueryParam :: Text -> Either Text (Key (ARecordGeneric backend))

PathPiece (BackendKey backend) => PathPiece (Key (ARecordGeneric backend))

Defined in EntityEmbedTest

Methods

fromPathPiece :: Text -> Maybe (Key (ARecordGeneric backend))

toPathPiece :: Key (ARecordGeneric backend) -> Text

PersistFieldSql (BackendKey backend) => PersistFieldSql (Key (ARecordGeneric backend))

Defined in EntityEmbedTest

Methods

sqlType :: Proxy (Key (ARecordGeneric backend)) -> SqlType

PersistStore backend => PersistFieldSql (ARecordGeneric backend)

Defined in EntityEmbedTest

Methods

sqlType :: Proxy (ARecordGeneric backend) -> SqlType

(TypeError (NoUniqueKeysError (ARecordGeneric backend)) :: Constraint, PersistStoreWrite backend) => OnlyOneUniqueKey (ARecordGeneric backend)

Defined in EntityEmbedTest

Methods

onlyUniqueP :: ARecordGeneric backend -> Unique (ARecordGeneric backend)

(TypeError (MultipleUniqueKeysError (ARecordGeneric backend)) :: Constraint, PersistStoreWrite backend) => AtLeastOneUniqueKey (ARecordGeneric backend)

Defined in EntityEmbedTest

Methods

requireUniquesP :: ARecordGeneric backend -> NonEmpty (Unique (ARecordGeneric backend))

PersistStore backend => PersistEntity (ARecordGeneric backend)

Defined in EntityEmbedTest

Associated Types

type PersistEntityBackend (ARecordGeneric backend)

data Key (ARecordGeneric backend)

data EntityField (ARecordGeneric backend) :: Type -> Type

data Unique (ARecordGeneric backend)

Methods

keyToValues :: Key (ARecordGeneric backend) -> [PersistValue]

keyFromValues :: [PersistValue] -> Either Text (Key (ARecordGeneric backend))

persistIdField :: EntityField (ARecordGeneric backend) (Key (ARecordGeneric backend))

entityDef :: proxy (ARecordGeneric backend) -> EntityDef

persistFieldDef :: EntityField (ARecordGeneric backend) typ -> FieldDef

toPersistFields :: ARecordGeneric backend -> [PersistValue]

fromPersistValues :: [PersistValue] -> Either Text (ARecordGeneric backend)

tabulateEntityA :: Applicative f => (forall a. EntityField (ARecordGeneric backend) a -> f a) -> f (Entity (ARecordGeneric backend))

persistUniqueKeys :: ARecordGeneric backend -> [Unique (ARecordGeneric backend)]

persistUniqueToFieldNames :: Unique (ARecordGeneric backend) -> NonEmpty (FieldNameHS, FieldNameDB)

persistUniqueToValues :: Unique (ARecordGeneric backend) -> [PersistValue]

fieldLens :: EntityField (ARecordGeneric backend) field -> forall (f :: Type -> Type). Functor f => (field -> f field) -> Entity (ARecordGeneric backend) -> f (Entity (ARecordGeneric backend))

keyFromRecordM :: Maybe (ARecordGeneric backend -> Key (ARecordGeneric backend))

PersistStoreWrite backend => SafeToInsert (ARecordGeneric backend)

Defined in EntityEmbedTest

PersistField (BackendKey backend) => PersistField (Key (ARecordGeneric backend))

Defined in EntityEmbedTest

Methods

toPersistValue :: Key (ARecordGeneric backend) -> PersistValue

fromPersistValue :: PersistValue -> Either Text (Key (ARecordGeneric backend))

PersistStore backend => PersistField (ARecordGeneric backend)

Defined in EntityEmbedTest

Methods

toPersistValue :: ARecordGeneric backend -> PersistValue

fromPersistValue :: PersistValue -> Either Text (ARecordGeneric backend)

data Unique (ARecordGeneric backend)

Defined in EntityEmbedTest

data Unique (ARecordGeneric backend)

data EntityField (ARecordGeneric backend) typ

Defined in EntityEmbedTest

data EntityField (ARecordGeneric backend) typ

• = typ ~ Key (ARecordGeneric backend) => ARecordId
• | typ ~ Text => ARecordName

newtype Key (ARecordGeneric backend)

Defined in EntityEmbedTest

newtype Key (ARecordGeneric backend) = ARecordKey {

• unARecordKey :: BackendKey backend

}

type PersistEntityBackend (ARecordGeneric backend)

Defined in EntityEmbedTest

type PersistEntityBackend (ARecordGeneric backend) = backend

type ARecord = ARecordGeneric SqlBackend

type ARecordId = Key ARecord

type AnEntity = Entity ARecord