ENE-49 Fix infinite loop in derivation

mongo/mongo-derivation-scala-3/src/main/scala/io/sphere/mongo/generic/Derivation.scala

@@ -27,9 +27,11 @@ private final class NativeMongoFormat[A <: SimpleMongoType] extends TypedMongoFo
   def fromMongoValue(any: MongoType): A = any.asInstanceOf[A]
 }
 
-inline def deriveMongoFormat[A: TypedMongoFormat]: TypedMongoFormat[A] = summon
+inline def deriveMongoFormat[A](using Mirror.Of[A]): TypedMongoFormat[A] = TypedMongoFormat.derived
 
 object TypedMongoFormat:
+  inline def apply[A: TypedMongoFormat]: TypedMongoFormat[A] = summon
+
   private val emptyFieldsSet: Vector[String] = Vector.empty
   inline def readCaseClassMetaData[T]: CaseClassMetaData = ${ readCaseClassMetaDataImpl[T] }
 
@@ -41,7 +43,7 @@ object TypedMongoFormat:
   private def readTraitMetaDataImpl[T: Type](using Quotes): Expr[TraitMetaData] =
     AnnotationReader().readTraitMetaData[T]
 
-  inline given derive[A](using Mirror.Of[A]): TypedMongoFormat[A] = Derivation.derived
+  inline given derived[A](using Mirror.Of[A]): TypedMongoFormat[A] = Derivation.derived
 
   given TypedMongoFormat[Int] = new NativeMongoFormat[Int]
   given TypedMongoFormat[String] = new NativeMongoFormat[String]

mongo/mongo-derivation-scala-3/src/test/scala/io/sphere/mongo/SerializationTest.scala

@@ -6,8 +6,12 @@ import org.scalatest.matchers.must.Matchers
 import org.scalatest.wordspec.AnyWordSpec
 
 object SerializationTest:
+  // For semi-automatic derivarion
   case class Something(a: Option[Int], b: Int = 2)
 
+  // For Automatic derivation with `derives`
+  case class Frunfles(a: Option[Int], b: Int = 2) derives TypedMongoFormat
+
   object Color extends Enumeration:
     val Blue, Red, Yellow = Value
 
@@ -24,23 +28,36 @@ class SerializationTest extends AnyWordSpec with Matchers:
       dbo.put("a", Integer.valueOf(3))
       dbo.put("b", Integer.valueOf(4))
 
-      // TODO what is this? :D
-      val med: TypedMongoFormat[Medium.type] = io.sphere.mongo.generic.deriveMongoFormat
+      // Using backwards-compatible `deriveMongoFormat`
+      given TypedMongoFormat[Something] = io.sphere.mongo.generic.deriveMongoFormat
 
-      val mongoFormat: TypedMongoFormat[Something] = io.sphere.mongo.generic.deriveMongoFormat
-      val something = mongoFormat.fromMongoValue(dbo)
+      val something = TypedMongoFormat[Something].fromMongoValue(dbo)
       something mustBe Something(Some(3), 4)
     }
 
     "generate a format that serializes optional fields with value None as BSON objects without that field" in {
-      val testFormat: TypedMongoFormat[Something] = io.sphere.mongo.generic.deriveMongoFormat
+      // Using new Scala 3 `derived` special method
+      given TypedMongoFormat[Something] = TypedMongoFormat.derived
 
       val something = Something(None, 1)
-      val serializedObject = testFormat.toMongoValue(something).asInstanceOf[BasicDBObject]
+      val serializedObject =
+        TypedMongoFormat[Something].toMongoValue(something).asInstanceOf[BasicDBObject]
+
       serializedObject.keySet().contains("b") must be(true)
       serializedObject.keySet().contains("a") must be(false)
+      TypedMongoFormat[Something].fromMongoValue(serializedObject) must be(something)
+    }
+
+    "generate a format that serializes optional fields with value None as BSON objects without that field (using derives)" in {
+      // Using an automatically-derived type via new Scala 3 `derives` directive
+      val frunfles = Frunfles(None, 1)
 
-      testFormat.fromMongoValue(serializedObject) must be(something)
+      val serializedObject =
+        TypedMongoFormat[Frunfles].toMongoValue(frunfles).asInstanceOf[BasicDBObject]
+
+      serializedObject.keySet().contains("b") must be(true)
+      serializedObject.keySet().contains("a") must be(false)
+      TypedMongoFormat[Frunfles].fromMongoValue(serializedObject) must be(frunfles)
     }
 
 //    "generate a format that use default values" in {