0

我正在使用 Scala 和doobie开展一个项目。我正在尝试实现一个可以由MacWire注入并与不同的 Task/Future monads 一起使用的交易者特征（例如，用于测试）。

import doobie.imports
import doobie.imports._
import fs2.Task
import fs2.util.{Catchable, Suspendable}

trait Transactor[M[_]] {
  implicit def catchable: Catchable[M] = implicitly
  val transactor: M[imports.Transactor[M]]
  def transact[A](q: ConnectionIO[A]): M[A] = catchable.flatMap(transactor)(xa => q.transact(xa))
}

case class H2Transactor[M[_]: Catchable: Suspendable](pure: PureConfig) extends Transactor[M] {
  override val transactor = doobie.h2.imports.H2Transactor[M](
    pure.config.persistence.name,
    pure.config.persistence.user.orNull,
    pure.config.persistence.password.orNull
  )
}

...
trait DatabaseModule { lazy val transactor = wire[H2Transactor[Task]] }
trait TestModule { lazy val transactor = wire[H2Transactor[IOLite]] }

但我得到这个错误：

[error] .../src/main/scala/.../persistence/transactor/H2Transactor.scala:13: type mismatch;
[error]  found   : M[doobie.h2.h2transactor.H2Transactor[M]]
[error]  required: M[doobie.imports.Transactor[M]]
[error]     (which expands to)  M[doobie.util.transactor.Transactor[M]]
[error] Note: doobie.h2.h2transactor.H2Transactor[M] <: doobie.imports.Transactor[M], but type M is invariant in type _.
[error] You may wish to define _ as +_ instead. (SLS 4.5)

它之所以有效Task，是因为它被定义为Task[+A]，但 doobie 的定义IOLite为IOLite[A]。有什么办法可以使这项工作？还是我必须使用不同的 Monad 类型而不是Task（IOLitedoobie 测试需要更改）？

4

1 回答 1

2

试试看：

override val transactor = doobie.h2.imports.H2Transactor[M](...).widen

widen是一个可用的操作（在cats和中scalaz）如果M有一个Functor实例。它允许你把它M[A]当作M[B]是A一个子类B

于 2017-08-30T17:19:32.737 回答