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

package/src/adapter/Api/Platform_ComponentDefinitions_Lambda_Ops.res

@@ -12,7 +12,6 @@
 // sury-encoded with the same shape as the in-memory adapter's
 // encodePluginStructureEntry, so it is wrapped with `pluginId` without decoding.
 
-
 let str = (item: dict<JSON.t>, key: string): option<string> =>
   item->Dict.get(key)->Option.flatMap(JSON.Decode.string)
 
@@ -37,7 +36,14 @@ type healSpec = {lists: array<string>, nested: array<(string, array<string>)>}
 let refLists = ["references"]
 
 let writeSideHeal = {
-  lists: ["commands", "linkedViews", "producedEventTypes", "consumedEventTypes", "events", "errors"],
+  lists: [
+    "commands",
+    "linkedViews",
+    "producedEventTypes",
+    "consumedEventTypes",
+    "events",
+    "errors",
+  ],
   nested: [("commands", refLists), ("events", refLists), ("errors", refLists)],
 }
 
@@ -52,10 +58,7 @@ let healByCollection: array<(string, healSpec)> = [
   ("stateChangeSlices", writeSideHeal),
   ("aggregates", writeSideHeal),
   ("automationSlices", {lists: ["consumedEventTypes", "producedCommandTypes"], nested: []}),
-  (
-    "outboundTranslationSlices",
-    {lists: ["consumedEventTypes", "inboundCommandTypes"], nested: []},
-  ),
+  ("outboundTranslationSlices", {lists: ["consumedEventTypes", "inboundCommandTypes"], nested: []}),
   ("inboundTranslationSlices", {lists: ["commandTypes"], nested: []}),
   ("extensions", {lists: ["delegateNames", "eventTypes", "commandTypes"], nested: []}),
 ]
@@ -116,21 +119,22 @@ let healStructure = (structure: dict<JSON.t>): dict<JSON.t> => {
   healByCollection->Array.forEach(((collection, spec)) =>
     out->mapMembers(collection, component => {
       component->fillLists(spec.lists)
-      spec.nested->Array.forEach(((key, keys)) =>
-        component->mapMembers(key, member => member->fillLists(keys))
+      spec.nested->Array.forEach(
+        ((key, keys)) => component->mapMembers(key, member => member->fillLists(keys)),
       )
     })
   )
-  readSideCollections->Array.forEach(collection =>
-    out->mapMembers(collection, fillLifecycleField)
-  )
+  readSideCollections->Array.forEach(collection => out->mapMembers(collection, fillLifecycleField))
   out
 }
 
 // Mirror ReventlessCore.Platform_ComponentDefinitionsApi.isPublicQueryable on
 // the read path: a component is public unless its visibility is "Internal".
 let isPublicQueryable = (q: JSON.t): bool =>
-  switch q->JSON.Decode.object->Option.flatMap(o => o->Dict.get("visibility"))->Option.flatMap(JSON.Decode.string) {
+  switch q
+  ->JSON.Decode.object
+  ->Option.flatMap(o => o->Dict.get("visibility"))
+  ->Option.flatMap(JSON.Decode.string) {
   | Some("Internal") => false
   | _ => true
   }
@@ -147,8 +151,7 @@ let isPublicQueryable = (q: JSON.t): bool =>
 // duplicate list.
 let filterStructure = (structure: dict<JSON.t>): dict<JSON.t> => {
   let out = Dict.fromArray(structure->Dict.toArray)
-  let arrAt = key =>
-    out->Dict.get(key)->Option.flatMap(JSON.Decode.array)->Option.getOr([])
+  let arrAt = key => out->Dict.get(key)->Option.flatMap(JSON.Decode.array)->Option.getOr([])
   let readModels = arrAt("readModels")
   let stateViewSlices = arrAt("stateViewSlices")
   out->Dict.set("readModels", readModels->Array.filter(isPublicQueryable)->JSON.Encode.array)
@@ -192,7 +195,6 @@ let toEntryWith = (~filter: bool, item: dict<JSON.t>, ~name: string): option<JSO
   }
 }
 
-
 // The built-in Platform_Admin entry, written at deploy time as an asset file in
 // the code archive (the admin never Connects to itself, so its structure never
 // enters the Plugin read model). It rides the archive rather than an env var
@@ -204,27 +206,25 @@ let toEntryWith = (~filter: bool, item: dict<JSON.t>, ~name: string): option<JSO
 // extension points, so its filtered and complete encodings carry the same
 // components; the structure-level fields the complete entry adds are absent from
 // this JSON and resolve to null, which is what `extensionPoints: None` means.
-let adminEntry: option<JSON.t> =
-  try {
-    switch NodePath.join([NodeProcess.cwd(), "adminEntry.json"])
-    ->NodeFs.readFileSync
-    ->JSON.parseOrThrow {
-    | JSON.Null => None
-    | json => Some(json)
-    }
-  } catch {
-  | _ => None
+let adminEntry: option<JSON.t> = try {
+  switch NodePath.join([NodeProcess.cwd(), "adminEntry.json"])
+  ->NodeFs.readFileSync
+  ->JSON.parseOrThrow {
+  | JSON.Null => None
+  | json => Some(json)
   }
+} catch {
+| _ => None
+}
 
 // Resolve an offloaded `structure`: a large structure is content-addressed to the
 // offload bucket at deploy time and persisted as an `{$offload: {...}}` reference,
 // so fetch the object's bytes and substitute the real structure JSON before it is
 // filtered. Inline (or absent) structures pass through untouched. The `fetch` is
 // per-hash cached, so an identical structure shared across versions is read once.
-let resolveStructure = (
-  fetch: string => promise<string>,
-  item: dict<JSON.t>,
-): promise<dict<JSON.t>> =>
+let resolveStructure = (fetch: string => promise<string>, item: dict<JSON.t>): promise<
+  dict<JSON.t>,
+> =>
   switch item
   ->Dict.get("structure")
   ->Option.flatMap(JSON.Decode.object)
@@ -302,8 +302,7 @@ let structureOf = (item: dict<JSON.t>, ~name as _: string): option<(
     | exception _ =>
       JsError.throwWithMessage(
         `baked manifest: the structure persisted for "${pluginId}" cannot be decoded — ` ++
-        `it was written by a framework version this platform can no longer read. ` ++
-        `Redeploy that plugin, or drop it from the include-list.`,
+        `it was written by a framework version this platform can no longer read. ` ++ `Redeploy that plugin, or drop it from the include-list.`,
       )
     }
   | _ => None
@@ -357,8 +356,7 @@ let bakeSelections = (): array<ReventlessCore.Platform_BakedManifest.selection>
   | Some(raw) =>
     switch raw->JSON.parseOrThrow {
     | json => json->decodeSelections
-    | exception _ =>
-      JsError.throwWithMessage("baked manifest: BAKE_SELECTIONS is not a JSON array")
+    | exception _ => JsError.throwWithMessage("baked manifest: BAKE_SELECTIONS is not a JSON array")
     }
   }
 
@@ -612,8 +610,7 @@ let runBake = async (
   let selections = bakeSelections()
   if selections->Array.length == 0 {
     JsError.throwWithMessage(
-      "baked manifest: BAKE_SELECTIONS is empty — this platform declares no bake, " ++
-      "so there is nothing to write and a shell pointed at the file would find none.",
+      "baked manifest: BAKE_SELECTIONS is empty — this platform declares no bake, " ++ "so there is nothing to write and a shell pointed at the file would find none.",
     )
   }
   // The default journey first and always — the caller supplies its key, because
@@ -677,8 +674,7 @@ let handler = async (event: JSON.t): array<JSON.t> => {
     switch bakeTarget {
     | Some(_) =>
       JsError.throwWithMessage(
-        "baked manifest: PLUGIN_RM_TABLE env var not set — the bake would write an " ++
-        "empty shop rather than fail.",
+        "baked manifest: PLUGIN_RM_TABLE env var not set — the bake would write an " ++ "empty shop rather than fail.",
       )
     | None => admin
     }
@@ -699,11 +695,7 @@ let handler = async (event: JSON.t): array<JSON.t> => {
     | Some(target) =>
       // Checked on the raw rows: the refs are what the deploy can predict, and a
       // row that is behind should not have its structure fetched at all.
-      let regs = registrations(
-        rawItems,
-        ~expect=bakeExpectations(event),
-        ~since=bakeSince(event),
-      )
+      let regs = registrations(rawItems, ~expect=bakeExpectations(event), ~since=bakeSince(event))
       switch regs->Array.filter(isPending) {
       | [] =>
         // The built-in admin entry is deliberately absent: it never enters the
@@ -720,8 +712,7 @@ let handler = async (event: JSON.t): array<JSON.t> => {
         // file. What the summary adds is orthogonal to the files — it says what
         // the convergence check proved, not what the bake wrote.
         Array.concat(written, [encodeSummary(regs)])
-      | pending =>
-        // Not an error — the deploy just has not finished arriving. Reported so the
+      | pending => // Not an error — the deploy just has not finished arriving. Reported so the
         // caller can invoke again rather than bake the previous deployment, and
         // reported with both keys and the row's date so that when it never does
         // arrive, the job says which of the causes it was.
@@ -734,12 +725,11 @@ let handler = async (event: JSON.t): array<JSON.t> => {
         ]
       }
     | None =>
-      let userEntries =
-        Platform_AdminScan_Ops.latestByName(
-          await resolveAll(),
-          ~nameVersionOf=item => item->str("name"),
-          ~toEntry,
-        )
+      let userEntries = Platform_AdminScan_Ops.latestByName(
+        await resolveAll(),
+        ~nameVersionOf=item => item->str("name"),
+        ~toEntry,
+      )
       Array.concat(admin, userEntries)
     }
   }

package/src/adapter/Api/Platform_UIFragments_Lambda.res

@@ -44,42 +44,44 @@ let make = (
     ~opts,
   )
 
-  let _ =
-    uiFragmentRegistryTableName->Pulumi.Output.apply(tableName => {
-      open PolicyDocument
-      let _rolePolicy = IAM.RolePolicy.make(
-        ~name=name ++ "LambdaPolicy",
-        ~args={
-          IAM.RolePolicy.policy: PolicyDocument.make(
-            ~id=name ++ "LambdaPolicy",
-            ~statements=[
-              {
-                sid: "AllowLambdaLogging",
-                effect: Allow,
-                actions: Action("logs:*"),
-                resources: Resource("arn:aws:logs:*:*:*"),
-              },
-              {
-                sid: "AllowScanUiFragmentsTable",
-                effect: Allow,
-                actions: Actions(["dynamodb:Scan"]),
-                resources: Resource("arn:aws:dynamodb:*:*:table/" ++ tableName),
-              },
-            ],
-          )
-          ->PolicyDocument.toJsonString
-          ->Pulumi.Input.make,
-          role: lambdaRole.id->Pulumi.Output.asInput,
-        },
-        ~opts,
-      )
-    })
+  let _ = uiFragmentRegistryTableName->Pulumi.Output.apply(tableName => {
+    open PolicyDocument
+    let _rolePolicy = IAM.RolePolicy.make(
+      ~name=name ++ "LambdaPolicy",
+      ~args={
+        IAM.RolePolicy.policy: PolicyDocument.make(
+          ~id=name ++ "LambdaPolicy",
+          ~statements=[
+            {
+              sid: "AllowLambdaLogging",
+              effect: Allow,
+              actions: Action("logs:*"),
+              resources: Resource("arn:aws:logs:*:*:*"),
+            },
+            {
+              sid: "AllowScanUiFragmentsTable",
+              effect: Allow,
+              actions: Actions(["dynamodb:Scan"]),
+              resources: Resource("arn:aws:dynamodb:*:*:table/" ++ tableName),
+            },
+          ],
+        )
+        ->PolicyDocument.toJsonString
+        ->Pulumi.Input.make,
+        role: lambdaRole.id->Pulumi.Output.asInput,
+      },
+      ~opts,
+    )
+  })
 
   // Bundle reventless-aws (the compiled `_Ops` handler lives inside it) and
   // re-export its `handler`; buildCodeArchive also ships the ESM resolve-hook so
   // the handler's bare @aws-sdk/* specifiers resolve from the managed runtime.
   let packageDirs = Dict.fromArray([
-    ("@reventlessdev/reventless-aws", Util_Bundle.resolvePackageRoot("@reventlessdev/reventless-aws")),
+    (
+      "@reventlessdev/reventless-aws",
+      Util_Bundle.resolvePackageRoot("@reventlessdev/reventless-aws"),
+    ),
   ])
   let {code, sourceCodeHash} = Util_Bundle.buildCodeArchive(
     ~entryPointModule="@reventlessdev/reventless-aws/src/adapter/Api/Platform_UIFragments_Lambda_Ops.res.mjs",
@@ -118,7 +120,12 @@ let make = (
       memorySize: 512->Pulumi.Input.make,
       timeout: 30->Pulumi.Input.make,
       layers,
-      tags: AWS.Tags.make(~name=name ++ "Lambda", ~kind=ReventlessCore.ComponentType.Platform, ~role=Runtime, ~scope=Platform),
+      tags: AWS.Tags.make(
+        ~name=name ++ "Lambda",
+        ~kind=ReventlessCore.ComponentType.Platform,
+        ~role=Runtime,
+        ~scope=Platform,
+      ),
       environment: (
         {
           Lambda.Function.variables: Dict.fromArray([

package/src/adapter/Api/Platform_UIFragments_Lambda_Ops.res

@@ -11,7 +11,6 @@
 // adapter's Platform_UIFragmentsApi.encodeUIFragmentEntry produces, so rows are
 // returned as-is (bar the name/version collapse).
 
-
 let str = (item: dict<JSON.t>, key: string): option<string> =>
   item->Dict.get(key)->Option.flatMap(JSON.Decode.string)
 
@@ -43,5 +42,9 @@ let handler = async (_event: JSON.t): array<JSON.t> =>
     []
   | Some(table) =>
     let items = await Platform_AdminScan_Ops.scanAll(~tableName=table)
-    Platform_AdminScan_Ops.latestByName(items, ~nameVersionOf=item => item->str("pluginId"), ~toEntry)
+    Platform_AdminScan_Ops.latestByName(
+      items,
+      ~nameVersionOf=item => item->str("pluginId"),
+      ~toEntry,
+    )
   }

package/src/adapter/Auth/Auth_ActiveRolePoolAttachment.res

@@ -37,7 +37,6 @@
     [AppSync_SourceApiAssociation_Retrying.res]: Pulumi serialises a dynamic
     provider's whole captured closure into stack state, so the SDK is imported
     lazily and nothing here captures a Pulumi Output. */
-
 let log = ReventlessCore.Logger.fromEnv()
 
 // ── The merge ────────────────────────────────────────────────────────────────

package/src/adapter/Auth/Auth_ActiveRoleStore.res

@@ -70,8 +70,7 @@ nothing else is consulted.
 let chooseStore = (~identityProviderId: option<string>): storeChoice =>
   switch identityProviderId {
   | None => StackScoped
-  | Some(id) =>
-    ProviderScoped(Auth_ActiveRoleStore_Schema.derivedStoreName(~identityProviderId=id))
+  | Some(id) => ProviderScoped(Auth_ActiveRoleStore_Schema.derivedStoreName(~identityProviderId=id))
   }
 
 // JS resolver code (APPSYNC_JS runtime): forward the caller's arguments and the

package/src/adapter/Auth/Auth_ActiveRoleStore_Schema.res

@@ -78,10 +78,7 @@ operator upgrading meets a sentence instead of a silent misbehaviour.
 
 Order-insensitive, because `DescribeTable` does not promise one.
 */
-let keySchemaRefusal = (
-  ~tableName: string,
-  ~actual: array<(string, string)>,
-): option<string> => {
+let keySchemaRefusal = (~tableName: string, ~actual: array<(string, string)>): option<string> => {
   let actualKey = describeKeySchema(actual)
   let wantedKey = describeKeySchema(expectedKeySchema)
   actualKey == wantedKey

package/src/adapter/Auth/Auth_ActiveRoleTrigger_Ops.res

@@ -137,7 +137,7 @@ let respond = (~event: event, ~decision: decision): event => {
         groupOverrideDetails: {
           groupsToOverride: groups,
           iamRolesToOverride,
-          preferredRole: ?preferredRole,
+          ?preferredRole,
         },
       },
     },
@@ -204,7 +204,10 @@ let handler = async (event: event): event => {
     ->Option.getOr([])
 
   let sub =
-    event.request->Option.flatMap(r => r.userAttributes)->Option.flatMap(u => u.sub)->Option.getOr("")
+    event.request
+    ->Option.flatMap(r => r.userAttributes)
+    ->Option.flatMap(u => u.sub)
+    ->Option.getOr("")
 
   let clientId = event.callerContext->Option.flatMap(c => c.clientId)->Option.getOr("")
 

package/src/adapter/Auth/Auth_Cognito.res

@@ -93,11 +93,8 @@ type authConfig = {
   region: string,
 }
 
-let authenticate = async (
-  ctx: ReventlessCore.Auth_Adapter.requestContext,
-): Identity.authResult => {
-  let token =
-    _getHeader(ctx.headers, "Authorization")->Option.flatMap(_bearerToken)
+let authenticate = async (ctx: ReventlessCore.Auth_Adapter.requestContext): Identity.authResult => {
+  let token = _getHeader(ctx.headers, "Authorization")->Option.flatMap(_bearerToken)
   switch token {
   | None => Anonymous
   | Some(t) =>
@@ -154,10 +151,7 @@ let fromAppSyncIdentity = (id: option<appSyncIdentity>): Identity.authResult =>
       let claims =
         rawClaims
         ->Dict.toArray
-        ->Array.map(((k, v)) => (
-          k,
-          v->JSON.Decode.string->Option.getOr(v->JSON.stringify),
-        ))
+        ->Array.map(((k, v)) => (k, v->JSON.Decode.string->Option.getOr(v->JSON.stringify)))
         ->Dict.fromArray
       Authenticated({
         userId: sub,

package/src/adapter/CommandGenerator/CommandGeneratorResolvers_AppSync.res

@@ -214,10 +214,7 @@ let makeDcb = (
   )
 
   let _ =
-    (
-      lambda->Pulumi.Output.flatMap(lambda => lambda.arn),
-      dataSourceRole.id,
-    )
+    (lambda->Pulumi.Output.flatMap(lambda => lambda.arn), dataSourceRole.id)
     ->Pulumi.Output.all2
     ->Pulumi.Output.apply(((lambdaArn, dataSourceRoleId)) => {
       let _attachDataSourcePolicy = PulumiAws.IAM.RolePolicy.make(

package/src/adapter/CommandGenerator/CommandGeneratorResolvers_AppSync_NoOp.res

@@ -5,7 +5,9 @@ type api = Types.AppSync.api
 type runtimeParts = Util.Lambda.runtimeParts
 
 let handleResolversEvent = (_generateCommand: ReventlessCore.CommandGenerator.commandGenerator) =>
-  Pulumi.Output.make((_event, _context) => Effect.succeed(ReventlessCore.CommandTopic.Pending({msgId: ""})))
+  Pulumi.Output.make((_event, _context) =>
+    Effect.succeed(ReventlessCore.CommandTopic.Pending({msgId: ""}))
+  )
 
 let make: ReventlessCore.CommandGenerator_Adapter.resolversMaker<api, runtimeParts> = (
   ~name as _,

package/src/adapter/CommandGenerator/InboundTranslationResolvers_AppSync.res

@@ -31,10 +31,7 @@ let make = (
   )
 
   let _ =
-    (
-      lambda->Pulumi.Output.flatMap(lambda => lambda.arn),
-      dataSourceRole.id,
-    )
+    (lambda->Pulumi.Output.flatMap(lambda => lambda.arn), dataSourceRole.id)
     ->Pulumi.Output.all2
     ->Pulumi.Output.apply(((lambdaArn, dataSourceRoleId)) => {
       let _attachDataSourcePolicy = PulumiAws.IAM.RolePolicy.make(

package/src/adapter/CommandTopic/CommandTopicChannel_SQS.res

@@ -48,7 +48,12 @@ let make: ReventlessCore.CommandTopic_Adapter.channelMaker<
   let opts =
     opts->Option.map(ReventlessCore.Util.Pulumi.ComponentResourceOptions.toCustomResourceOptions)
 
-  let tags = AWS.Tags.make(~name, ~kind=ReventlessCore.CommandTopic.componentType, ~role=CommandTopic, ~owner?)
+  let tags = AWS.Tags.make(
+    ~name,
+    ~kind=ReventlessCore.CommandTopic.componentType,
+    ~role=CommandTopic,
+    ~owner?,
+  )
   let queue = PulumiAws.SQS.Queue.make(
     ~name,
     ~args={
@@ -82,9 +87,7 @@ let make: ReventlessCore.CommandTopic_Adapter.channelMaker<
       stream =>
         stream
         ->Stream.grouped(10)
-        ->Stream.runForEach(jsons =>
-          Effect.promise(() => publishJsons(jsons))
-        )
+        ->Stream.runForEach(jsons => Effect.promise(() => publishJsons(jsons)))
     }),
     publishJsonsAndWait: None->Pulumi.Output.make,
     connect,

package/src/adapter/CommandTopic/CommandTopicChannel_SQS_Async.res

@@ -23,7 +23,12 @@ let make: ReventlessCore.CommandTopic_Adapter.channelMaker<
 > = (~name, ~owner, ~opts=?) => {
   let opts =
     opts->Option.map(ReventlessCore.Util.Pulumi.ComponentResourceOptions.toCustomResourceOptions)
-  let tags = AWS.Tags.make(~name, ~kind=ReventlessCore.CommandTopic.componentType, ~role=CommandTopic, ~owner?)
+  let tags = AWS.Tags.make(
+    ~name,
+    ~kind=ReventlessCore.CommandTopic.componentType,
+    ~role=CommandTopic,
+    ~owner?,
+  )
   let queue = PulumiAws.SQS.Queue.make(
     ~name,
     ~args={

package/src/adapter/CommandTopic/CommandTopicChannel_SQS_FIFO.res

@@ -12,7 +12,12 @@ let make: ReventlessCore.CommandTopic_Adapter.channelMaker<
 > = (~name, ~owner, ~opts=?) => {
   let opts =
     opts->Option.map(ReventlessCore.Util.Pulumi.ComponentResourceOptions.toCustomResourceOptions)
-  let tags = AWS.Tags.make(~name, ~kind=ReventlessCore.CommandTopic.componentType, ~role=CommandTopic, ~owner?)
+  let tags = AWS.Tags.make(
+    ~name,
+    ~kind=ReventlessCore.CommandTopic.componentType,
+    ~role=CommandTopic,
+    ~owner?,
+  )
   let queue = PulumiAws.SQS.Queue.make(
     ~name,
     ~args={
@@ -51,9 +56,7 @@ let make: ReventlessCore.CommandTopic_Adapter.channelMaker<
       stream =>
         stream
         ->Stream.grouped(10)
-        ->Stream.runForEach(jsons =>
-          Effect.promise(() => publishJsons(jsons))
-        )
+        ->Stream.runForEach(jsons => Effect.promise(() => publishJsons(jsons)))
     }),
     publishJsonsAndWait: None->Pulumi.Output.make,
     connect,

package/src/adapter/CommandTopic/CommandTopicChannel_SQS_Runtime.res

@@ -25,22 +25,21 @@ let handleQueueEvent = (
     ->Effect.flatMap(results => {
       let deleteEntries =
         results
-        ->Array.mapWithIndex(
-          (result, idx) =>
-            switch result {
-            | Ok(reference) =>
-              let deleteMessageBatchEntry: AwsSdk.SQS.DeleteMessageBatchCommand.deleteMessageBatchEntry = {
-                id: idx->Int.toString,
-                receiptHandle: reference,
-              }
-              deleteMessageBatchEntry->Some
-            | Error(reference) =>
-              ReventlessCore.EffectLogger.logError(
-                ~comp=__MODULE__,
-                "handleQueueEvent: Couldn't handle command with ReceiptHandle: " ++ reference,
-              )->Effect.runSync
-              None
-            },
+        ->Array.mapWithIndex((result, idx) =>
+          switch result {
+          | Ok(reference) =>
+            let deleteMessageBatchEntry: AwsSdk.SQS.DeleteMessageBatchCommand.deleteMessageBatchEntry = {
+              id: idx->Int.toString,
+              receiptHandle: reference,
+            }
+            deleteMessageBatchEntry->Some
+          | Error(reference) =>
+            ReventlessCore.EffectLogger.logError(
+              ~comp=__MODULE__,
+              "handleQueueEvent: Couldn't handle command with ReceiptHandle: " ++ reference,
+            )->Effect.runSync
+            None
+          }
         )
         ->Array.filterMap(x => x)
 
@@ -48,7 +47,12 @@ let handleQueueEvent = (
       | [] => Effect.succeed()
       | entries =>
         Util.SQS_Runtime.deleteMessages(entries, queue)
-        ->Effect.tap(_ => ReventlessCore.EffectLogger.logInfo(~comp=__MODULE__, "handleQueueEvent: Deleted all commands from queue"))
+        ->Effect.tap(_ =>
+          ReventlessCore.EffectLogger.logInfo(
+            ~comp=__MODULE__,
+            "handleQueueEvent: Deleted all commands from queue",
+          )
+        )
         ->Effect.catchAll(errorMsg =>
           ReventlessCore.EffectLogger.logError(
             ~comp=__MODULE__,
@@ -63,7 +67,9 @@ let publishJsons = (queue, queueService) =>
   async jsons =>
     switch jsons->Array.length {
     | 0 =>
-      ReventlessCore.EffectLogger.logInfo(~comp=__MODULE__, "publishJsons: No commands to send")->Effect.runPromise->ignore
+      ReventlessCore.EffectLogger.logInfo(~comp=__MODULE__, "publishJsons: No commands to send")
+      ->Effect.runPromise
+      ->ignore
     | 1 =>
       await queue->Util_SQS_Runtime.send(queueService, jsons->Array.getUnsafe(0))->Effect.runPromise
     | _ =>

package/src/adapter/CommandTopic/CommandTopicChannel_SQS_Sync.res

@@ -28,7 +28,12 @@ let make: ReventlessCore.CommandTopic_Adapter.channelMaker<
   let opts =
     opts->Option.map(ReventlessCore.Util.Pulumi.ComponentResourceOptions.toCustomResourceOptions)
 
-  let tags = AWS.Tags.make(~name, ~kind=ReventlessCore.CommandTopic.componentType, ~role=CommandTopic, ~owner?)
+  let tags = AWS.Tags.make(
+    ~name,
+    ~kind=ReventlessCore.CommandTopic.componentType,
+    ~role=CommandTopic,
+    ~owner?,
+  )
   let queue = PulumiAws.SQS.Queue.make(
     ~name,
     ~args={
@@ -73,9 +78,9 @@ let make: ReventlessCore.CommandTopic_Adapter.channelMaker<
         | None =>
           // Handler not yet registered — fall back to fire-and-forget, return Pending
           let _ = await sendToSqs(jsons)
-          jsons->Array.map(cmdJson =>
-            ReventlessCore.CommandTopic.Pending({msgId: cmdJson.meta.msgId})
-          )
+          jsons->Array.map(cmdJson => ReventlessCore.CommandTopic.Pending({
+            msgId: cmdJson.meta.msgId,
+          }))
         | Some(handleCmds) =>
           await ReventlessCore.CommandTopic.runInlineAndCollect(jsons, handleCmds)
         }

package/src/adapter/CommandTopic/CommandTopicRegistry.res

@@ -38,10 +38,7 @@ let register = (
   ~queueUrl: Pulumi.Output.t<string>,
   ~resource: ReventlessInfra.Adapter.resource,
   ~isFifo: bool,
-) =>
-  owner->Option.forEach(({name}) =>
-    byOwner->Dict.set(name, {queueUrl, resource, isFifo})
-  )
+) => owner->Option.forEach(({name}) => byOwner->Dict.set(name, {queueUrl, resource, isFifo}))
 
 /** The CommandTopic of the component with this name, if one has been created.
     `None` for a target that is not an Aggregate in this plugin — a DCB

package/src/adapter/Counter/CounterHandler_DynamoDbStream.res

@@ -19,24 +19,24 @@ let make: ReventlessCore.Counter_Adapter.handlerMaker = (
 
   let countsTableName = (countsDb.resources->Array.getUnsafe(0)).name
 
-  let targetSpecModule =
-    specModulePath->JSON.stringifyAny->Option.getOr(`""`)
-  let mappingsModule =
-    mappingsModulePath->JSON.stringifyAny->Option.getOr(`""`)
+  let targetSpecModule = specModulePath->JSON.stringifyAny->Option.getOr(`""`)
+  let mappingsModule = mappingsModulePath->JSON.stringifyAny->Option.getOr(`""`)
 
-  let handlerConfigJson =
-    Pulumi.Output.all3((countsTableName, publishChannelId, referencesStream.urn))
-    ->Pulumi.Output.apply(((table, queueUrl, refArn)) => {
-      let countsArn = "" // Will be set separately
-      `{"targetSpecModule":${targetSpecModule},"mappingsModule":${mappingsModule},"countsTableName":"${table}","publishChannelId":"${queueUrl}","referencesStreamArn":"${refArn}","countsStreamArn":"${countsArn}"}`
-    })
+  let handlerConfigJson = Pulumi.Output.all3((
+    countsTableName,
+    publishChannelId,
+    referencesStream.urn,
+  ))->Pulumi.Output.apply(((table, queueUrl, refArn)) => {
+    let countsArn = "" // Will be set separately
+    `{"targetSpecModule":${targetSpecModule},"mappingsModule":${mappingsModule},"countsTableName":"${table}","publishChannelId":"${queueUrl}","referencesStreamArn":"${refArn}","countsStreamArn":"${countsArn}"}`
+  })
 
   // countsStreamArn is in a separate Output — merge into config
   let fullHandlerConfigJson =
-    Pulumi.Output.all2((handlerConfigJson, countsStream.urn))
-    ->Pulumi.Output.apply(((config, countsArn)) =>
-      config->String.replace(`"countsStreamArn":""`, `"countsStreamArn":"${countsArn}"`)
-    )
+    Pulumi.Output.all2((handlerConfigJson, countsStream.urn))->Pulumi.Output.apply(((
+      config,
+      countsArn,
+    )) => config->String.replace(`"countsStreamArn":""`, `"countsStreamArn":"${countsArn}"`))
 
   envVars->Dict.set("HANDLER_CONFIG", fullHandlerConfigJson->Pulumi.Output.asInput)
 
@@ -73,7 +73,7 @@ let make: ReventlessCore.Counter_Adapter.handlerMaker = (
 
   let subscribe = (sourceName, source) =>
     Util_EventSourceMapping.subscribe(
-      ~lambda=lambda,
+      ~lambda,
       ~targetName=name,
       ~sourceName,
       ~source,