vvalue
specsWith :: (MonadIO m, PersistQueryWrite backend, PersistStoreWrite backend, PersistQueryWrite (BaseBackend backend))=> RunDb backend m-> Maybe (ReaderT backend m a)-> Spec