Add stack safety test

Author: filosganga

.sbtopts

@@ -1,2 +1,2 @@
 -J-XX:+UseG1GC
--J-Xmx2G
+-J-Xmx4G

modules/benchmark/src/main/scala/EncodingBench.scala

@@ -20,7 +20,7 @@ import cats.syntax.all._
 
 import org.openjdk.jmh.annotations.{Benchmark, BenchmarkMode, Mode}
 import cats.data.NonEmptyList
-
+import scala.jdk.CollectionConverters._
 import schemas._
 import data._
 
@@ -31,6 +31,30 @@ class EncodingBench {
   def encodeAnS =
     Schema.string.write(string)
 
+  @Benchmark
+  @BenchmarkMode(Array(Mode.Throughput))
+  def encodeRawAnM =
+    DynamoValue.m(
+      Map(
+        "name" -> DynamoValue.s(allosaurus.name),
+        "age" -> DynamoValue.n(allosaurus.age),
+        "attacks" -> DynamoValue.n(allosaurus.attacks)
+      )
+    )
+
+  @Benchmark
+  @BenchmarkMode(Array(Mode.Throughput))
+  def encodeRawAnMAsAv =
+    val map = new java.util.IdentityHashMap[String, software.amazon.awssdk.services.dynamodb.model.AttributeValue](3)
+    map.put("name", software.amazon.awssdk.services.dynamodb.model.AttributeValue.builder().s(allosaurus.name).build())
+    map.put("age", software.amazon.awssdk.services.dynamodb.model.AttributeValue.builder().n(allosaurus.age.toString).build())
+    map.put("attacks", software.amazon.awssdk.services.dynamodb.model.AttributeValue.builder().n(allosaurus.attacks.toString).build())
+    DynamoValue(software.amazon.awssdk.services.dynamodb.model.AttributeValue
+        .builder()
+        .m(map)
+        .build()
+    )
+
   @Benchmark
   @BenchmarkMode(Array(Mode.Throughput))
   def encodeAnM =

modules/core/shared/src/test/scala/SchemaSuite.scala

@@ -615,9 +615,25 @@ class SchemaSuite extends ScalaCheckSuite {
     check(schema, departments, expected)
   }
 
-  test("recursive products with higly recursive") {
-    val departments = deepDepartment(1, 3)
-    val expected = deepDepartmentDynamoValue(1, 3);
+  test("recursive products with very deep record") {
+    val departments = deepDepartment(100, 1)
+    val expected = deepDepartmentDynamoValue(100, 1);
+
+    val schema: Schema[Department] = Schema.recursive { rec =>
+      Schema.record { field =>
+        (
+          field("name", _.name),
+          field("subdeps", _.subdeps)(rec.asList)
+        ).mapN(Department.apply)
+      }
+    }
+
+    check(schema, departments, expected)
+  }
+
+  test("recursive products with very wide record".only) {
+    val departments = deepDepartment(1, 100)
+    val expected = deepDepartmentDynamoValue(1, 100);
 
     val schema: Schema[Department] = Schema.recursive { rec =>
       Schema.record { field =>