@reventlessdev/reventless-core 3.0.0-alpha.260 → 3.0.0-alpha.262

package/tests/plugin/HeartbeatDisconnectGraceTest.res

@@ -56,11 +56,13 @@ describe("disconnectGrace", () => {
   testSync("always leaves at least a full interval of headroom past one beat", () => {
     // Grace must exceed the interval (else a single beat's cadence trips a
     // disconnect) and keep the historical ≥ +2 min floor for small intervals.
-    [1, 2, 5, 10, 30, 60, 120]->Array.forEach(interval => {
-      let grace = PluginExtensionPoint_Plugin.disconnectGrace(interval)
-      expect(grace > interval)->toBe(true)
-      expect(grace >= interval + 2)->toBe(true)
-    })
+    [1, 2, 5, 10, 30, 60, 120]->Array.forEach(
+      interval => {
+        let grace = PluginExtensionPoint_Plugin.disconnectGrace(interval)
+        expect(grace > interval)->toBe(true)
+        expect(grace >= interval + 2)->toBe(true)
+      },
+    )
   })
 
   testSync("a 60-min cadence gets far more than the old fixed +2 grace", () => {
@@ -71,28 +73,32 @@ describe("disconnectGrace", () => {
 
 describe("PluginExtensionPoint mapping arms the disconnect schedule from the beat interval", () => {
   testSync("Heartbeat(interval) → CreateDisconnectSchedule(_, disconnectGrace(interval))", () => {
-    [5, 10, 60]->Array.forEach(interval => {
-      let actions = TestMapping.PluginMapping.mapIncomingCommand(
-        "Test@1",
-        PluginExtensionPointSpec.Heartbeat(interval),
-        meta,
-      )
-      expect(actions->graceFromActions)->toEqual(
-        Some(PluginExtensionPoint_Plugin.disconnectGrace(interval)),
-      )
-    })
+    [5, 10, 60]->Array.forEach(
+      interval => {
+        let actions = TestMapping.PluginMapping.mapIncomingCommand(
+          "Test@1",
+          PluginExtensionPointSpec.Heartbeat(interval),
+          meta,
+        )
+        expect(actions->graceFromActions)->toEqual(
+          Some(PluginExtensionPoint_Plugin.disconnectGrace(interval)),
+        )
+      },
+    )
   })
 
   testSync("RedetectPlugin(interval) arms the same interval-derived grace as a heartbeat", () => {
-    [5, 10, 60]->Array.forEach(interval => {
-      let actions = TestMapping.PluginMapping.mapIncomingCommand(
-        "Test@1",
-        PluginExtensionPointSpec.RedetectPlugin(interval),
-        meta,
-      )
-      expect(actions->graceFromActions)->toEqual(
-        Some(PluginExtensionPoint_Plugin.disconnectGrace(interval)),
-      )
-    })
+    [5, 10, 60]->Array.forEach(
+      interval => {
+        let actions = TestMapping.PluginMapping.mapIncomingCommand(
+          "Test@1",
+          PluginExtensionPointSpec.RedetectPlugin(interval),
+          meta,
+        )
+        expect(actions->graceFromActions)->toEqual(
+          Some(PluginExtensionPoint_Plugin.disconnectGrace(interval)),
+        )
+      },
+    )
   })
 })

package/tests/plugin/ManifestVisibilityTest.res

@@ -38,8 +38,7 @@ module InternalSpec = {
   let visibility: Reventless.Visibility.t = Internal
 }
 
-module PublicReadModel: ReventlessInfra.ReadModel.T
-  with type api = unit and type role = unit = {
+module PublicReadModel: ReventlessInfra.ReadModel.T with type api = unit and type role = unit = {
   module Spec = PublicSpec
   type api = unit
   type role = unit
@@ -48,24 +47,33 @@ module PublicReadModel: ReventlessInfra.ReadModel.T
   // A read model that projects an event reaching it via a (DCB-log-sourced) mapping — the
   // case Plugin_Structure must surface as a qualified `consumedEventTypes` entry.
   let consumedEventNames: array<string> = ["OrderPlaced"]
-  let make = (~api as _, ~apiRole as _, ~allEventTopics as _, ~runtime as _=?, ~opts as _=?): component =>
-    Obj.magic(0)
+  let make = (
+    ~api as _,
+    ~apiRole as _,
+    ~allEventTopics as _,
+    ~runtime as _=?,
+    ~opts as _=?,
+  ): component => Obj.magic(0)
   let outputs = (_: component): ReventlessInfra.ReadModel.outputs => Obj.magic(0)
   let operations = (_: component): Pulumi.Output.t<ReventlessInfra.ReadModel.operations> =>
     Obj.magic(0)
   let finish = () => ()
 }
 
-module InternalReadModel: ReventlessInfra.ReadModel.T
-  with type api = unit and type role = unit = {
+module InternalReadModel: ReventlessInfra.ReadModel.T with type api = unit and type role = unit = {
   module Spec = InternalSpec
   type api = unit
   type role = unit
   type component
   let sourceNames: array<string> = []
   let consumedEventNames: array<string> = []
-  let make = (~api as _, ~apiRole as _, ~allEventTopics as _, ~runtime as _=?, ~opts as _=?): component =>
-    Obj.magic(0)
+  let make = (
+    ~api as _,
+    ~apiRole as _,
+    ~allEventTopics as _,
+    ~runtime as _=?,
+    ~opts as _=?,
+  ): component => Obj.magic(0)
   let outputs = (_: component): ReventlessInfra.ReadModel.outputs => Obj.magic(0)
   let operations = (_: component): Pulumi.Output.t<ReventlessInfra.ReadModel.operations> =>
     Obj.magic(0)
@@ -143,9 +151,9 @@ describe("Plugin_Structure.make — visibility tagging", () => {
   })
 
   testSync("aggregates / stateViewSlices stay empty when none are passed (sanity)", () => {
-    expect((
-      structure.aggregates->Array.length,
-      structure.stateViewSlices->Array.length,
-    ))->toEqual((0, 0))
+    expect((structure.aggregates->Array.length, structure.stateViewSlices->Array.length))->toEqual((
+      0,
+      0,
+    ))
   })
 })

package/tests/plugin/PluginDefinitionScalars.res

@@ -67,8 +67,7 @@ let collect = (root: S.t<'a>): array<string> => {
       if !isEnum {
         // Either optional encoding: the healer leaves an absent `T | undefined`
         // alone and writes `null` for a `T | null`, so neither invents a scalar.
-        let optional =
-          has.null->Option.getOr(false) || has.undefined->Option.getOr(false)
+        let optional = has.null->Option.getOr(false) || has.undefined->Option.getOr(false)
         anyOf->Array.forEach(member =>
           switch member {
           | Undefined(_) | Null(_) => ()

package/tests/plugin/PluginLifecycleCorpusTest.res

@@ -35,17 +35,20 @@ describe("The stored plugin-lifecycle payload corpus", () => {
   )
 
   entries->Array.forEach(entry =>
-    testSync(`still decodes: ${entry.name}`, () => {
-      // Sury's own error carries the field path, which is the whole value of
-      // this suite's failure message — report it verbatim rather than "it threw".
-      // sury 11 throws a plain JS `SuryError` with no ReScript exception
-      // constructor to match on, so the message comes off the JS exception.
-      let outcome = switch decodeStored(entry) {
-      | _ => "decodes"
-      | exception JsExn(e) => JsExn.message(e)->Option.getOr("threw: no message")
-      | exception _ => "threw a non-JS exception"
-      }
-      expect(outcome)->toBe("decodes")
-    })
+    testSync(
+      `still decodes: ${entry.name}`,
+      () => {
+        // Sury's own error carries the field path, which is the whole value of
+        // this suite's failure message — report it verbatim rather than "it threw".
+        // sury 11 throws a plain JS `SuryError` with no ReScript exception
+        // constructor to match on, so the message comes off the JS exception.
+        let outcome = switch decodeStored(entry) {
+        | _ => "decodes"
+        | exception JsExn(e) => JsExn.message(e)->Option.getOr("threw: no message")
+        | exception _ => "threw a non-JS exception"
+        }
+        expect(outcome)->toBe("decodes")
+      },
+    )
   )
 })

package/tests/plugin/PluginSpecExperiment.res

@@ -1,4 +1,3 @@
-
 @schema
 type record = {
   a: @s.meta({description: "aaa"}) string,