effect-cf 0.40.1 → 0.40.3

package/CHANGELOG.md

@@ -1,5 +1,17 @@
 # effect-cf
 
+## 0.40.3
+
+### Patch Changes
+
+- [#157](https://github.com/danieljvdm/effect-cf/pull/157) [`279eecd`](https://github.com/danieljvdm/effect-cf/commit/279eecd1a5ea9112e727497e0aac666142e7a7f8) Thanks [@danieljvdm](https://github.com/danieljvdm)! - Prevent Durable Object SQLite transactions from stalling when a blocked owner timer precedes an Effect scheduler yield. Keep transaction isolation, rollback, and the caller's scheduler after the transaction completes.
+
+## 0.40.2
+
+### Patch Changes
+
+- [#155](https://github.com/danieljvdm/effect-cf/pull/155) [`c23dd31`](https://github.com/danieljvdm/effect-cf/commit/c23dd319f7ea018f803de31095937c2ca69eb0ed) Thanks [@danieljvdm](https://github.com/danieljvdm)! - Fix initialization failures when importing Queue or Workflow definitions from the published ES modules. Their factory exports remain the same functions regardless of module evaluation order.
+
 ## 0.40.1
 
 ### Patch Changes

package/README.md

@@ -8,6 +8,8 @@ npm install effect-cf "effect@^4.0.0-rc.112"
 
 The repository tests against workerd `1.20260825.1` and `@cloudflare/workers-types@5.20260825.1`. Use `compatibility_date: "2026-08-25"` in Wrangler.
 
+See the [runtime performance guide](https://github.com/danieljvdm/effect-cf/blob/main/docs/runtime-performance.md) for measured alarm batching and telemetry configuration guidance.
+
 ## Worker
 
 ```ts

package/dist/D1.d.mts

@@ -2,8 +2,8 @@ import { WorkerEnvironment } from "./Environment.mjs";
 import { BindingNotFoundError, BindingService, BindingValidationError } from "./Binding.mjs";
 import * as Layer$1 from "effect/Layer";
 import { D1Client } from "@effect/sql-d1";
-import { Config } from "effect";
 import { SqlClient } from "effect/unstable/sql";
+import { Config } from "effect";
 declare namespace D1_d_exports {
   export { D1Definition, D1Service, D1SqlLayerOptions, Service, TypeId, make };
 }

package/dist/DurableObjectSqlite.mjs

@@ -1,16 +1,25 @@
 import { __exportAll } from "./_virtual/_rolldown/runtime.mjs";
 import { DurableObjectState } from "./DurableObjectState.mjs";
+import * as Context from "effect/Context";
 import * as Effect from "effect/Effect";
 import * as Layer from "effect/Layer";
 import { SqliteClient } from "@effect/sql-sqlite-do";
+import * as Scheduler from "effect/Scheduler";
+import * as Reactivity from "effect/unstable/reactivity/Reactivity";
+import { SqlClient } from "effect/unstable/sql";
 //#region src/DurableObjectSqlite.ts
 var DurableObjectSqlite_exports = /* @__PURE__ */ __exportAll({ layer: () => layer });
-const layer = (options) => Layer.unwrap(Effect.gen(function* () {
+const layer = (options) => Layer.effectContext(Effect.gen(function* () {
 	const state = yield* DurableObjectState;
-	return SqliteClient.layer({
+	const client = yield* SqliteClient.make({
 		...options,
 		storage: state.raw.storage
 	});
-}));
+	const original = client.withTransaction;
+	const scheduler = new Scheduler.MixedScheduler("sync");
+	const withTransaction = (body) => original(body).pipe(Effect.provideService(Scheduler.Scheduler, scheduler));
+	Object.assign(client, { withTransaction });
+	return Context.make(SqliteClient.SqliteClient, client).pipe(Context.add(SqlClient.SqlClient, client));
+})).pipe(Layer.provide(Reactivity.layer));
 //#endregion
 export { DurableObjectSqlite_exports, layer };

package/dist/HyperdrivePg.d.mts

@@ -2,8 +2,8 @@ import { WorkerEnvironment } from "./Environment.mjs";
 import { BindingNotFoundError, BindingValidationError } from "./Binding.mjs";
 import { LayerOptions, TagClass } from "./Hyperdrive.mjs";
 import * as Layer from "effect/Layer";
-import { PgClient } from "@effect/sql-pg";
 import { SqlClient, SqlError } from "effect/unstable/sql";
+import { PgClient } from "@effect/sql-pg";
 //#region src/HyperdrivePg.d.ts
 type PgLayerOptions = Omit<Parameters<typeof PgClient.makeClient>[0], "url" | "host" | "port" | "path" | "ssl" | "database" | "username" | "password" | "stream">;
 declare const layer: <Self, Id extends string>(tag: TagClass<Self, Id>, binding: LayerOptions, options?: PgLayerOptions) => Layer.Layer<PgClient.PgClient | SqlClient.SqlClient, BindingNotFoundError | BindingValidationError | SqlError.SqlError, WorkerEnvironment>;

package/dist/Queue.d.mts

@@ -1,5 +1,5 @@
 import { WorkerEnvironment } from "./Environment.mjs";
-import { Definition as Definition$1, Handler as Handler$1, LayerOptions as LayerOptions$1, Options as Options$1, TagClass as TagClass$1, implement as implement$1 } from "./QueueDefinition.mjs";
+import { Definition as Definition$1, Handler as Handler$1, LayerOptions as LayerOptions$1, Options as Options$1, Tag, TagClass as TagClass$1, implement } from "./QueueDefinition.mjs";
 import { ExecutionContext, WorkerContext } from "./Worker.mjs";
 import * as Effect from "effect/Effect";
 import { Scope } from "effect";
@@ -58,10 +58,6 @@ declare namespace Definition {
 }
 type LayerOptions = LayerOptions$1;
 type TagClass<Self, Id extends string, Message extends Definition$1.Any["message"]> = TagClass$1<Self, Id, Message>;
-declare const Tag: <Self>() => <Id extends string, Message extends Definition$1.Any["message"]>(id: Id, definition: {
-  readonly message: Message;
-}) => TagClass<Self, Id, Message>;
-declare const implement: typeof implement$1;
 type Handler<ROut, Self extends Definition$1.Any> = Handler$1<ROut, Self>;
 type Options<ROut, Self extends Definition$1.Any> = Options$1<ROut, Self>;
 //#endregion

package/dist/Queue.mjs

@@ -1,6 +1,6 @@
 import { __exportAll } from "./_virtual/_rolldown/runtime.mjs";
 import { causeMessage } from "./internal/ErrorMessage.mjs";
-import { Tag as Tag$1, implement as implement$1 } from "./QueueDefinition.mjs";
+import { Tag, implement } from "./QueueDefinition.mjs";
 import * as Data from "effect/Data";
 import * as Effect from "effect/Effect";
 //#region src/Queue.ts
@@ -48,7 +48,5 @@ const decodeBatch = (batch, decodeBody) => Effect.gen(function* () {
 	}
 	return fromMessageBatch(batch, messages);
 });
-const Tag = Tag$1;
-const implement = implement$1;
 //#endregion
 export { QueueMessageDecodeError, Queue_exports, Tag, decodeBatch, fromMessage, fromMessageBatch, implement };

package/dist/Workflow.d.mts

@@ -1,6 +1,6 @@
 import { WorkerEnv, WorkerEnvironment } from "./Environment.mjs";
 import { ExecutionContext, WorkerContext } from "./Worker.mjs";
-import { Definition as Definition$1, Handler as Handler$1, LayerOptions as LayerOptions$1, Options as Options$1, TagClass as TagClass$1, implement as implement$1 } from "./WorkflowDefinition.mjs";
+import { Definition as Definition$1, Handler as Handler$1, LayerOptions as LayerOptions$1, Options as Options$1, Tag, TagClass as TagClass$1, implement } from "./WorkflowDefinition.mjs";
 import * as Context$1 from "effect/Context";
 import * as Effect from "effect/Effect";
 import * as Layer$1 from "effect/Layer";
@@ -80,11 +80,6 @@ declare namespace Definition {
 }
 type LayerOptions = LayerOptions$1;
 type TagClass<Self, Id extends string, Payload extends Definition$1.Any["payload"], Result extends Definition$1.Any["result"]> = TagClass$1<Self, Id, Payload, Result>;
-declare const Tag: <Self>() => <Id extends string, Payload extends Definition$1.Any["payload"], Result extends Definition$1.Any["result"]>(id: Id, definition: {
-  readonly payload: Payload;
-  readonly result: Result;
-}) => TagClass<Self, Id, Payload, Result>;
-declare const implement: typeof implement$1;
 type Handler<ROut, Self extends Definition$1.Any> = Handler$1<ROut, Self>;
 type Options<ROut, Self extends Definition$1.Any> = Options$1<ROut, Self>;
 //#endregion

package/dist/Workflow.mjs

@@ -4,7 +4,7 @@ import { fromExecutionContext } from "./internal/WorkerContext.mjs";
 import { assumeEntrypointClass } from "./internal/Entrypoint.mjs";
 import { makeEntrypointRuntime, runEventPromise } from "./internal/Runtime.mjs";
 import { ExecutionContext, WorkerContext } from "./Worker.mjs";
-import { Tag as Tag$1, implement as implement$1 } from "./WorkflowDefinition.mjs";
+import { Tag, implement } from "./WorkflowDefinition.mjs";
 import * as Context from "effect/Context";
 import * as Data from "effect/Data";
 import * as Effect from "effect/Effect";
@@ -133,7 +133,5 @@ const step = (name, effect, config) => Effect.flatMap(WorkflowStep$1, (workflowS
 const sleep = (name, duration) => Effect.flatMap(WorkflowStep$1, (workflowStep) => workflowStep.sleep(name, duration));
 const sleepUntil = (name, timestamp) => Effect.flatMap(WorkflowStep$1, (workflowStep) => workflowStep.sleepUntil(name, timestamp));
 const waitForEvent = (name, options) => Effect.flatMap(WorkflowStep$1, (workflowStep) => workflowStep.waitForEvent(name, options));
-const Tag = Tag$1;
-const implement = implement$1;
 //#endregion
 export { Tag, WorkflowEvent$1 as WorkflowEvent, WorkflowStep$1 as WorkflowStep, WorkflowStepContext$1 as WorkflowStepContext, WorkflowStepError, WorkflowStepNonRetryableError, Workflow_exports, implement, make, sleep, sleepUntil, step, waitForEvent };

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "effect-cf",
-  "version": "0.40.1",
+  "version": "0.40.3",
   "description": "Effect-native primitives for Cloudflare Workers and bindings.",
   "license": "MIT",
   "repository": {

package/src/DurableObjectSqlite.ts

@@ -1,7 +1,10 @@
 import { SqliteClient } from "@effect/sql-sqlite-do";
+import * as Context from "effect/Context";
 import * as Effect from "effect/Effect";
 import * as Layer from "effect/Layer";
-import type { SqlClient } from "effect/unstable/sql";
+import * as Scheduler from "effect/Scheduler";
+import * as Reactivity from "effect/unstable/reactivity/Reactivity";
+import { SqlClient } from "effect/unstable/sql";
 
 import { DurableObjectState } from "./DurableObjectState";
 
@@ -10,10 +13,22 @@ export type SqliteLayerOptions = Omit<SqliteClient.SqliteClientConfig, "db" | "s
 export const layer = (
   options?: SqliteLayerOptions,
 ): Layer.Layer<SqliteClient.SqliteClient | SqlClient.SqlClient, never, DurableObjectState> =>
-  Layer.unwrap(
+  Layer.effectContext(
     Effect.gen(function* () {
       const state = yield* DurableObjectState;
+      const client = yield* SqliteClient.make({ ...options, storage: state.raw.storage });
+      const original = client.withTransaction;
+      const scheduler = new Scheduler.MixedScheduler("sync");
+      const withTransaction: SqliteClient.SqliteClient["withTransaction"] = (body) =>
+        original(body).pipe(Effect.provideService(Scheduler.Scheduler, scheduler));
 
-      return SqliteClient.layer({ ...options, storage: state.raw.storage });
+      // Native timers retain their input gate. A blocked parent timer can prevent
+      // a transaction's later timer from running, so yield through microtasks until
+      // the native transaction settles. Keep the original client and SQL permit.
+      Object.assign(client, { withTransaction });
+
+      return Context.make(SqliteClient.SqliteClient, client).pipe(
+        Context.add(SqlClient.SqlClient, client),
+      );
     }),
-  );
+  ).pipe(Layer.provide(Reactivity.layer));

package/src/Queue.ts

@@ -4,7 +4,7 @@ import type { Scope } from "effect";
 
 import type { ExecutionContext, WorkerContext } from "./Worker";
 import type { WorkerEnvironment } from "./Environment";
-import * as QueueDefinition from "./QueueDefinition";
+import type * as QueueDefinition from "./QueueDefinition";
 import * as ErrorMessage from "./internal/ErrorMessage";
 
 export interface QueueMessage<Body> {
@@ -117,15 +117,7 @@ export type TagClass<
   Message extends QueueDefinition.Definition.Any["message"],
 > = QueueDefinition.TagClass<Self, Id, Message>;
 
-export const Tag: <Self>() => <
-  Id extends string,
-  Message extends QueueDefinition.Definition.Any["message"],
->(
-  id: Id,
-  definition: { readonly message: Message },
-) => TagClass<Self, Id, Message> = QueueDefinition.Tag;
-
-export const implement = QueueDefinition.implement;
+export { implement, Tag } from "./QueueDefinition";
 
 export type Handler<ROut, Self extends QueueDefinition.Definition.Any> = QueueDefinition.Handler<
   ROut,

package/src/Workflow.ts

@@ -20,7 +20,7 @@ import type { ManagedRuntime, Scope } from "effect";
 
 import { WorkerEnvironment, type WorkerEnv } from "./Environment";
 import { ExecutionContext, WorkerContext } from "./Worker";
-import * as WorkflowDefinition from "./WorkflowDefinition";
+import type * as WorkflowDefinition from "./WorkflowDefinition";
 import * as Entrypoint from "./internal/Entrypoint";
 import * as ErrorMessage from "./internal/ErrorMessage";
 import * as Runtime from "./internal/Runtime";
@@ -318,19 +318,7 @@ export type TagClass<
   Result extends WorkflowDefinition.Definition.Any["result"],
 > = WorkflowDefinition.TagClass<Self, Id, Payload, Result>;
 
-export const Tag: <Self>() => <
-  Id extends string,
-  Payload extends WorkflowDefinition.Definition.Any["payload"],
-  Result extends WorkflowDefinition.Definition.Any["result"],
->(
-  id: Id,
-  definition: {
-    readonly payload: Payload;
-    readonly result: Result;
-  },
-) => TagClass<Self, Id, Payload, Result> = WorkflowDefinition.Tag;
-
-export const implement = WorkflowDefinition.implement;
+export { implement, Tag } from "./WorkflowDefinition";
 
 export type Handler<
   ROut,