aboutsummaryrefslogtreecommitdiff
path: root/src/main/scala/xyz/driver/core/core.scala
diff options
context:
space:
mode:
Diffstat (limited to 'src/main/scala/xyz/driver/core/core.scala')
-rw-r--r--src/main/scala/xyz/driver/core/core.scala5
1 files changed, 4 insertions, 1 deletions
diff --git a/src/main/scala/xyz/driver/core/core.scala b/src/main/scala/xyz/driver/core/core.scala
index 1babd91..1d917d6 100644
--- a/src/main/scala/xyz/driver/core/core.scala
+++ b/src/main/scala/xyz/driver/core/core.scala
@@ -1,6 +1,6 @@
package xyz.driver
-import scalaz.{Equal, Monad, OptionT}
+import scalaz.{Equal, Functor, Monad, OptionT}
package object core {
@@ -32,6 +32,9 @@ package object core {
def continueIgnoringNone: OptionT[H, Unit] =
optionTValue.map(_ => ()).orElse(OptionT.some[H, Unit](()))
+
+ def subflatMap[B](f: T => Option[B])(implicit F: Functor[H]): OptionT[H, B] =
+ OptionT.optionT[H](F.map(optionTValue.run)(_.flatMap(f)))
}
implicit class MonadicExtensions[H[_]: Monad, T](monadicValue: H[T]) {