1 files changed, 28 insertions, 0 deletions
diff --git a/implementations/scalaz/src/main/scala/com/softwaremill/sttp/impl/scalaz/TaskMonadAsyncError.scala b/implementations/scalaz/src/main/scala/com/softwaremill/sttp/impl/scalaz/TaskMonadAsyncError.scala
new file mode 100644
index 0000000..8535321
--- /dev/null
+++ b/implementations/scalaz/src/main/scala/com/softwaremill/sttp/impl/scalaz/TaskMonadAsyncError.scala
@@ -0,0 +1,28 @@
+package com.softwaremill.sttp.impl.scalaz
+
+import com.softwaremill.sttp.MonadAsyncError
+
+import scalaz.concurrent.Task
+import scalaz.{-\/, \/-}
+
+object TaskMonadAsyncError extends MonadAsyncError[Task] {
+  override def unit[T](t: T): Task[T] = Task.point(t)
+
+  override def map[T, T2](fa: Task[T])(f: (T) => T2): Task[T2] = fa.map(f)
+
+  override def flatMap[T, T2](fa: Task[T])(f: (T) => Task[T2]): Task[T2] =
+    fa.flatMap(f)
+
+  override def async[T](register: ((Either[Throwable, T]) => Unit) => Unit): Task[T] =
+    Task.async { cb =>
+      register {
+        case Left(t)  => cb(-\/(t))
+        case Right(t) => cb(\/-(t))
+      }
+    }
+
+  override def error[T](t: Throwable): Task[T] = Task.fail(t)
+
+  override protected def handleWrappedError[T](rt: Task[T])(h: PartialFunction[Throwable, Task[T]]): Task[T] =
+    rt.handleWith(h)
+}