@reventlessdev/reventless-aws 3.0.0-alpha.344 → 3.0.0-alpha.345

package/tests/PgChangeFeedRelay_IntegrationTest.res

@@ -32,7 +32,10 @@ let stored = (eventType, tags, data): DcbEventLog_Adapter.rawStoredEvent => {
 let capturingSendBatch = sink => async jsons => sink := sink.contents->Array.concat(jsons)
 
 let idOf = json =>
-  json->JSON.Decode.object->Option.flatMap(o => o->Dict.get("id"))->Option.flatMap(JSON.Decode.string)
+  json
+  ->JSON.Decode.object
+  ->Option.flatMap(o => o->Dict.get("id"))
+  ->Option.flatMap(JSON.Decode.string)
 
 switch NodeProcess.env->Dict.get("PG_URL") {
 | None =>
@@ -63,7 +66,11 @@ switch NodeProcess.env->Dict.get("PG_URL") {
     testPromise("relays each appended DCB event as an {id, meta, event} body", async () => {
       let (_n, ops, _s) = makeLog("relay-basic")
       let mk = i =>
-        stored("OrderPlaced", [{key: "orderId", value: "o-1"}], jsonObj([("i", JSON.Encode.int(i))]))
+        stored(
+          "OrderPlaced",
+          [{key: "orderId", value: "o-1"}],
+          jsonObj([("i", JSON.Encode.int(i))]),
+        )
       let _ = await ops.append([mk(0), mk(1), mk(2)])
 
       let sink = ref([])
@@ -81,109 +88,134 @@ switch NodeProcess.env->Dict.get("PG_URL") {
       let first = sink.contents->Array.getUnsafe(0)
       expect(idOf(first))->toEqual(Some("orderId:o-1"))
       let obj = first->JSON.Decode.object->Option.getOrThrow
-      expect(obj->Dict.get("event")->Option.getOrThrow->JSON.stringify->String.includes("OrderPlaced"))->toBe(true)
+      expect(
+        obj->Dict.get("event")->Option.getOrThrow->JSON.stringify->String.includes("OrderPlaced"),
+      )->toBe(true)
       let metaObj = obj->Dict.get("meta")->Option.flatMap(JSON.Decode.object)->Option.getOrThrow
       expect(metaObj->Dict.get("service"))->toEqual(Some(JSON.Encode.string("relay-it")))
     })
 
-    testPromise("checkpoints — a second drain from the same subscriber sees nothing new", async () => {
-      let (_n, ops, _s) = makeLog("relay-checkpoint")
-      let mk = i => stored("Fed", [{key: "orderId", value: "f"}], jsonObj([("i", JSON.Encode.int(i))]))
-      let _ = await ops.append([mk(0), mk(1)])
+    testPromise(
+      "checkpoints — a second drain from the same subscriber sees nothing new",
+      async () => {
+        let (_n, ops, _s) = makeLog("relay-checkpoint")
+        let mk = i =>
+          stored("Fed", [{key: "orderId", value: "f"}], jsonObj([("i", JSON.Encode.int(i))]))
+        let _ = await ops.append([mk(0), mk(1)])
 
-      let sink = ref([])
-      let first = await PgChangeFeedRelay_Runtime.relayWithPool(
-        ~pool,
-        ~logName="relay-checkpoint",
-        ~subscriber="relay-it",
-        ~sendBatch=capturingSendBatch(sink),
-      )
-      expect(first)->toBe(2)
+        let sink = ref([])
+        let first = await PgChangeFeedRelay_Runtime.relayWithPool(
+          ~pool,
+          ~logName="relay-checkpoint",
+          ~subscriber="relay-it",
+          ~sendBatch=capturingSendBatch(sink),
+        )
+        expect(first)->toBe(2)
 
-      let second = await PgChangeFeedRelay_Runtime.relayWithPool(
-        ~pool,
-        ~logName="relay-checkpoint",
-        ~subscriber="relay-it",
-        ~sendBatch=capturingSendBatch(sink),
-      )
-      expect(second)->toBe(0)
-      // No extra bodies were emitted on the second pass.
-      expect(sink.contents->Array.length)->toBe(2)
-    })
+        let second = await PgChangeFeedRelay_Runtime.relayWithPool(
+          ~pool,
+          ~logName="relay-checkpoint",
+          ~subscriber="relay-it",
+          ~sendBatch=capturingSendBatch(sink),
+        )
+        expect(second)->toBe(0)
+        // No extra bodies were emitted on the second pass.
+        expect(sink.contents->Array.length)->toBe(2)
+      },
+    )
 
-    testPromise("classic: relays each appended event_log event as an {id, meta, event} body", async () => {
-      let (_n, ops, _s) =
-        ReventlessPostgres.EventLogStorage_Postgres.makeStorage(
+    testPromise(
+      "classic: relays each appended event_log event as an {id, meta, event} body",
+      async () => {
+        let (_n, ops, _s) = ReventlessPostgres.EventLogStorage_Postgres.makeStorage(
           ~pool,
           ~name="ClassicRelayBasicEventLog",
           ~opts=(),
         )
-      // The flat on-disk item the classic append stores verbatim — same shape the
-      // DynamoDB path puts (id, position, event, data, decomposed meta).
-      let flatItem = (~id, ~seq, ~eventType, ~data) =>
-        [
-          ("id", JSON.Encode.string(id)),
-          ("position", JSON.Encode.string(seq->Int.toString->String.padStart(9, "0"))),
-          ("event", JSON.Encode.string(eventType)),
-          ("data", data),
-        ]
-        ->Array.concat(
-          ReventlessCore.Message.generateMeta(~service="relay-it")->ReventlessCore.Message.decomposeMeta,
+        // The flat on-disk item the classic append stores verbatim — same shape the
+        // DynamoDB path puts (id, position, event, data, decomposed meta).
+        let flatItem = (~id, ~seq, ~eventType, ~data) =>
+          [
+            ("id", JSON.Encode.string(id)),
+            ("position", JSON.Encode.string(seq->Int.toString->String.padStart(9, "0"))),
+            ("event", JSON.Encode.string(eventType)),
+            ("data", data),
+          ]
+          ->Array.concat(
+            ReventlessCore.Message.generateMeta(
+              ~service="relay-it",
+            )->ReventlessCore.Message.decomposeMeta,
+          )
+          ->Dict.fromArray
+          ->JSON.Encode.object
+        let _ = await ops.append(
+          0,
+          "agg-1",
+          [
+            flatItem(
+              ~id="agg-1",
+              ~seq=0,
+              ~eventType="NameUpdated",
+              ~data=jsonObj([("n", JSON.Encode.int(0))]),
+            ),
+            flatItem(
+              ~id="agg-1",
+              ~seq=1,
+              ~eventType="NameUpdated",
+              ~data=jsonObj([("n", JSON.Encode.int(1))]),
+            ),
+          ],
         )
-        ->Dict.fromArray
-        ->JSON.Encode.object
-      let _ = await ops.append(
-        0,
-        "agg-1",
-        [
-          flatItem(~id="agg-1", ~seq=0, ~eventType="NameUpdated", ~data=jsonObj([("n", JSON.Encode.int(0))])),
-          flatItem(~id="agg-1", ~seq=1, ~eventType="NameUpdated", ~data=jsonObj([("n", JSON.Encode.int(1))])),
-        ],
-      )
 
-      let sink = ref([])
-      let processed = await PgChangeFeedRelay_Runtime.relayClassicWithPool(
-        ~pool,
-        ~logName="ClassicRelayBasicEventLog",
-        ~subscriber="relay-it:ClassicRelayBasicEventLog",
-        ~sendBatch=capturingSendBatch(sink),
-      )
+        let sink = ref([])
+        let processed = await PgChangeFeedRelay_Runtime.relayClassicWithPool(
+          ~pool,
+          ~logName="ClassicRelayBasicEventLog",
+          ~subscriber="relay-it:ClassicRelayBasicEventLog",
+          ~sendBatch=capturingSendBatch(sink),
+        )
 
-      expect(processed)->toBe(2)
-      expect(sink.contents->Array.length)->toBe(2)
-      let first = sink.contents->Array.getUnsafe(0)
-      expect(idOf(first))->toEqual(Some("agg-1"))
-      let obj = first->JSON.Decode.object->Option.getOrThrow
-      expect(
-        obj->Dict.get("event")->Option.getOrThrow->JSON.stringify->String.includes("NameUpdated"),
-      )->toBe(true)
-      let metaObj = obj->Dict.get("meta")->Option.flatMap(JSON.Decode.object)->Option.getOrThrow
-      expect(metaObj->Dict.get("service"))->toEqual(Some(JSON.Encode.string("relay-it")))
+        expect(processed)->toBe(2)
+        expect(sink.contents->Array.length)->toBe(2)
+        let first = sink.contents->Array.getUnsafe(0)
+        expect(idOf(first))->toEqual(Some("agg-1"))
+        let obj = first->JSON.Decode.object->Option.getOrThrow
+        expect(
+          obj->Dict.get("event")->Option.getOrThrow->JSON.stringify->String.includes("NameUpdated"),
+        )->toBe(true)
+        let metaObj = obj->Dict.get("meta")->Option.flatMap(JSON.Decode.object)->Option.getOrThrow
+        expect(metaObj->Dict.get("service"))->toEqual(Some(JSON.Encode.string("relay-it")))
 
-      // Checkpointed: a second drain from the same subscriber sees nothing new.
-      let second = await PgChangeFeedRelay_Runtime.relayClassicWithPool(
-        ~pool,
-        ~logName="ClassicRelayBasicEventLog",
-        ~subscriber="relay-it:ClassicRelayBasicEventLog",
-        ~sendBatch=capturingSendBatch(sink),
-      )
-      expect(second)->toBe(0)
-      expect(sink.contents->Array.length)->toBe(2)
-    })
+        // Checkpointed: a second drain from the same subscriber sees nothing new.
+        let second = await PgChangeFeedRelay_Runtime.relayClassicWithPool(
+          ~pool,
+          ~logName="ClassicRelayBasicEventLog",
+          ~subscriber="relay-it:ClassicRelayBasicEventLog",
+          ~sendBatch=capturingSendBatch(sink),
+        )
+        expect(second)->toBe(0)
+        expect(sink.contents->Array.length)->toBe(2)
+      },
+    )
 
     testPromise("classic: per-log subscribers keep checkpoints isolated across logs", async () => {
       // event_log_subscription keys by subscriber alone. With a SHARED subscriber,
       // draining log A after log B's events were appended would save a cursor past
       // B's rows and silently skip them — the clobber the per-log subscriber fixes.
       let mkOps = name => {
-        let (_n, ops, _s) =
-          ReventlessPostgres.EventLogStorage_Postgres.makeStorage(~pool, ~name, ~opts=())
+        let (_n, ops, _s) = ReventlessPostgres.EventLogStorage_Postgres.makeStorage(
+          ~pool,
+          ~name,
+          ~opts=(),
+        )
         ops
       }
       let opsB = mkOps("ClassicRelayIsoBEventLog")
       let opsA = mkOps("ClassicRelayIsoAEventLog")
       let meta = () =>
-        ReventlessCore.Message.generateMeta(~service="relay-it")->ReventlessCore.Message.decomposeMeta
+        ReventlessCore.Message.generateMeta(
+          ~service="relay-it",
+        )->ReventlessCore.Message.decomposeMeta
       let item = (id, eventType) =>
         [
           ("id", JSON.Encode.string(id)),
@@ -221,20 +253,18 @@ switch NodeProcess.env->Dict.get("PG_URL") {
     })
 
     testPromise("partitionTag pins the id to its tag on a multi-tag event", async () => {
-      let (_n, ops, _s) =
-        ReventlessPostgres.DcbEventLogStorage_Postgres.makeStorage(
-          ~pool,
-          ~name="relay-pt",
-          ~indexes=[],
-          ~partitionTag=DcbTag.Simple({key: "customerId"}),
-          ~opts,
-        )
-      let ev =
-        stored(
-          "OrderPlaced",
-          [{key: "orderId", value: "o-9"}, {key: "customerId", value: "c-9"}],
-          jsonObj([("n", JSON.Encode.int(1))]),
-        )
+      let (_n, ops, _s) = ReventlessPostgres.DcbEventLogStorage_Postgres.makeStorage(
+        ~pool,
+        ~name="relay-pt",
+        ~indexes=[],
+        ~partitionTag=DcbTag.Simple({key: "customerId"}),
+        ~opts,
+      )
+      let ev = stored(
+        "OrderPlaced",
+        [{key: "orderId", value: "o-9"}, {key: "customerId", value: "c-9"}],
+        jsonObj([("n", JSON.Encode.int(1))]),
+      )
       let _ = await ops.append([ev])
 
       // The relay receives the sury-encoded partition tag exactly as the builder emits it.

package/tests/PgChangeFeedRelay_RuntimeTest.res

@@ -30,8 +30,7 @@ describe("PgChangeFeedRelay_Runtime.toEventCollectorJson", () => {
     expect(eventJson->JSON.stringify->String.includes("c-1"))->toBe(true)
 
     // meta round-trips the producing service
-    let metaObj =
-      obj->Dict.get("meta")->Option.flatMap(JSON.Decode.object)->Option.getOrThrow
+    let metaObj = obj->Dict.get("meta")->Option.flatMap(JSON.Decode.object)->Option.getOrThrow
     expect(metaObj->Dict.get("service"))->toEqual(Some(JSON.Encode.string("Orders")))
   })
 
@@ -52,7 +51,10 @@ describe("PgChangeFeedRelay_Runtime partitionTag (B2.3d)", () => {
   testSync("a Simple partitionTag selects its tag for the id, not just the first", () => {
     let pt = Reventless.DcbTag.Simple({key: "customerId"})
     let json =
-      PgChangeFeedRelay_Runtime.toEventCollectorJson(multiTagEvent, ~partitionTag=pt)->Option.getOrThrow
+      PgChangeFeedRelay_Runtime.toEventCollectorJson(
+        multiTagEvent,
+        ~partitionTag=pt,
+      )->Option.getOrThrow
     let obj = json->JSON.Decode.object->Option.getOrThrow
     // Without partitionTag the id would be "orderId:o-1" (first tag); the tag
     // pins it to "customerId:c-9".
@@ -64,12 +66,13 @@ describe("PgChangeFeedRelay_Runtime partitionTag (B2.3d)", () => {
     // and PgChangeFeedRelay_Runtime.relay parses it back the same way. Guard the
     // round-trip so a schema change can't silently break the id derivation.
     let simple = Reventless.DcbTag.Simple({key: "courseId"})
-    let composite =
-      Reventless.DcbTag.Composite({keys: ["studentId", "courseId"], seps: [":"]})
-    [simple, composite]->Array.forEach(pt => {
-      let wire = pt->Reventless.Util_Sury.toJson(Reventless.DcbTag.derivedPartitionTagSchema)
-      let back = wire->Reventless.Util_Sury.fromJson(Reventless.DcbTag.derivedPartitionTagSchema)
-      expect(back)->toEqual(pt)
-    })
+    let composite = Reventless.DcbTag.Composite({keys: ["studentId", "courseId"], seps: [":"]})
+    [simple, composite]->Array.forEach(
+      pt => {
+        let wire = pt->Reventless.Util_Sury.toJson(Reventless.DcbTag.derivedPartitionTagSchema)
+        let back = wire->Reventless.Util_Sury.fromJson(Reventless.DcbTag.derivedPartitionTagSchema)
+        expect(back)->toEqual(pt)
+      },
+    )
   })
 })

package/tests/PgMigrationEntryPoint_IntegrationTest.res

@@ -14,7 +14,6 @@
 
 open JestGlobals
 
-
 // Drive the real ReScript `runMigration` with the pool injected — the guard
 // rejects a HANDLER_CONFIG with no pgConnection; the real fields below are
 // ignored because `~makePool` is injected. Returns "ok" on success.

package/tests/PgPipeline_IntegrationTest.res

@@ -15,7 +15,6 @@
 open JestGlobals
 open ReventlessCore
 
-
 // --- Fixtures: one classic source, one read model, one projection mapping ---
 
 module OrderSource = {
@@ -132,78 +131,93 @@ switch NodeProcess.env->Dict.get("PG_URL") {
     let _ = pool->ReventlessPostgres.PgDriver.endPool
   })
 
-  describe("Postgres pipeline (append → relay → feed decode → projection → qdb row)", () => {
-    testPromise("projects a classic event end-to-end into the Postgres QueryDb", async () => {
-      let (_n, elOps, _s) =
-        ReventlessPostgres.EventLogStorage_Postgres.makeStorage(
+  describe(
+    "Postgres pipeline (append → relay → feed decode → projection → qdb row)",
+    () => {
+      testPromise("projects a classic event end-to-end into the Postgres QueryDb", async () => {
+        let (_n, elOps, _s) = ReventlessPostgres.EventLogStorage_Postgres.makeStorage(
           ~pool,
           ~name="PipelineOrderEventLog",
           ~opts=(),
         )
-      let _ = await elOps.append(
-        0,
-        "o-1",
-        [flatItem(~id="o-1", ~seq=0, ~service=OrderSource.name, ~event=OrderPlaced({product: "boat"}))],
-      )
-
-      // Relay drains event_log and emits the EventCollector bodies.
-      let sink = ref([])
-      let relayed = await PgChangeFeedRelay_Runtime.relayClassicWithPool(
-        ~pool,
-        ~logName="PipelineOrderEventLog",
-        ~subscriber="aws-rm-feed:PipelineOrderEventLog",
-        ~sendBatch=async jsons => sink := sink.contents->Array.concat(jsons),
-      )
-      expect(relayed)->toBe(1)
-
-      // Feed-queue delivery → entry-point decode → real projection callback.
-      let _ = await EventCollectorChannel_DynamoDbStream_Runtime.handleStreamEvent(
-        Callback.handleJsonEvents,
-        asSqsEvent(sink.contents),
-        (),
-      )->Effect.runPromise
-
-      // The projected row is in the Postgres QueryDb.
-      switch await qdbOps.load("o-1") {
-      | Ok(rows) =>
-        expect(rows->Array.length)->toBe(1)
-        let row = rows->Array.getUnsafe(0)->JSON.Decode.object->Option.getOrThrow
-        expect(row->Dict.get("product"))->toEqual(Some(JSON.Encode.string("boat")))
-        expect(row->Dict.get("id"))->toEqual(Some(JSON.Encode.string("o-1")))
-      | Error(_) => expect("load failed")->toBe("Ok")
-      }
-    })
+        let _ = await elOps.append(
+          0,
+          "o-1",
+          [
+            flatItem(
+              ~id="o-1",
+              ~seq=0,
+              ~service=OrderSource.name,
+              ~event=OrderPlaced({product: "boat"}),
+            ),
+          ],
+        )
 
-    testPromise("meta.service mismatch is a silent no-op (dispatch filter)", async () => {
-      let (_n, elOps, _s) =
-        ReventlessPostgres.EventLogStorage_Postgres.makeStorage(
+        // Relay drains event_log and emits the EventCollector bodies.
+        let sink = ref([])
+        let relayed = await PgChangeFeedRelay_Runtime.relayClassicWithPool(
+          ~pool,
+          ~logName="PipelineOrderEventLog",
+          ~subscriber="aws-rm-feed:PipelineOrderEventLog",
+          ~sendBatch=async jsons => sink := sink.contents->Array.concat(jsons),
+        )
+        expect(relayed)->toBe(1)
+
+        // Feed-queue delivery → entry-point decode → real projection callback.
+        let _ = await EventCollectorChannel_DynamoDbStream_Runtime.handleStreamEvent(
+          Callback.handleJsonEvents,
+          asSqsEvent(sink.contents),
+          (),
+        )->Effect.runPromise
+
+        // The projected row is in the Postgres QueryDb.
+        switch await qdbOps.load("o-1") {
+        | Ok(rows) =>
+          expect(rows->Array.length)->toBe(1)
+          let row = rows->Array.getUnsafe(0)->JSON.Decode.object->Option.getOrThrow
+          expect(row->Dict.get("product"))->toEqual(Some(JSON.Encode.string("boat")))
+          expect(row->Dict.get("id"))->toEqual(Some(JSON.Encode.string("o-1")))
+        | Error(_) => expect("load failed")->toBe("Ok")
+        }
+      })
+
+      testPromise("meta.service mismatch is a silent no-op (dispatch filter)", async () => {
+        let (_n, elOps, _s) = ReventlessPostgres.EventLogStorage_Postgres.makeStorage(
           ~pool,
           ~name="PipelineWrongServiceEventLog",
           ~opts=(),
         )
-      let _ = await elOps.append(
-        0,
-        "o-2",
-        [flatItem(~id="o-2", ~seq=0, ~service="NotTheSource", ~event=OrderPlaced({product: "x"}))],
-      )
-
-      let sink = ref([])
-      let _ = await PgChangeFeedRelay_Runtime.relayClassicWithPool(
-        ~pool,
-        ~logName="PipelineWrongServiceEventLog",
-        ~subscriber="aws-rm-feed:PipelineWrongServiceEventLog",
-        ~sendBatch=async jsons => sink := sink.contents->Array.concat(jsons),
-      )
-      let _ = await EventCollectorChannel_DynamoDbStream_Runtime.handleStreamEvent(
-        Callback.handleJsonEvents,
-        asSqsEvent(sink.contents),
-        (),
-      )->Effect.runPromise
-
-      switch await qdbOps.load("o-2") {
-      | Ok(rows) => expect(rows->Array.length)->toBe(0)
-      | Error(_) => expect("load failed")->toBe("Ok")
-      }
-    })
-  })
+        let _ = await elOps.append(
+          0,
+          "o-2",
+          [
+            flatItem(
+              ~id="o-2",
+              ~seq=0,
+              ~service="NotTheSource",
+              ~event=OrderPlaced({product: "x"}),
+            ),
+          ],
+        )
+
+        let sink = ref([])
+        let _ = await PgChangeFeedRelay_Runtime.relayClassicWithPool(
+          ~pool,
+          ~logName="PipelineWrongServiceEventLog",
+          ~subscriber="aws-rm-feed:PipelineWrongServiceEventLog",
+          ~sendBatch=async jsons => sink := sink.contents->Array.concat(jsons),
+        )
+        let _ = await EventCollectorChannel_DynamoDbStream_Runtime.handleStreamEvent(
+          Callback.handleJsonEvents,
+          asSqsEvent(sink.contents),
+          (),
+        )->Effect.runPromise
+
+        switch await qdbOps.load("o-2") {
+        | Ok(rows) => expect(rows->Array.length)->toBe(0)
+        | Error(_) => expect("load failed")->toBe("Ok")
+        }
+      })
+    },
+  )
 }

package/tests/PgQueryDbUnion_IntegrationTest.res

@@ -92,8 +92,7 @@ switch NodeProcess.env->Dict.get("PG_URL") {
       }
 
       switch await Ops.load("c-1"->CustomersSpec.Id.makeFromString) {
-      | Ok([{geolocation: Located({lat, lng})}]) =>
-        expect((lat, lng))->toEqual((48.2082, 16.3738))
+      | Ok([{geolocation: Located({lat, lng})}]) => expect((lat, lng))->toEqual((48.2082, 16.3738))
       | _ => expect("round trip")->toBe("Located with its point intact")
       }
     })

package/tests/PgQueryResolverEntryPoint_OpsTest.res

@@ -15,16 +15,12 @@ describe("PgQueryResolverEntryPoint_Ops.parseResolverConfig", () => {
   })
 
   testSync("null pgConnection decodes to None", () => {
-    let config = PgQueryResolverEntryPoint_Ops.parseResolverConfig(
-      `{"pgConnection":null,"handlers":[]}`,
-    )
+    let config = PgQueryResolverEntryPoint_Ops.parseResolverConfig(`{"pgConnection":null,"handlers":[]}`)
     expect(config.pgConnection->Option.isNone)->toBe(true)
   })
 
   testSync("decodes connection, handlers, and node types", () => {
-    let config = PgQueryResolverEntryPoint_Ops.parseResolverConfig(
-      `{"pgConnection":{"host":"db.local","port":5432,"database":"app","username":"master","secretArn":"arn:secret"},"handlers":[{"readModelName":"Products","specModule":"@x/p/src/ReadModel/Products.res.mjs","labelField":"name","includeIdParam":true},{"readModelName":"Orders","specModule":"@x/p/src/ReadModel/Orders.res.mjs","labelField":"id","includeIdParam":false}],"nodeTypes":{"Product":"Products"}}`,
-    )
+    let config = PgQueryResolverEntryPoint_Ops.parseResolverConfig(`{"pgConnection":{"host":"db.local","port":5432,"database":"app","username":"master","secretArn":"arn:secret"},"handlers":[{"readModelName":"Products","specModule":"@x/p/src/ReadModel/Products.res.mjs","labelField":"name","includeIdParam":true},{"readModelName":"Orders","specModule":"@x/p/src/ReadModel/Orders.res.mjs","labelField":"id","includeIdParam":false}],"nodeTypes":{"Product":"Products"}}`)
     expect(config.pgConnection->Option.map(cc => cc.host))->toEqual(Some("db.local"))
     expect(config.handlers->Array.length)->toBe(2)
     let first = config.handlers->Array.getUnsafe(0)