From d1b4589d581db9c39a0ff767a195280756e2373a Mon Sep 17 00:00:00 2001
From: geirolz <david.geirola@gmail.com>
Date: Mon, 9 Oct 2023 11:22:48 +0200
Subject: [PATCH] Add asIn, voidIn, leftAsIn, leftVoidIn into foption and
 feither.

---
 shared/src/main/scala/mouse/feither.scala     | 12 ++++++++++
 shared/src/main/scala/mouse/foption.scala     |  6 +++++
 .../test/scala/mouse/FEitherSyntaxTest.scala  | 24 +++++++++++++++++--
 .../test/scala/mouse/FOptionSyntaxTest.scala  | 10 ++++++++
 4 files changed, 50 insertions(+), 2 deletions(-)

diff --git a/shared/src/main/scala/mouse/feither.scala b/shared/src/main/scala/mouse/feither.scala
index d18f76f7..e2f9f54f 100644
--- a/shared/src/main/scala/mouse/feither.scala
+++ b/shared/src/main/scala/mouse/feither.scala
@@ -90,6 +90,12 @@ final class FEitherOps[F[_], L, R](private val felr: F[Either[L, R]]) extends An
       case r @ Right(_) => r.asInstanceOf[Right[A, R]]
     }
 
+  def leftAsIn[B](b: => B)(implicit F: Functor[F]): F[Either[B, R]] =
+    leftMapIn(_ => b)
+
+  def leftVoidIn(implicit F: Functor[F]): F[Either[Unit, R]] =
+    leftAsIn(())
+
   def leftWidenIn[A >: L](implicit F: Functor[F]): F[Either[A, R]] =
     F.map(felr) {
       case l @ Left(_)  => l.asInstanceOf[Left[A, R]]
@@ -111,6 +117,12 @@ final class FEitherOps[F[_], L, R](private val felr: F[Either[L, R]]) extends An
   def mapIn[A](f: R => A)(implicit F: Functor[F]): F[Either[L, A]] =
     F.map(felr)(_.map(f))
 
+  def asIn[B](b: => B)(implicit F: Functor[F]): F[Either[L, B]] =
+    mapIn(_ => b)
+
+  def voidIn(implicit F: Functor[F]): F[Either[L, Unit]] =
+    asIn(())
+
   def bimapIn[A, B](left: L => A, right: R => B)(implicit F: Functor[F]): F[Either[A, B]] =
     F.map(felr) {
       case Left(value)  => Left(left(value))
diff --git a/shared/src/main/scala/mouse/foption.scala b/shared/src/main/scala/mouse/foption.scala
index 6a400fdb..781d0a7b 100644
--- a/shared/src/main/scala/mouse/foption.scala
+++ b/shared/src/main/scala/mouse/foption.scala
@@ -103,6 +103,12 @@ final class FOptionOps[F[_], A](private val foa: F[Option[A]]) extends AnyVal {
   def mapIn[B](f: A => B)(implicit F: Functor[F]): F[Option[B]] =
     F.map(foa)(_.map(f))
 
+  def asIn[B](b: => B)(implicit F: Functor[F]): F[Option[B]] =
+    mapIn(_ => b)
+
+  def voidIn(implicit F: Functor[F]): F[Option[Unit]] =
+    asIn(())
+
   def orElseIn(default: Option[A])(implicit F: Functor[F]): F[Option[A]] =
     F.map(foa) {
       case None => default
diff --git a/shared/src/test/scala/mouse/FEitherSyntaxTest.scala b/shared/src/test/scala/mouse/FEitherSyntaxTest.scala
index b5aff066..4b1bb028 100644
--- a/shared/src/test/scala/mouse/FEitherSyntaxTest.scala
+++ b/shared/src/test/scala/mouse/FEitherSyntaxTest.scala
@@ -27,8 +27,8 @@ import cats.syntax.either._
 import scala.util.{Failure, Success, Try}
 
 class FEitherSyntaxTest extends MouseSuite {
-  private val rightValue = List(42.asRight[String])
-  private val leftValue = List("42".asLeft[Int])
+  private val rightValue: Seq[Either[String, Int]] = List(42.asRight[String])
+  private val leftValue: Seq[Either[String, Int]] = List("42".asLeft[Int])
 
   test("FEitherSyntax.cata") {
     assertEquals(rightValue.cata(_ => 0, _ => 1), List(1))
@@ -108,6 +108,16 @@ class FEitherSyntaxTest extends MouseSuite {
     assertEquals(leftValue.leftMapIn(_ => ""), List("".asLeft[Int]))
   }
 
+  test("FEitherSyntax.leftAsIn") {
+    assertEquals(rightValue.leftAsIn(""), rightValue)
+    assertEquals(leftValue.leftAsIn(""), List("".asLeft[Int]))
+  }
+
+  test("FEitherSyntax.leftVoidIn") {
+    assertEquals(rightValue.leftVoidIn, rightValue.leftMapIn(_ => ()))
+    assertEquals(leftValue.leftVoidIn, List(().asLeft[Int]))
+  }
+
   test("FEitherSyntax.leftTraverseIn") {
     assertEquals(rightValue.leftTraverseIn(_ => Option("")), List(Option(42.asRight[String])))
     assertEquals(leftValue.leftTraverseIn(_ => Option("")), List(Option("".asLeft[Int])))
@@ -123,6 +133,16 @@ class FEitherSyntaxTest extends MouseSuite {
     assertEquals(leftValue.mapIn(_ * 2), leftValue)
   }
 
+  test("FEitherSyntax.asIn") {
+    assertEquals(rightValue.asIn(2), List(2.asRight[String]))
+    assertEquals(leftValue.asIn(2), leftValue)
+  }
+
+  test("FEitherSyntax.voidIn") {
+    assertEquals(rightValue.voidIn, List(().asRight[String]))
+    assertEquals(leftValue.voidIn, leftValue.mapIn(_ => ()))
+  }
+
   test("FEitherSyntax.orElseIn") {
     assertEquals(rightValue.orElseIn(0.asRight[String]), rightValue)
     assertEquals(leftValue.orElseIn(0.asRight[String]), List(0.asRight[String]))
diff --git a/shared/src/test/scala/mouse/FOptionSyntaxTest.scala b/shared/src/test/scala/mouse/FOptionSyntaxTest.scala
index 875cf884..d640bb1a 100644
--- a/shared/src/test/scala/mouse/FOptionSyntaxTest.scala
+++ b/shared/src/test/scala/mouse/FOptionSyntaxTest.scala
@@ -125,6 +125,16 @@ class FOptionSyntaxTest extends MouseSuite {
     assertEquals(List(Option.empty[Int]).mapIn(_ + 1), List(Option.empty[Int]))
   }
 
+  test("FOptionSyntax.asIn") {
+    assertEquals(List(Option(1)).asIn(1), List(Option(1)))
+    assertEquals(List(Option.empty[Int]).asIn(1), List(Option.empty[Int]))
+  }
+
+  test("FOptionSyntax.voidIn") {
+    assertEquals(List(Option(1)).voidIn, List(Option(())))
+    assertEquals(List(Option.empty[Int]).voidIn, List(Option.empty[Unit]))
+  }
+
   test("FOptionSyntax.orElseIn") {
     assertEquals(List(Option(1)).orElseIn(Option(0)), List(Option(1)))
     assertEquals(List(Option.empty[Int]).orElseIn(Option(0)), List(Option(0)))