@reventlessdev/reventless-aws 3.0.0-alpha.167

package/src/components/Aggregate_Builder_Micro.res

@@ -0,0 +1,63 @@
+module CommandGeneratorResolvers = CommandGeneratorResolvers.AppSync
+module CommandTopicChannel = CommandTopicChannel.SQS_Sync
+module EventCollectorChannel = EventCollectorChannel.DynamoDbStream
+module RuntimeEnvironment = RuntimeEnvironment.Lambda
+
+module AggregateRuntimeBuilder = AggregateRuntime_Builder_Micro
+
+module type MappingsConfig = {
+  let mappingsModulePath: option<string>
+}
+
+module Make = (
+  Spec: Reventless.Aggregate.Spec,
+  Behavior: Reventless.Behavior.T with module Spec := Spec,
+  EventMappings: ReventlessInfra.EventMapper.Mappings with module Target := Spec,
+  MappingsConfig: MappingsConfig,
+): (
+  ReventlessInfra.Aggregate.T
+    with type api = CommandGeneratorResolvers.api
+    and type component = ReventlessCore.Aggregate.component
+) => {
+  module Inner = ReventlessCore.Aggregate_Builder.Make(
+    Spec,
+    Behavior,
+    EventMappings,
+    RuntimeEnvironment,
+    CommandGeneratorResolvers,
+    CommandTopicChannel,
+    EventLogStorage.DynamoDbStream,
+    EventTopicPublisher.DynamoDbStream,
+    EventCollectorChannel,
+    AggregateRuntimeBuilder,
+    ReventlessCore.Plugin_Helpers.NoopHooksConfig,
+  )
+
+  module Spec = Spec
+  module AggregateRuntimeBuilder = AggregateRuntimeBuilder
+
+  type api = Inner.api
+  type component = Inner.component
+
+  let make = (~api, ~opts=?): component => {
+    let aggregate = Inner.make(~api, ~opts?)
+
+    let eventLogOutputs = (aggregate->Inner.outputs).eventLog
+    let tableResource = eventLogOutputs.resources->Array.getUnsafe(0)
+    let eventLogTableName = tableResource.name
+
+    AggregateRuntimeBuilder.registerAggregate(
+      ~aggregateName=Spec.name,
+      ~specModulePath=Util_Bundle.getModuleSpecifier(Spec.moduleUrl),
+      ~behaviorModulePath=Util_Bundle.getModuleSpecifier(Behavior.moduleUrl),
+      ~eventLogTableName,
+      ~mappingsModulePath=?MappingsConfig.mappingsModulePath,
+    )
+
+    aggregate
+  }
+
+  let outputs = Inner.outputs
+  let operations = Inner.operations
+  let finish = () => AggregateRuntimeBuilder.finish()
+}

package/src/components/Aggregate_Builder_Micro.res.mjs

@@ -0,0 +1,80 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Util_Bundle$ReventlessAws from "../util/Util_Bundle.res.mjs";
+import * as Plugin_Helpers$ReventlessCore from "@reventlessdev/reventless-core/src/plugin/component/Plugin_Helpers.res.mjs";
+import * as Aggregate_Builder$ReventlessCore from "@reventlessdev/reventless-core/src/components/Aggregate/Aggregate_Builder.res.mjs";
+import * as RuntimeEnvironment_Lambda$ReventlessAws from "../adapter/Runtime/RuntimeEnvironment_Lambda.res.mjs";
+import * as CommandTopicChannel_SQS_Sync$ReventlessAws from "../adapter/CommandTopic/CommandTopicChannel_SQS_Sync.res.mjs";
+import * as AggregateRuntime_Builder_Micro$ReventlessAws from "../adapter/Runtime/AggregateRuntime_Builder_Micro.res.mjs";
+import * as EventLogStorage_DynamoDbStream$ReventlessAws from "../adapter/EventLog/EventLogStorage_DynamoDbStream.res.mjs";
+import * as CommandGeneratorResolvers_AppSync$ReventlessAws from "../adapter/CommandGenerator/CommandGeneratorResolvers_AppSync.res.mjs";
+import * as EventTopicPublisher_DynamoDbStream$ReventlessAws from "../adapter/EventTopic/EventTopicPublisher_DynamoDbStream.res.mjs";
+import * as EventCollectorChannel_DynamoDbStream$ReventlessAws from "../adapter/EventCollector/EventCollectorChannel_DynamoDbStream.res.mjs";
+
+function Make(Spec) {
+  return Behavior => (EventMappings => (MappingsConfig => {
+    let Inner = Aggregate_Builder$ReventlessCore.Make(Spec)(Behavior)({
+      mappings: EventMappings.mappings,
+      counter: EventMappings.counter
+    })({
+      make: RuntimeEnvironment_Lambda$ReventlessAws.make,
+      groupBySource: RuntimeEnvironment_Lambda$ReventlessAws.groupBySource,
+      extractCorrelationId: RuntimeEnvironment_Lambda$ReventlessAws.extractCorrelationId,
+      asEventHandler: prim => prim,
+      asEffectHandler: prim => prim
+    })(CommandGeneratorResolvers_AppSync$ReventlessAws)({
+      make: CommandTopicChannel_SQS_Sync$ReventlessAws.make
+    })(EventLogStorage_DynamoDbStream$ReventlessAws)(EventTopicPublisher_DynamoDbStream$ReventlessAws)({
+      make: EventCollectorChannel_DynamoDbStream$ReventlessAws.make,
+      connect: EventCollectorChannel_DynamoDbStream$ReventlessAws.connect
+    })({
+      CommandTopicChannel: {
+        make: CommandTopicChannel_SQS_Sync$ReventlessAws.make
+      },
+      EventCollectorChannel: {
+        make: EventCollectorChannel_DynamoDbStream$ReventlessAws.make,
+        connect: EventCollectorChannel_DynamoDbStream$ReventlessAws.connect
+      },
+      forCommandGenerator: AggregateRuntime_Builder_Micro$ReventlessAws.forCommandGenerator,
+      forCommandTopic: AggregateRuntime_Builder_Micro$ReventlessAws.forCommandTopic,
+      forEventCollector: AggregateRuntime_Builder_Micro$ReventlessAws.forEventCollector,
+      finish: AggregateRuntime_Builder_Micro$ReventlessAws.finish
+    })(Plugin_Helpers$ReventlessCore.NoopHooksConfig);
+    let make = (api, opts) => {
+      let aggregate = Inner.make(api, opts);
+      let eventLogOutputs = Inner.outputs(aggregate).eventLog;
+      let tableResource = eventLogOutputs.resources[0];
+      let eventLogTableName = tableResource.name;
+      AggregateRuntime_Builder_Micro$ReventlessAws.registerAggregate(Spec.name, Util_Bundle$ReventlessAws.getModuleSpecifier(Spec.moduleUrl), Util_Bundle$ReventlessAws.getModuleSpecifier(Behavior.moduleUrl), eventLogTableName, MappingsConfig.mappingsModulePath);
+      return aggregate;
+    };
+    let finish = () => AggregateRuntime_Builder_Micro$ReventlessAws.finish();
+    return {
+      Spec: Spec,
+      make: make,
+      outputs: Inner.outputs,
+      operations: Inner.operations,
+      finish: finish
+    };
+  }));
+}
+
+let CommandGeneratorResolvers;
+
+let CommandTopicChannel;
+
+let EventCollectorChannel;
+
+let RuntimeEnvironment;
+
+let AggregateRuntimeBuilder;
+
+export {
+  CommandGeneratorResolvers,
+  CommandTopicChannel,
+  EventCollectorChannel,
+  RuntimeEnvironment,
+  AggregateRuntimeBuilder,
+  Make,
+}
+/* Util_Bundle-ReventlessAws Not a pure module */

package/src/components/Aggregate_Builder_NoResolver.res

@@ -0,0 +1,61 @@
+// Aggregate builder that creates the full aggregate infrastructure (EventLog,
+// CommandTopic, EventTopic) but NO AppSync mutation resolvers. Used for
+// admin-internal aggregates (e.g. Plugin) whose commands arrive via the
+// ExtensionPoint, not through GraphQL mutations.
+
+module CommandGeneratorResolvers = CommandGeneratorResolvers_AppSync_NoOp
+module CommandTopicChannel = CommandTopicChannel.SQS_Sync
+module EventCollectorChannel = EventCollectorChannel.DynamoDbStream
+module RuntimeEnvironment = RuntimeEnvironment.Lambda
+module AggregateRuntimeBuilder = AggregateRuntime_Builder_Single
+
+module Make = (
+  Spec: Reventless.Aggregate.Spec,
+  Behavior: Reventless.Behavior.T with module Spec := Spec,
+  EventMappings: ReventlessInfra.EventMapper.Mappings with module Target := Spec,
+): (
+  ReventlessInfra.Aggregate.T
+    with type api = CommandGeneratorResolvers.api
+    and type component = ReventlessCore.Aggregate.component
+) => {
+  module Inner = ReventlessCore.Aggregate_Builder.Make(
+    Spec,
+    Behavior,
+    EventMappings,
+    RuntimeEnvironment,
+    CommandGeneratorResolvers,
+    CommandTopicChannel,
+    EventLogStorage.DynamoDbStream,
+    EventTopicPublisher.DynamoDbStream,
+    EventCollectorChannel,
+    AggregateRuntimeBuilder,
+    ReventlessCore.Plugin_Helpers.NoopHooksConfig,
+  )
+
+  module Spec = Spec
+  module AggregateRuntimeBuilder = AggregateRuntimeBuilder
+
+  type api = Inner.api
+  type component = Inner.component
+
+  let make = (~api, ~opts=?): component => {
+    let aggregate = Inner.make(~api, ~opts?)
+
+    let eventLogOutputs = (aggregate->Inner.outputs).eventLog
+    let tableResource = eventLogOutputs.resources->Array.getUnsafe(0)
+    let eventLogTableName = tableResource.name
+
+    AggregateRuntimeBuilder.registerAggregate(
+      ~aggregateName=Spec.name,
+      ~specModulePath=Util_Bundle.getModuleSpecifier(Spec.moduleUrl),
+      ~behaviorModulePath=Util_Bundle.getModuleSpecifier(Behavior.moduleUrl),
+      ~eventLogTableName,
+    )
+
+    aggregate
+  }
+
+  let outputs = Inner.outputs
+  let operations = Inner.operations
+  let finish = () => AggregateRuntimeBuilder.finish()
+}

package/src/components/Aggregate_Builder_NoResolver.res.mjs

@@ -0,0 +1,80 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Util_Bundle$ReventlessAws from "../util/Util_Bundle.res.mjs";
+import * as Plugin_Helpers$ReventlessCore from "@reventlessdev/reventless-core/src/plugin/component/Plugin_Helpers.res.mjs";
+import * as Aggregate_Builder$ReventlessCore from "@reventlessdev/reventless-core/src/components/Aggregate/Aggregate_Builder.res.mjs";
+import * as RuntimeEnvironment_Lambda$ReventlessAws from "../adapter/Runtime/RuntimeEnvironment_Lambda.res.mjs";
+import * as CommandTopicChannel_SQS_Sync$ReventlessAws from "../adapter/CommandTopic/CommandTopicChannel_SQS_Sync.res.mjs";
+import * as EventLogStorage_DynamoDbStream$ReventlessAws from "../adapter/EventLog/EventLogStorage_DynamoDbStream.res.mjs";
+import * as AggregateRuntime_Builder_Single$ReventlessAws from "../adapter/Runtime/AggregateRuntime_Builder_Single.res.mjs";
+import * as EventTopicPublisher_DynamoDbStream$ReventlessAws from "../adapter/EventTopic/EventTopicPublisher_DynamoDbStream.res.mjs";
+import * as EventCollectorChannel_DynamoDbStream$ReventlessAws from "../adapter/EventCollector/EventCollectorChannel_DynamoDbStream.res.mjs";
+import * as CommandGeneratorResolvers_AppSync_NoOp$ReventlessAws from "../adapter/CommandGenerator/CommandGeneratorResolvers_AppSync_NoOp.res.mjs";
+
+function Make(Spec) {
+  return Behavior => (EventMappings => {
+    let Inner = Aggregate_Builder$ReventlessCore.Make(Spec)(Behavior)({
+      mappings: EventMappings.mappings,
+      counter: EventMappings.counter
+    })({
+      make: RuntimeEnvironment_Lambda$ReventlessAws.make,
+      groupBySource: RuntimeEnvironment_Lambda$ReventlessAws.groupBySource,
+      extractCorrelationId: RuntimeEnvironment_Lambda$ReventlessAws.extractCorrelationId,
+      asEventHandler: prim => prim,
+      asEffectHandler: prim => prim
+    })(CommandGeneratorResolvers_AppSync_NoOp$ReventlessAws)({
+      make: CommandTopicChannel_SQS_Sync$ReventlessAws.make
+    })(EventLogStorage_DynamoDbStream$ReventlessAws)(EventTopicPublisher_DynamoDbStream$ReventlessAws)({
+      make: EventCollectorChannel_DynamoDbStream$ReventlessAws.make,
+      connect: EventCollectorChannel_DynamoDbStream$ReventlessAws.connect
+    })({
+      CommandTopicChannel: {
+        make: CommandTopicChannel_SQS_Sync$ReventlessAws.make
+      },
+      EventCollectorChannel: {
+        make: EventCollectorChannel_DynamoDbStream$ReventlessAws.make,
+        connect: EventCollectorChannel_DynamoDbStream$ReventlessAws.connect
+      },
+      forCommandGenerator: AggregateRuntime_Builder_Single$ReventlessAws.forCommandGenerator,
+      forCommandTopic: AggregateRuntime_Builder_Single$ReventlessAws.forCommandTopic,
+      forEventCollector: AggregateRuntime_Builder_Single$ReventlessAws.forEventCollector,
+      finish: AggregateRuntime_Builder_Single$ReventlessAws.finish
+    })(Plugin_Helpers$ReventlessCore.NoopHooksConfig);
+    let make = (api, opts) => {
+      let aggregate = Inner.make(api, opts);
+      let eventLogOutputs = Inner.outputs(aggregate).eventLog;
+      let tableResource = eventLogOutputs.resources[0];
+      let eventLogTableName = tableResource.name;
+      AggregateRuntime_Builder_Single$ReventlessAws.registerAggregate(Spec.name, Util_Bundle$ReventlessAws.getModuleSpecifier(Spec.moduleUrl), Util_Bundle$ReventlessAws.getModuleSpecifier(Behavior.moduleUrl), eventLogTableName);
+      return aggregate;
+    };
+    let finish = () => AggregateRuntime_Builder_Single$ReventlessAws.finish();
+    return {
+      Spec: Spec,
+      make: make,
+      outputs: Inner.outputs,
+      operations: Inner.operations,
+      finish: finish
+    };
+  });
+}
+
+let CommandGeneratorResolvers;
+
+let CommandTopicChannel;
+
+let EventCollectorChannel;
+
+let RuntimeEnvironment;
+
+let AggregateRuntimeBuilder;
+
+export {
+  CommandGeneratorResolvers,
+  CommandTopicChannel,
+  EventCollectorChannel,
+  RuntimeEnvironment,
+  AggregateRuntimeBuilder,
+  Make,
+}
+/* Util_Bundle-ReventlessAws Not a pure module */

package/src/components/Aggregate_Builder_PerAggregate.res

@@ -0,0 +1,57 @@
+module CommandGeneratorResolvers = CommandGeneratorResolvers.AppSync
+module CommandTopicChannel = CommandTopicChannel.SQS_Sync
+module EventCollectorChannel = EventCollectorChannel.DynamoDbStream
+module RuntimeEnvironment = RuntimeEnvironment.Lambda
+
+module AggregateRuntimeBuilder = AggregateRuntime_Builder_PerAggregate
+
+module Make = (
+  Spec: Reventless.Aggregate.Spec,
+  Behavior: Reventless.Behavior.T with module Spec := Spec,
+  EventMappings: ReventlessInfra.EventMapper.Mappings with module Target := Spec,
+): (
+  ReventlessInfra.Aggregate.T
+    with type api = CommandGeneratorResolvers.api
+    and type component = ReventlessCore.Aggregate.component
+) => {
+  module Inner = ReventlessCore.Aggregate_Builder.Make(
+    Spec,
+    Behavior,
+    EventMappings,
+    RuntimeEnvironment,
+    CommandGeneratorResolvers,
+    CommandTopicChannel,
+    EventLogStorage.DynamoDbStream,
+    EventTopicPublisher.DynamoDbStream,
+    EventCollectorChannel,
+    AggregateRuntimeBuilder,
+    ReventlessCore.Plugin_Helpers.NoopHooksConfig,
+  )
+
+  module Spec = Spec
+  module AggregateRuntimeBuilder = AggregateRuntimeBuilder
+
+  type api = Inner.api
+  type component = Inner.component
+
+  let make = (~api, ~opts=?): component => {
+    let aggregate = Inner.make(~api, ~opts?)
+
+    let eventLogOutputs = (aggregate->Inner.outputs).eventLog
+    let tableResource = eventLogOutputs.resources->Array.getUnsafe(0)
+    let eventLogTableName = tableResource.name
+
+    AggregateRuntimeBuilder.registerAggregate(
+      ~aggregateName=Spec.name,
+      ~specModulePath=Util_Bundle.getModuleSpecifier(Spec.moduleUrl),
+      ~behaviorModulePath=Util_Bundle.getModuleSpecifier(Behavior.moduleUrl),
+      ~eventLogTableName,
+    )
+
+    aggregate
+  }
+
+  let outputs = Inner.outputs
+  let operations = Inner.operations
+  let finish = () => AggregateRuntimeBuilder.finish()
+}

package/src/components/Aggregate_Builder_PerAggregate.res.mjs

@@ -0,0 +1,80 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Util_Bundle$ReventlessAws from "../util/Util_Bundle.res.mjs";
+import * as Plugin_Helpers$ReventlessCore from "@reventlessdev/reventless-core/src/plugin/component/Plugin_Helpers.res.mjs";
+import * as Aggregate_Builder$ReventlessCore from "@reventlessdev/reventless-core/src/components/Aggregate/Aggregate_Builder.res.mjs";
+import * as RuntimeEnvironment_Lambda$ReventlessAws from "../adapter/Runtime/RuntimeEnvironment_Lambda.res.mjs";
+import * as CommandTopicChannel_SQS_Sync$ReventlessAws from "../adapter/CommandTopic/CommandTopicChannel_SQS_Sync.res.mjs";
+import * as EventLogStorage_DynamoDbStream$ReventlessAws from "../adapter/EventLog/EventLogStorage_DynamoDbStream.res.mjs";
+import * as CommandGeneratorResolvers_AppSync$ReventlessAws from "../adapter/CommandGenerator/CommandGeneratorResolvers_AppSync.res.mjs";
+import * as EventTopicPublisher_DynamoDbStream$ReventlessAws from "../adapter/EventTopic/EventTopicPublisher_DynamoDbStream.res.mjs";
+import * as EventCollectorChannel_DynamoDbStream$ReventlessAws from "../adapter/EventCollector/EventCollectorChannel_DynamoDbStream.res.mjs";
+import * as AggregateRuntime_Builder_PerAggregate$ReventlessAws from "../adapter/Runtime/AggregateRuntime_Builder_PerAggregate.res.mjs";
+
+function Make(Spec) {
+  return Behavior => (EventMappings => {
+    let Inner = Aggregate_Builder$ReventlessCore.Make(Spec)(Behavior)({
+      mappings: EventMappings.mappings,
+      counter: EventMappings.counter
+    })({
+      make: RuntimeEnvironment_Lambda$ReventlessAws.make,
+      groupBySource: RuntimeEnvironment_Lambda$ReventlessAws.groupBySource,
+      extractCorrelationId: RuntimeEnvironment_Lambda$ReventlessAws.extractCorrelationId,
+      asEventHandler: prim => prim,
+      asEffectHandler: prim => prim
+    })(CommandGeneratorResolvers_AppSync$ReventlessAws)({
+      make: CommandTopicChannel_SQS_Sync$ReventlessAws.make
+    })(EventLogStorage_DynamoDbStream$ReventlessAws)(EventTopicPublisher_DynamoDbStream$ReventlessAws)({
+      make: EventCollectorChannel_DynamoDbStream$ReventlessAws.make,
+      connect: EventCollectorChannel_DynamoDbStream$ReventlessAws.connect
+    })({
+      CommandTopicChannel: {
+        make: CommandTopicChannel_SQS_Sync$ReventlessAws.make
+      },
+      EventCollectorChannel: {
+        make: EventCollectorChannel_DynamoDbStream$ReventlessAws.make,
+        connect: EventCollectorChannel_DynamoDbStream$ReventlessAws.connect
+      },
+      forCommandGenerator: AggregateRuntime_Builder_PerAggregate$ReventlessAws.forCommandGenerator,
+      forCommandTopic: AggregateRuntime_Builder_PerAggregate$ReventlessAws.forCommandTopic,
+      forEventCollector: AggregateRuntime_Builder_PerAggregate$ReventlessAws.forEventCollector,
+      finish: AggregateRuntime_Builder_PerAggregate$ReventlessAws.finish
+    })(Plugin_Helpers$ReventlessCore.NoopHooksConfig);
+    let make = (api, opts) => {
+      let aggregate = Inner.make(api, opts);
+      let eventLogOutputs = Inner.outputs(aggregate).eventLog;
+      let tableResource = eventLogOutputs.resources[0];
+      let eventLogTableName = tableResource.name;
+      AggregateRuntime_Builder_PerAggregate$ReventlessAws.registerAggregate(Spec.name, Util_Bundle$ReventlessAws.getModuleSpecifier(Spec.moduleUrl), Util_Bundle$ReventlessAws.getModuleSpecifier(Behavior.moduleUrl), eventLogTableName);
+      return aggregate;
+    };
+    let finish = () => AggregateRuntime_Builder_PerAggregate$ReventlessAws.finish();
+    return {
+      Spec: Spec,
+      make: make,
+      outputs: Inner.outputs,
+      operations: Inner.operations,
+      finish: finish
+    };
+  });
+}
+
+let CommandGeneratorResolvers;
+
+let CommandTopicChannel;
+
+let EventCollectorChannel;
+
+let RuntimeEnvironment;
+
+let AggregateRuntimeBuilder;
+
+export {
+  CommandGeneratorResolvers,
+  CommandTopicChannel,
+  EventCollectorChannel,
+  RuntimeEnvironment,
+  AggregateRuntimeBuilder,
+  Make,
+}
+/* Util_Bundle-ReventlessAws Not a pure module */

package/src/components/Aggregate_Builder_Single.res

@@ -0,0 +1,59 @@
+module CommandGeneratorResolvers = CommandGeneratorResolvers.AppSync
+module CommandTopicChannel = CommandTopicChannel.SQS_Sync
+module EventCollectorChannel = EventCollectorChannel.DynamoDbStream
+module RuntimeEnvironment = RuntimeEnvironment.Lambda
+
+module AggregateRuntimeBuilder = AggregateRuntime_Builder_Single
+
+module Make = (
+  Spec: Reventless.Aggregate.Spec,
+  Behavior: Reventless.Behavior.T with module Spec := Spec,
+  EventMappings: ReventlessInfra.EventMapper.Mappings with module Target := Spec,
+): (
+  ReventlessInfra.Aggregate.T
+    with type api = CommandGeneratorResolvers.api
+    and type component = ReventlessCore.Aggregate.component
+) => {
+  module Inner = ReventlessCore.Aggregate_Builder.Make(
+    Spec,
+    Behavior,
+    EventMappings,
+    RuntimeEnvironment,
+    CommandGeneratorResolvers,
+    CommandTopicChannel,
+    EventLogStorage.DynamoDbStream,
+    EventTopicPublisher.DynamoDbStream,
+    EventCollectorChannel,
+    AggregateRuntimeBuilder,
+    ReventlessCore.Plugin_Helpers.NoopHooksConfig,
+  )
+
+  module Spec = Spec
+  module AggregateRuntimeBuilder = AggregateRuntimeBuilder
+
+  type api = Inner.api
+  type component = Inner.component
+
+  let make = (~api, ~opts=?): component => {
+    let aggregate = Inner.make(~api, ~opts?)
+
+    // Extract the event log table name from the aggregate's outputs.
+    // EventLog.outputs.resources[0] is the DynamoDB table resource.
+    let eventLogOutputs = (aggregate->Inner.outputs).eventLog
+    let tableResource = eventLogOutputs.resources->Array.getUnsafe(0)
+    let eventLogTableName = tableResource.name
+
+    AggregateRuntimeBuilder.registerAggregate(
+      ~aggregateName=Spec.name,
+      ~specModulePath=Util_Bundle.getModuleSpecifier(Spec.moduleUrl),
+      ~behaviorModulePath=Util_Bundle.getModuleSpecifier(Behavior.moduleUrl),
+      ~eventLogTableName,
+    )
+
+    aggregate
+  }
+
+  let outputs = Inner.outputs
+  let operations = Inner.operations
+  let finish = () => AggregateRuntimeBuilder.finish()
+}

package/src/components/Aggregate_Builder_Single.res.mjs

@@ -0,0 +1,80 @@
+// Generated by ReScript, PLEASE EDIT WITH CARE
+
+import * as Util_Bundle$ReventlessAws from "../util/Util_Bundle.res.mjs";
+import * as Plugin_Helpers$ReventlessCore from "@reventlessdev/reventless-core/src/plugin/component/Plugin_Helpers.res.mjs";
+import * as Aggregate_Builder$ReventlessCore from "@reventlessdev/reventless-core/src/components/Aggregate/Aggregate_Builder.res.mjs";
+import * as RuntimeEnvironment_Lambda$ReventlessAws from "../adapter/Runtime/RuntimeEnvironment_Lambda.res.mjs";
+import * as CommandTopicChannel_SQS_Sync$ReventlessAws from "../adapter/CommandTopic/CommandTopicChannel_SQS_Sync.res.mjs";
+import * as EventLogStorage_DynamoDbStream$ReventlessAws from "../adapter/EventLog/EventLogStorage_DynamoDbStream.res.mjs";
+import * as AggregateRuntime_Builder_Single$ReventlessAws from "../adapter/Runtime/AggregateRuntime_Builder_Single.res.mjs";
+import * as CommandGeneratorResolvers_AppSync$ReventlessAws from "../adapter/CommandGenerator/CommandGeneratorResolvers_AppSync.res.mjs";
+import * as EventTopicPublisher_DynamoDbStream$ReventlessAws from "../adapter/EventTopic/EventTopicPublisher_DynamoDbStream.res.mjs";
+import * as EventCollectorChannel_DynamoDbStream$ReventlessAws from "../adapter/EventCollector/EventCollectorChannel_DynamoDbStream.res.mjs";
+
+function Make(Spec) {
+  return Behavior => (EventMappings => {
+    let Inner = Aggregate_Builder$ReventlessCore.Make(Spec)(Behavior)({
+      mappings: EventMappings.mappings,
+      counter: EventMappings.counter
+    })({
+      make: RuntimeEnvironment_Lambda$ReventlessAws.make,
+      groupBySource: RuntimeEnvironment_Lambda$ReventlessAws.groupBySource,
+      extractCorrelationId: RuntimeEnvironment_Lambda$ReventlessAws.extractCorrelationId,
+      asEventHandler: prim => prim,
+      asEffectHandler: prim => prim
+    })(CommandGeneratorResolvers_AppSync$ReventlessAws)({
+      make: CommandTopicChannel_SQS_Sync$ReventlessAws.make
+    })(EventLogStorage_DynamoDbStream$ReventlessAws)(EventTopicPublisher_DynamoDbStream$ReventlessAws)({
+      make: EventCollectorChannel_DynamoDbStream$ReventlessAws.make,
+      connect: EventCollectorChannel_DynamoDbStream$ReventlessAws.connect
+    })({
+      CommandTopicChannel: {
+        make: CommandTopicChannel_SQS_Sync$ReventlessAws.make
+      },
+      EventCollectorChannel: {
+        make: EventCollectorChannel_DynamoDbStream$ReventlessAws.make,
+        connect: EventCollectorChannel_DynamoDbStream$ReventlessAws.connect
+      },
+      forCommandGenerator: AggregateRuntime_Builder_Single$ReventlessAws.forCommandGenerator,
+      forCommandTopic: AggregateRuntime_Builder_Single$ReventlessAws.forCommandTopic,
+      forEventCollector: AggregateRuntime_Builder_Single$ReventlessAws.forEventCollector,
+      finish: AggregateRuntime_Builder_Single$ReventlessAws.finish
+    })(Plugin_Helpers$ReventlessCore.NoopHooksConfig);
+    let make = (api, opts) => {
+      let aggregate = Inner.make(api, opts);
+      let eventLogOutputs = Inner.outputs(aggregate).eventLog;
+      let tableResource = eventLogOutputs.resources[0];
+      let eventLogTableName = tableResource.name;
+      AggregateRuntime_Builder_Single$ReventlessAws.registerAggregate(Spec.name, Util_Bundle$ReventlessAws.getModuleSpecifier(Spec.moduleUrl), Util_Bundle$ReventlessAws.getModuleSpecifier(Behavior.moduleUrl), eventLogTableName);
+      return aggregate;
+    };
+    let finish = () => AggregateRuntime_Builder_Single$ReventlessAws.finish();
+    return {
+      Spec: Spec,
+      make: make,
+      outputs: Inner.outputs,
+      operations: Inner.operations,
+      finish: finish
+    };
+  });
+}
+
+let CommandGeneratorResolvers;
+
+let CommandTopicChannel;
+
+let EventCollectorChannel;
+
+let RuntimeEnvironment;
+
+let AggregateRuntimeBuilder;
+
+export {
+  CommandGeneratorResolvers,
+  CommandTopicChannel,
+  EventCollectorChannel,
+  RuntimeEnvironment,
+  AggregateRuntimeBuilder,
+  Make,
+}
+/* Util_Bundle-ReventlessAws Not a pure module */

package/src/components/Aggregate_Builder_Single_Async.res

@@ -0,0 +1,59 @@
+module CommandGeneratorResolvers = CommandGeneratorResolvers.AppSync
+module CommandTopicChannel = CommandTopicChannel.SQS_Async
+module EventCollectorChannel = EventCollectorChannel.DynamoDbStream
+module RuntimeEnvironment = RuntimeEnvironment.Lambda
+
+module AggregateRuntimeBuilder = AggregateRuntime_Builder_Single_Async
+
+module Make = (
+  Spec: Reventless.Aggregate.Spec,
+  Behavior: Reventless.Behavior.T with module Spec := Spec,
+  EventMappings: ReventlessInfra.EventMapper.Mappings with module Target := Spec,
+): (
+  ReventlessInfra.Aggregate.T
+    with type api = CommandGeneratorResolvers.api
+    and type component = ReventlessCore.Aggregate.component
+) => {
+  module Inner = ReventlessCore.Aggregate_Builder.Make(
+    Spec,
+    Behavior,
+    EventMappings,
+    RuntimeEnvironment,
+    CommandGeneratorResolvers,
+    CommandTopicChannel,
+    EventLogStorage.DynamoDbStream,
+    EventTopicPublisher.DynamoDbStream,
+    EventCollectorChannel,
+    AggregateRuntimeBuilder,
+    ReventlessCore.Plugin_Helpers.NoopHooksConfig,
+  )
+
+  module Spec = Spec
+  module AggregateRuntimeBuilder = AggregateRuntimeBuilder
+
+  type api = Inner.api
+  type component = Inner.component
+
+  let make = (~api, ~opts=?): component => {
+    let aggregate = Inner.make(~api, ~opts?)
+
+    // Extract the event log table name from the aggregate's outputs.
+    // EventLog.outputs.resources[0] is the DynamoDB table resource.
+    let eventLogOutputs = (aggregate->Inner.outputs).eventLog
+    let tableResource = eventLogOutputs.resources->Array.getUnsafe(0)
+    let eventLogTableName = tableResource.name
+
+    AggregateRuntimeBuilder.registerAggregate(
+      ~aggregateName=Spec.name,
+      ~specModulePath=Util_Bundle.getModuleSpecifier(Spec.moduleUrl),
+      ~behaviorModulePath=Util_Bundle.getModuleSpecifier(Behavior.moduleUrl),
+      ~eventLogTableName,
+    )
+
+    aggregate
+  }
+
+  let outputs = Inner.outputs
+  let operations = Inner.operations
+  let finish = () => AggregateRuntimeBuilder.finish()
+}