@reventlessdev/reventless-gwt 1.0.0-alpha.207 → 1.0.0-alpha.209

package/src/LocalHost.res

@@ -51,7 +51,10 @@ type pluginExports = {"Make": platform => builtPlugin}
 let packageNameToPluginName = Reventless.PluginName.fromPackageName
 
 let strField = (json, key) =>
-  json->JSON.Decode.object->Option.flatMap(d => d->Dict.get(key))->Option.flatMap(JSON.Decode.string)
+  json
+  ->JSON.Decode.object
+  ->Option.flatMap(d => d->Dict.get(key))
+  ->Option.flatMap(JSON.Decode.string)
 
 let readJson = path =>
   try Some(NodeFs.readFileSync(path)->JSON.parseOrThrow) catch {
@@ -63,13 +66,13 @@ let readJson = path =>
 // reads the two raw fields with the local node bindings.
 let derivePluginName = (~pluginSrcDir: string): string => {
   let pluginJson = NodePath.join([pluginSrcDir, "plugin.json"])
-  let pluginJsonName =
-    NodeFs.existsSync(pluginJson)
-      ? readJson(pluginJson)->Option.flatMap(j => strField(j, "name"))
-      : None
+  let pluginJsonName = NodeFs.existsSync(pluginJson)
+    ? readJson(pluginJson)->Option.flatMap(j => strField(j, "name"))
+    : None
   let packageJsonName =
-    readJson(NodePath.join([NodePath.dirname(pluginSrcDir), "package.json"]))
-    ->Option.flatMap(j => strField(j, "name"))
+    readJson(NodePath.join([NodePath.dirname(pluginSrcDir), "package.json"]))->Option.flatMap(j =>
+      strField(j, "name")
+    )
   Reventless.PluginName.resolve(~pluginJsonName, ~packageJsonName)
 }
 
@@ -92,8 +95,9 @@ let discover = (~packageDirs: array<string>): array<pluginRef> =>
 let localPlatformSpecifier = "@reventlessdev/reventless-local/src/Platform.res.mjs"
 let resolveLocalPlatform = (~fromPackageDir: string): option<string> =>
   try Some(
-    NodeModule.createRequire(NodePath.join([fromPackageDir, "package.json"]))
-    ->NodeModule.requireResolve(localPlatformSpecifier),
+    NodeModule.createRequire(
+      NodePath.join([fromPackageDir, "package.json"]),
+    )->NodeModule.requireResolve(localPlatformSpecifier),
   ) catch {
   | _ => None
   }

package/src/Mapping_GWT.res

@@ -137,10 +137,7 @@ module type T = {
   // A scenario carries the source history plus the target per-id history
   // through the pipe chain. Pipe-first (`->`) places it as the first arg of
   // every subsequent combinator, so the chain reads top-to-bottom.
-  type scenario = (
-    array<Source.consumedEvent>,
-    array<(string, array<Target.consumedEvent>)>,
-  )
+  type scenario = (array<Source.consumedEvent>, array<(string, array<Target.consumedEvent>)>)
 
   let describe: (string, unit => unit) => unit
   let test: (string, ~timeout: int=?, unit => promise<Outcome.outcome>) => unit
@@ -184,11 +181,7 @@ module Make = (M: Mapping): (T with module Source = M.Source and module Target =
   module Source = M.Source
   module Target = M.Target
 
-  type scenario = (
-    array<Source.consumedEvent>,
-    array<(string, array<Target.consumedEvent>)>,
-  )
-
+  type scenario = (array<Source.consumedEvent>, array<(string, array<Target.consumedEvent>)>)
 
   let describe = JestBind.describe
   let sliceName = `${Source.name}→${Target.name}`
@@ -377,8 +370,7 @@ module Make = (M: Mapping): (T with module Source = M.Source and module Target =
       let ok =
         pairs->Array.length == 1 &&
           switch pairs->Array.get(0) {
-          | Some((actualId, [actualEvent])) =>
-            actualId == id && actualEvent == expectedTargetEvent
+          | Some((actualId, [actualEvent])) => actualId == id && actualEvent == expectedTargetEvent
           | _ => false
           }
       if ok {
@@ -401,10 +393,7 @@ module Make = (M: Mapping): (T with module Source = M.Source and module Target =
     let actualEvents = encDict(actualDict)
     let expectedJson = encSourceError(expectedError)
     switch sourceErrors.contents->Array.get(0) {
-    | None =>
-      Outcome.fail(
-        ErrorMismatch({expected: expectedJson, actual: None, actualEvents}),
-      )
+    | None => Outcome.fail(ErrorMismatch({expected: expectedJson, actual: None, actualEvents}))
     | Some(actual) if actual != expectedError =>
       Outcome.fail(
         ErrorMismatch({
@@ -422,10 +411,7 @@ module Make = (M: Mapping): (T with module Source = M.Source and module Target =
     let actualEvents = encDict(actualDict)
     let expectedJson = encTargetError(expectedError)
     switch targetErrors.contents->Array.get(0) {
-    | None =>
-      Outcome.fail(
-        ErrorMismatch({expected: expectedJson, actual: None, actualEvents}),
-      )
+    | None => Outcome.fail(ErrorMismatch({expected: expectedJson, actual: None, actualEvents}))
     | Some(actual) if actual != expectedError =>
       Outcome.fail(
         ErrorMismatch({
@@ -443,10 +429,7 @@ module Make = (M: Mapping): (T with module Source = M.Source and module Target =
     let actualEvents = encDict(actualDict)
     let expectedErrorJson = encTargetError(expectedError)
     switch targetErrors.contents->Array.get(0) {
-    | None =>
-      Outcome.fail(
-        ErrorMismatch({expected: expectedErrorJson, actual: None, actualEvents}),
-      )
+    | None => Outcome.fail(ErrorMismatch({expected: expectedErrorJson, actual: None, actualEvents}))
     | Some(actual) if actual != expectedError =>
       Outcome.fail(
         ErrorMismatch({

package/src/MismatchRender.res

@@ -33,7 +33,10 @@ let renderOption = RenderRescript.renderOption
 
 let normalize = (m: Outcome.mismatch): normalized => {
   let fields = switch m {
-  | EventsMismatch({expected, actual}) => [Expected(renderMany(expected)), Actual(renderMany(actual))]
+  | EventsMismatch({expected, actual}) => [
+      Expected(renderMany(expected)),
+      Actual(renderMany(actual)),
+    ]
   | ErrorMismatch({expected, actual, actualEvents}) => [
       Expected(`Error(${render(expected)})`),
       Actual(
@@ -61,7 +64,10 @@ let normalize = (m: Outcome.mismatch): normalized => {
       Expected(expected),
       Actual(actual->Option.getOr("(none)")),
     ]
-  | QueryRowsMismatch({expected, actual}) => [Expected(renderMany(expected)), Actual(renderMany(actual))]
+  | QueryRowsMismatch({expected, actual}) => [
+      Expected(renderMany(expected)),
+      Actual(renderMany(actual)),
+    ]
   | PublishedActionsMismatch({expected, actual}) => [
       Expected(renderMany(expected)),
       Actual(renderMany(actual)),

package/src/MultiSourceProjection_GWT.res

@@ -32,7 +32,6 @@ let handleActions = Projection.handleActions // create alias to avoid shadowing
 module Make = (Projection: Reventless.Projection.Mapping): (
   T with type sourceEvent := Projection.sourceEvent and type targetState := Projection.targetState
 ) => {
-
   let testId = ref(TestFixtures.id)
   let meta = ref(TestFixtures.meta)
 
@@ -130,10 +129,7 @@ module Make = (Projection: Reventless.Projection.Mapping): (
     ->Array.map(event' =>
       event'
       ->Projection.project
-      ->ReventlessCore.Projection.rewriteTrail(
-        ~at=event'.meta.time,
-        Projection.targetStateSchema,
-      )
+      ->ReventlessCore.Projection.rewriteTrail(~at=event'.meta.time, Projection.targetStateSchema)
     )
     ->handleActions({
       load: load(store, ...),
@@ -205,8 +201,7 @@ module Make = (Projection: Reventless.Projection.Mapping): (
   let stateEq = (a: Projection.targetState, b: Projection.targetState) =>
     JSON.stringify(encState(a)) == JSON.stringify(encState(b))
   let statesEq = (a, b) =>
-    Array.length(a) == Array.length(b) &&
-      Array.zip(a, b)->Array.every(((x, y)) => stateEq(x, y))
+    Array.length(a) == Array.length(b) && Array.zip(a, b)->Array.every(((x, y)) => stateEq(x, y))
   let storeEq = (a: store, b: store) => {
     let ka = a->Dict.keysToArray->Array.toSorted(String.compare)
     let kb = b->Dict.keysToArray->Array.toSorted(String.compare)
@@ -231,8 +226,8 @@ module Make = (Projection: Reventless.Projection.Mapping): (
     let actualStates = store->Dict.valuesToArray->Array.get(0)->Option.getOr([])
     if (
       keys->Array.length == 1 &&
-        actualId == Some(testId.contents) &&
-        statesEq(actualStates, expectedStates)
+      actualId == Some(testId.contents) &&
+      statesEq(actualStates, expectedStates)
     ) {
       Outcome.pass
     } else {
@@ -281,8 +276,7 @@ module Make = (Projection: Reventless.Projection.Mapping): (
 
   let thenState = (thunk, expectedState) => thenStates(thunk, [expectedState])
 
-  let thenStateWithId = (thunk, id, expectedState) =>
-    thenStatesWithId(thunk, id, [expectedState])
+  let thenStateWithId = (thunk, id, expectedState) => thenStatesWithId(thunk, id, [expectedState])
 
   let thenNoState = async thunk => {
     let store = await thunk()
@@ -315,10 +309,7 @@ module Make = (Projection: Reventless.Projection.Mapping): (
 
   let thenFail = async thunk =>
     switch await thunk() {
-    | _ =>
-      Outcome.fail(
-        Throw({error: "Expected failure but thunk returned normally", stack: ""}),
-      )
+    | _ => Outcome.fail(Throw({error: "Expected failure but thunk returned normally", stack: ""}))
     | exception _ => Outcome.pass
     }
 }

package/src/OutboundTranslation_GWT.res

@@ -34,8 +34,7 @@ module type T = {
   // collect bodies too, but only after a manual `Promise.resolve` wrapper.
   let testSync: (string, unit => Outcome.outcome) => unit
 
-  type translateResult =
-    result<option<(string, Spec.inboundCommand)>, string>
+  type translateResult = result<option<(string, Spec.inboundCommand)>, string>
 
   // The state the pipeline carries after a translate attempt. `retries` counts
   // the number of failed re-attempts (0 for a single `whenTranslateMocked`).
@@ -68,11 +67,7 @@ module type T = {
     ~maxRetries: int,
     (string, Spec.outboundItem) => promise<translateResult>,
   ) => promise<attempt>
-  let thenCommand: (
-    promise<attempt>,
-    string,
-    Spec.inboundCommand,
-  ) => promise<Outcome.outcome>
+  let thenCommand: (promise<attempt>, string, Spec.inboundCommand) => promise<Outcome.outcome>
   let thenNoCommand: promise<attempt> => promise<Outcome.outcome>
   let thenRetryRecorded: (promise<attempt>, int) => promise<Outcome.outcome>
   let thenTodoStatus: (promise<attempt>, string, todoStatus) => promise<Outcome.outcome>
@@ -81,14 +76,12 @@ module type T = {
 module Make = (Spec: SliceSpec): (T with module Spec = Spec) => {
   module Spec = Spec
 
-
   let describe = JestBind.describe
   let test = (name, ~timeout=?, body) =>
     JestBind.testPromise(~slice=Spec.name, name, ~timeout?, body)
   let testSync = (name, body) => JestBind.test(~slice=Spec.name, name, body)
 
-  type translateResult =
-    result<option<(string, Spec.inboundCommand)>, string>
+  type translateResult = result<option<(string, Spec.inboundCommand)>, string>
 
   type attempt = {
     id: string,
@@ -100,8 +93,7 @@ module Make = (Spec: SliceSpec): (T with module Spec = Spec) => {
   let encItem = (i: Spec.outboundItem) => i->Message.encode(Spec.outboundItemSchema)
   let encItems = (arr: array<(string, Spec.outboundItem)>) =>
     arr->Array.map(((id, i)) => (id, encItem(i)))
-  let encInbound = (c: Spec.inboundCommand) =>
-    c->Message.encode(Spec.inboundCommandSchema)
+  let encInbound = (c: Spec.inboundCommand) => c->Message.encode(Spec.inboundCommandSchema)
 
   // Unit: collect
   //
@@ -139,7 +131,7 @@ module Make = (Spec: SliceSpec): (T with module Spec = Spec) => {
       }
     while failed() && retries.contents < maxRetries {
       retries := retries.contents + 1
-      result := await mock(id, item)
+      result := (await mock(id, item))
     }
     {id, item, result: result.contents, retries: retries.contents}
   }
@@ -169,10 +161,7 @@ module Make = (Spec: SliceSpec): (T with module Spec = Spec) => {
           actual: [],
         }),
       )
-    | Error(msg) =>
-      Outcome.fail(
-        TranslateError({expected: "(command)", actual: Some(msg)}),
-      )
+    | Error(msg) => Outcome.fail(TranslateError({expected: "(command)", actual: Some(msg)}))
     }
   }
 
@@ -180,12 +169,8 @@ module Make = (Spec: SliceSpec): (T with module Spec = Spec) => {
     let {result, _} = await pending
     switch result {
     | Ok(None) => Outcome.pass
-    | Ok(Some((id, cmd))) =>
-      Outcome.fail(NoEventExpected({actual: [commandPairJson(id, cmd)]}))
-    | Error(msg) =>
-      Outcome.fail(
-        TranslateError({expected: "(no command)", actual: Some(msg)}),
-      )
+    | Ok(Some((id, cmd))) => Outcome.fail(NoEventExpected({actual: [commandPairJson(id, cmd)]}))
+    | Error(msg) => Outcome.fail(TranslateError({expected: "(no command)", actual: Some(msg)}))
     }
   }
 
@@ -215,11 +200,10 @@ module Make = (Spec: SliceSpec): (T with module Spec = Spec) => {
 
   let thenTodoStatus = async (pending, expectedId, expectedStatus) => {
     let {id, result, _} = await pending
-    let actualStatus: todoStatus =
-      switch result {
-      | Ok(_) => #Completed
-      | Error(_) => #Pending
-      }
+    let actualStatus: todoStatus = switch result {
+    | Ok(_) => #Completed
+    | Error(_) => #Pending
+    }
     if id == expectedId && actualStatus == expectedStatus {
       Outcome.pass
     } else {

package/src/Outcome.res

@@ -10,11 +10,7 @@
 
 type mismatch =
   | EventsMismatch({expected: array<JSON.t>, actual: array<JSON.t>})
-  | ErrorMismatch({
-      expected: JSON.t,
-      actual: option<JSON.t>,
-      actualEvents: array<JSON.t>,
-    })
+  | ErrorMismatch({expected: JSON.t, actual: option<JSON.t>, actualEvents: array<JSON.t>})
   | StateMismatch({key: string, expected: option<JSON.t>, actual: option<JSON.t>})
   | NoEventExpected({actual: array<JSON.t>})
   | TodoMismatch({expected: array<(string, JSON.t)>, actual: array<(string, JSON.t)>})
@@ -71,9 +67,11 @@ let format = (m: mismatch) =>
         actual,
       )}`
   | ErrorMismatch({expected, actual, actualEvents}) =>
-    `ErrorMismatch:\n  expected error: ${stringifyJson(expected)}\n  actual error:   ${stringifyOptJson(
-        actual,
-      )}\n  actual events:  ${stringifyJsonArray(actualEvents)}`
+    `ErrorMismatch:\n  expected error: ${stringifyJson(
+        expected,
+      )}\n  actual error:   ${stringifyOptJson(actual)}\n  actual events:  ${stringifyJsonArray(
+        actualEvents,
+      )}`
   | StateMismatch({key, expected, actual}) =>
     `StateMismatch (key: ${key}):\n  expected: ${stringifyOptJson(
         expected,
@@ -94,14 +92,16 @@ let format = (m: mismatch) =>
   | TranslateError({expected, actual}) =>
     `TranslateError:\n  expected: ${expected}\n  actual:   ${actual->Option.getOr("(none)")}`
   | QueryRowsMismatch({expected, actual}) =>
-    `QueryRowsMismatch:\n  expected: ${stringifyJsonArray(expected)}\n  actual:   ${stringifyJsonArray(
-        actual,
-      )}`
+    `QueryRowsMismatch:\n  expected: ${stringifyJsonArray(
+        expected,
+      )}\n  actual:   ${stringifyJsonArray(actual)}`
   | PublishedActionsMismatch({expected, actual}) =>
-    `PublishedActionsMismatch:\n  expected: ${stringifyJsonArray(expected)}\n  actual:   ${stringifyJsonArray(
-        actual,
-      )}`
+    `PublishedActionsMismatch:\n  expected: ${stringifyJsonArray(
+        expected,
+      )}\n  actual:   ${stringifyJsonArray(actual)}`
   | ScopeDegraded({boundary, dropped, ambiguities}) =>
-    `ScopeDegraded:\n  boundary: ${boundary}\n  dropped:  ${dropped->Array.join(", ")}\n  cause:    ${ambiguities->Array.join(" | ")}`
+    `ScopeDegraded:\n  boundary: ${boundary}\n  dropped:  ${dropped->Array.join(
+        ", ",
+      )}\n  cause:    ${ambiguities->Array.join(" | ")}`
   | Throw({error, stack}) => `Throw: ${error}\n${stack}`
   }

package/src/Projection_GWT.res

@@ -61,13 +61,11 @@ module type T = {
 
 let handleActions = Projection.handleActions // local alias to avoid shadowing
 
-module Make = (
-  Spec: Spec,
-  Projection: Projection with module Spec := Spec,
-): (T with module Spec = Spec) => {
+module Make = (Spec: Spec, Projection: Projection with module Spec := Spec): (
+  T with module Spec = Spec
+) => {
   module Spec = Spec
 
-
   let testId = ref(TestFixtures.id)
 
   let describe = JestBind.describe
@@ -148,8 +146,7 @@ module Make = (
     Ok()->Promise.resolve
   }
 
-  let runActions = (actions, operations) =>
-    actions->handleActions(operations, Spec.subIdConfig)
+  let runActions = (actions, operations) => actions->handleActions(operations, Spec.subIdConfig)
 
   let sortStore = store =>
     switch Spec.subIdConfig {
@@ -210,8 +207,7 @@ module Make = (
   let stateEq = (a: Spec.state, b: Spec.state) =>
     JSON.stringify(encState(a)) == JSON.stringify(encState(b))
   let statesEq = (a, b) =>
-    Array.length(a) == Array.length(b) &&
-      Array.zip(a, b)->Array.every(((x, y)) => stateEq(x, y))
+    Array.length(a) == Array.length(b) && Array.zip(a, b)->Array.every(((x, y)) => stateEq(x, y))
   let storeEq = (a: store, b: store) => {
     let ka = a->Dict.keysToArray->Array.toSorted(String.compare)
     let kb = b->Dict.keysToArray->Array.toSorted(String.compare)
@@ -236,8 +232,8 @@ module Make = (
     let actualStates = store->Dict.valuesToArray->Array.get(0)->Option.getOr([])
     if (
       keys->Array.length == 1 &&
-        actualId == Some(testId.contents) &&
-        statesEq(actualStates, expectedStates)
+      actualId == Some(testId.contents) &&
+      statesEq(actualStates, expectedStates)
     ) {
       Outcome.pass
     } else {
@@ -285,8 +281,7 @@ module Make = (
   }
 
   let thenState = (thunk, expectedState) => thenStates(thunk, [expectedState])
-  let thenStateWithId = (thunk, id, expectedState) =>
-    thenStatesWithId(thunk, id, [expectedState])
+  let thenStateWithId = (thunk, id, expectedState) => thenStatesWithId(thunk, id, [expectedState])
 
   let thenNoState = async thunk => {
     let store = await thunk()
@@ -319,10 +314,7 @@ module Make = (
 
   let thenFail = async thunk =>
     switch await thunk() {
-    | _ =>
-      Outcome.fail(
-        Throw({error: "Expected failure but thunk returned normally", stack: ""}),
-      )
+    | _ => Outcome.fail(Throw({error: "Expected failure but thunk returned normally", stack: ""}))
     | exception _ => Outcome.pass
     }
 }

package/src/Query_GWT.res

@@ -87,7 +87,6 @@ module type T = {
 module Make = (Spec: QueryableSpec): (T with module Spec = Spec) => {
   module Spec = Spec
 
-
   let describe = JestBind.describe
   let test = (name, body) => JestBind.test(~slice=Spec.name, name, body)
 
@@ -97,8 +96,7 @@ module Make = (Spec: QueryableSpec): (T with module Spec = Spec) => {
   let encState = (s: Spec.state): JSON.t => s->Reventless.Util_Sury.toJson(Spec.stateSchema)
   let encStates = arr => arr->Array.map(encState)
 
-  let givenStore = pairs =>
-    pairs->Array.map(((id, state)) => {id, subId: None, state})
+  let givenStore = pairs => pairs->Array.map(((id, state)) => {id, subId: None, state})
 
   let givenCompositeStore = triples =>
     triples->Array.map(((id, subId, state)) => {id, subId: Some(subId), state})
@@ -106,7 +104,13 @@ module Make = (Spec: QueryableSpec): (T with module Spec = Spec) => {
   // `whenQueryById` ignores `subId` — returns the first row with the given id.
   // Callers who want composite-id lookup go through `whenQueryByCompositeId`.
   let whenQueryById = (s: store, id) =>
-    s->Array.findMap(r => if r.id == id {Some(r.state)} else {None})
+    s->Array.findMap(r =>
+      if r.id == id {
+        Some(r.state)
+      } else {
+        None
+      }
+    )
 
   let whenQueryByCompositeId = (s: store, {id, subId}: compositeId): result<
     option<Spec.state>,
@@ -116,9 +120,11 @@ module Make = (Spec: QueryableSpec): (T with module Spec = Spec) => {
     | None =>
       Error(
         Outcome.QueryRowsMismatch({
-          expected: [JSON.Encode.string(
-            `composite-id lookup requires subIdConfig = Some({subIdField, getSubId}) in ${Spec.name}.config`,
-          )],
+          expected: [
+            JSON.Encode.string(
+              `composite-id lookup requires subIdConfig = Some({subIdField, getSubId}) in ${Spec.name}.config`,
+            ),
+          ],
           actual: [],
         }),
       )
@@ -219,9 +225,7 @@ module Make = (Spec: QueryableSpec): (T with module Spec = Spec) => {
       if actual == expected {
         Outcome.pass
       } else {
-        Outcome.fail(
-          QueryRowsMismatch({expected: encStates(expected), actual: encStates(actual)}),
-        )
+        Outcome.fail(QueryRowsMismatch({expected: encStates(expected), actual: encStates(actual)}))
       }
     }
 
@@ -267,7 +271,6 @@ module Make = (Spec: QueryableSpec): (T with module Spec = Spec) => {
 // field — so a test fails if the `@resolves` annotation is missing, exactly as
 // `whenQuery` validates a named index.
 module MakeResolver = (Primary: QueryableSpec, Target: QueryableSpec) => {
-
   let describe = JestBind.describe
   let sliceName = `${Primary.name}→${Target.name}`
   let test = (name, body) => JestBind.test(~slice=sliceName, name, body)
@@ -282,13 +285,11 @@ module MakeResolver = (Primary: QueryableSpec, Target: QueryableSpec) => {
   let encTarget = (s: Target.state): JSON.t => s->Reventless.Util_Sury.toJson(Target.stateSchema)
   let encTargets = arr => arr->Array.map(encTarget)
 
-  let resolverFor = field =>
-    Primary.config.idResolvers->Array.find(r => r.source.idField == field)
+  let resolverFor = field => Primary.config.idResolvers->Array.find(r => r.source.idField == field)
   let resolverManyFor = field =>
     Primary.config.idsResolvers->Array.find(r => r.source.idsField == field)
 
-  let missing = msg =>
-    Outcome.QueryRowsMismatch({expected: [JSON.Encode.string(msg)], actual: []})
+  let missing = msg => Outcome.QueryRowsMismatch({expected: [JSON.Encode.string(msg)], actual: []})
 
   // Read a JSON field off the primary row's encoded state.
   let readField = (state: Primary.state, field): option<JSON.t> =>
@@ -313,7 +314,9 @@ module MakeResolver = (Primary: QueryableSpec, Target: QueryableSpec) => {
   > =>
     switch resolverFor(field) {
     | None =>
-      Error(missing(`@resolves on field "${field}" is missing from ${Primary.name}.config.idResolvers`))
+      Error(
+        missing(`@resolves on field "${field}" is missing from ${Primary.name}.config.idResolvers`),
+      )
     | Some(_) =>
       switch scenario.primary->Array.findMap(((id, st)) => id == primaryId ? Some(st) : None) {
       | None => Ok(None)
@@ -332,7 +335,9 @@ module MakeResolver = (Primary: QueryableSpec, Target: QueryableSpec) => {
     switch resolverManyFor(field) {
     | None =>
       Error(
-        missing(`@resolvesMany on field "${field}" is missing from ${Primary.name}.config.idsResolvers`),
+        missing(
+          `@resolvesMany on field "${field}" is missing from ${Primary.name}.config.idsResolvers`,
+        ),
       )
     | Some(_) =>
       switch scenario.primary->Array.findMap(((id, st)) => id == primaryId ? Some(st) : None) {
@@ -340,7 +345,9 @@ module MakeResolver = (Primary: QueryableSpec, Target: QueryableSpec) => {
       | Some(pstate) =>
         switch readField(pstate, field) {
         | Some(JSON.Array(arr)) =>
-          Ok(arr->Array.map(jsonToStr)->Array.filterMap(fkId => lookupTarget(scenario.target, fkId)))
+          Ok(
+            arr->Array.map(jsonToStr)->Array.filterMap(fkId => lookupTarget(scenario.target, fkId)),
+          )
         | _ => Ok([])
         }
       }
@@ -372,6 +379,8 @@ module MakeResolver = (Primary: QueryableSpec, Target: QueryableSpec) => {
     | Ok(actual) =>
       actual == expected
         ? Outcome.pass
-        : Outcome.fail(QueryRowsMismatch({expected: encTargets(expected), actual: encTargets(actual)}))
+        : Outcome.fail(
+            QueryRowsMismatch({expected: encTargets(expected), actual: encTargets(actual)}),
+          )
     }
 }

package/src/RenderRescript.res

@@ -112,8 +112,7 @@ let renderMany = (arr: array<JSON.t>): string =>
   | [] => "[]"
   | [one] => "[" ++ render(one) ++ "]"
   | _ =>
-    let inner =
-      arr->Array.map(v => indent(1) ++ render(~level=1, v))->Array.join(",\n")
+    let inner = arr->Array.map(v => indent(1) ++ render(~level=1, v))->Array.join(",\n")
     "[\n" ++ inner ++ ",\n]"
   }
 

package/src/SideEffect_GWT.res

@@ -79,7 +79,6 @@ module type T = {
 module Make = (SE: Reventless.SideEffect.T): (T with module SE = SE) => {
   module SE = SE
 
-
   let describe = JestBind.describe
   let test = (name, ~timeout=?, body) =>
     JestBind.testPromise(~slice=SE.Source.name, name, ~timeout?, body)

package/src/StateChange/ExternalAddCategorySlice.res

@@ -14,12 +14,10 @@ type consumedEvent =
   | CategoryArchived
 
 @schema
-type command =
-  AddCategory({categoryId: @s.matches(Reventless.DcbTag.string) string, name: string})
+type command = AddCategory({categoryId: @s.matches(Reventless.DcbTag.string) string, name: string})
 
 @schema
 type error = CategoryAlreadyExists
 
 @schema
-type event =
-  CategoryAdded({categoryId: @s.matches(Reventless.DcbTag.string) string, name: string})
+type event = CategoryAdded({categoryId: @s.matches(Reventless.DcbTag.string) string, name: string})

package/src/StateChange/WithFixtures.res

@@ -7,16 +7,13 @@
 let name = "WithFixtures"
 
 @schema
-type consumedEvent =
-  | CategoryAdded
+type consumedEvent = CategoryAdded
 
 @schema
-type command =
-  AddCategory({categoryId: @s.matches(Reventless.DcbTag.string) string, name: string})
+type command = AddCategory({categoryId: @s.matches(Reventless.DcbTag.string) string, name: string})
 
 @schema
 type error = CategoryAlreadyExists
 
 @schema
-type event =
-  CategoryAdded({categoryId: @s.matches(Reventless.DcbTag.string) string, name: string})
+type event = CategoryAdded({categoryId: @s.matches(Reventless.DcbTag.string) string, name: string})

package/src/StateChange/WithManualOpen.res

@@ -8,16 +8,13 @@
 let name = "WithManualOpen"
 
 @schema
-type consumedEvent =
-  | CategoryAdded
+type consumedEvent = CategoryAdded
 
 @schema
-type command =
-  AddCategory({categoryId: @s.matches(Reventless.DcbTag.string) string, name: string})
+type command = AddCategory({categoryId: @s.matches(Reventless.DcbTag.string) string, name: string})
 
 @schema
 type error = CategoryAlreadyExists
 
 @schema
-type event =
-  CategoryAdded({categoryId: @s.matches(Reventless.DcbTag.string) string, name: string})
+type event = CategoryAdded({categoryId: @s.matches(Reventless.DcbTag.string) string, name: string})

package/tests/AutomationGwtTest.res

@@ -31,8 +31,10 @@ module ShipOrderSlice = {
     | _ => None
     }
 
-  let process = (_id, item) =>
-    Some((item.orderId, CreateShipment({orderId: item.orderId, address: item.shippingAddress})))
+  let process = (_id, item) => Some((
+    item.orderId,
+    CreateShipment({orderId: item.orderId, address: item.shippingAddress}),
+  ))
   let onExhausted = (_id, _item) => None
 }
 
@@ -56,11 +58,11 @@ describe("ShipOrder AutomationSlice", () => {
   )
 
   test("sweep: events → commands, andThenEvents drains todos", () => {
-    let s =
-      givenEvents([OrderPlaced({orderId: "o1", shippingAddress: "1 Main St"})])
-      ->whenSweep
-    let commandsOk =
-      thenCommands(s, [("o1", CreateShipment({orderId: "o1", address: "1 Main St"}))])
+    let s = givenEvents([OrderPlaced({orderId: "o1", shippingAddress: "1 Main St"})])->whenSweep
+    let commandsOk = thenCommands(
+      s,
+      [("o1", CreateShipment({orderId: "o1", address: "1 Main St"}))],
+    )
     let drained = andThenEvents(s, [ShipmentCreated({orderId: "o1"})])
     let todosOk = thenScenarioTodos(drained, [])
     switch (commandsOk, todosOk) {

package/tests/DelegateGwtTest.res

@@ -6,7 +6,6 @@
 //     via `FromExtension`.
 // See `docs/plans/done/gwt-flow-and-extension-test-kinds.md` Phase 1.
 
-
 module EPM = ReventlessInfra.ExtensionPointMapping
 module EM = ReventlessInfra.ExtensionMapping