@reventlessdev/reventless-local 3.0.0-alpha.227 → 3.0.0-alpha.228

package/CHANGELOG.md

@@ -3,6 +3,18 @@
 All notable changes to this project will be documented in this file.
 See [Conventional Commits](https://conventionalcommits.org) for commit guidelines.
 
+# 3.0.0-alpha.228 (2026-08-18)
+
+* feat(sury)!: migrate to sury 11.0.0-rc.1 ([2cf8969](https://github.com/ReventlessDev/reventless-core/commit/2cf8969a222ce1b775563668a4126cb20611966c))
+
+### BREAKING CHANGES
+
+* sury is a direct dependency of the published packages and
+its schema and serialization surface changed; consumers must migrate to
+sury 11.
+
+
+
 # 3.0.0-alpha.227 (2026-08-18)
 
 ### Bug Fixes

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@reventlessdev/reventless-local",
-  "version": "3.0.0-alpha.227",
+  "version": "3.0.0-alpha.228",
   "description": "Local platform for Reventless (in-memory or SQLite backend, for development and testing without AWS)",
   "license": "Apache-2.0",
   "bin": {
@@ -32,26 +32,26 @@
     "graphql": "^16.13.2",
     "graphql-ws": "^5.16.0",
     "graphql-yoga": "^5.21.0",
-    "sury": "11.0.0-alpha.4",
+    "sury": "11.0.0-rc.1",
     "ws": "^8.18.0",
-    "@reventlessdev/rescript-effect": "0.1.0-alpha.32",
     "@reventlessdev/rescript-graphql-yoga": "1.0.0-alpha.27",
-    "@reventlessdev/rescript-jest": "1.0.0-alpha.10",
     "@reventlessdev/rescript-mcp-sdk": "1.0.0-alpha.21",
-    "@reventlessdev/rescript-node": "2.0.0-alpha.8",
-    "@reventlessdev/reventless-core": "3.0.0-alpha.239",
+    "@reventlessdev/rescript-jest": "1.0.0-alpha.10",
     "@reventlessdev/rescript-pulumi-pulumi": "2.3.0-alpha.19",
-    "@reventlessdev/reventless-gwt": "1.0.0-alpha.186",
-    "@reventlessdev/reventless-graphql-server": "1.0.0-alpha.87",
-    "@reventlessdev/reventless-infra": "3.0.0-alpha.145",
-    "@reventlessdev/reventless-postgres": "3.0.0-alpha.103",
+    "@reventlessdev/rescript-node": "2.0.0-alpha.8",
+    "@reventlessdev/reventless-core": "3.0.0-alpha.240",
+    "@reventlessdev/reventless-graphql-server": "1.0.0-alpha.88",
+    "@reventlessdev/rescript-effect": "0.1.0-alpha.32",
+    "@reventlessdev/reventless-infra": "3.0.0-alpha.146",
+    "@reventlessdev/reventless-gwt": "1.0.0-alpha.187",
     "@reventlessdev/reventless-seed": "1.0.0-alpha.16",
-    "@reventlessdev/reventless-spec": "3.0.0-alpha.117"
+    "@reventlessdev/reventless-postgres": "3.0.0-alpha.104",
+    "@reventlessdev/reventless-spec": "3.0.0-alpha.118"
   },
   "devDependencies": {
     "rescript": "12.3.0",
-    "sury-ppx": "11.0.0-alpha.2",
-    "@reventlessdev/reventless-ppx": "1.0.0-alpha.69"
+    "sury-ppx": "11.0.0-rc.1",
+    "@reventlessdev/reventless-ppx": "1.0.0-alpha.71"
   },
   "peerDependencies": {
     "rescript": "12.3.0"

package/src/LocalPlatformRegistry.res

@@ -99,7 +99,7 @@ let alive = (pid: int): bool =>
   }
 
 let readEntry = (path: string): option<entry> =>
-  try Some(path->NodeFs.readFileSync->JSON.parseOrThrow->S.parseJsonOrThrow(entrySchema)) catch {
+  try Some(path->NodeFs.readFileSync->JSON.parseOrThrow->Reventless.Util_Sury.fromJson(entrySchema)) catch {
   | _ => None
   }
 
@@ -157,7 +157,7 @@ let write = (
     NodeFs.mkdirSync(runningDir(~cwd, ()), {recursive: true})
     NodeFs.writeFileSync(
       path,
-      entry->S.reverseConvertToJsonOrThrow(entrySchema)->JSON.stringify(~space=2),
+      entry->Reventless.Util_Sury.toJson(entrySchema)->JSON.stringify(~space=2),
     )
   } catch {
   // A platform that cannot announce itself must still serve. The tools fall back

package/src/LocalPlatformRegistry.res.mjs

@@ -1,26 +1,27 @@
 // Generated by ReScript, PLEASE EDIT WITH CARE
 
-import * as S from "sury/src/S.res.mjs";
+import * as Sury from "sury";
 import * as Nodefs from "node:fs";
 import * as Nodepath from "node:path";
 import * as Stdlib_JSON from "@rescript/runtime/lib/es6/Stdlib_JSON.js";
 import * as Stdlib_Array from "@rescript/runtime/lib/es6/Stdlib_Array.js";
 import * as Primitive_int from "@rescript/runtime/lib/es6/Primitive_int.js";
 import * as Stdlib_Option from "@rescript/runtime/lib/es6/Stdlib_Option.js";
+import * as Util_Sury$Reventless from "@reventlessdev/reventless-spec/src/util/Util_Sury.res.mjs";
 
-let storeSchema = S.schema(s => ({
-  kind: s.m(S.string),
-  path: s.m(S.option(S.string))
+let storeSchema = Sury.$schema(s => ({
+  kind: s.m(Sury.string),
+  path: s.m(Sury.$option(Sury.string))
 }));
 
-let entrySchema = S.schema(s => ({
-  app: s.m(S.string),
-  port: s.m(S.int),
-  pid: s.m(S.int),
-  endpoint: s.m(S.string),
-  loginEndpoint: s.m(S.string),
+let entrySchema = Sury.$schema(s => ({
+  app: s.m(Sury.string),
+  port: s.m(Sury.int),
+  pid: s.m(Sury.int),
+  endpoint: s.m(Sury.string),
+  loginEndpoint: s.m(Sury.string),
   store: s.m(storeSchema),
-  startedAt: s.m(S.string)
+  startedAt: s.m(Sury.string)
 }));
 
 function runningDir(cwdOpt, param) {
@@ -69,7 +70,7 @@ function alive(pid) {
 
 function readEntry(path) {
   try {
-    return S.parseJsonOrThrow(JSON.parse(Nodefs.readFileSync(path, "utf8")), entrySchema);
+    return Util_Sury$Reventless.fromJson(JSON.parse(Nodefs.readFileSync(path, "utf8")), entrySchema);
   } catch (exn) {
     return;
   }
@@ -126,7 +127,7 @@ function write(port, endpoint, loginEndpoint, store, pidOpt, cwdOpt) {
     Nodefs.mkdirSync(runningDir(cwd, undefined), {
       recursive: true
     });
-    Nodefs.writeFileSync(path, JSON.stringify(S.reverseConvertToJsonOrThrow(entry, entrySchema), undefined, 2), "utf8");
+    Nodefs.writeFileSync(path, JSON.stringify(Util_Sury$Reventless.toJson(entry, entrySchema), undefined, 2), "utf8");
   } catch (exn) {
     
   }

package/src/Platform.res

@@ -39,7 +39,7 @@ let decodePluginEventEnvelope = (eventJson: JSON.t): option<ReventlessCore.Plugi
   switch eventJson
   ->JSON.Decode.object
   ->Option.flatMap(d => d->Dict.get("event"))
-  ->Option.map(payload => payload->S.parseJsonOrThrow(ReventlessCore.PluginSpec.eventSchema)) {
+  ->Option.map(payload => payload->Reventless.Util_Sury.fromJson(ReventlessCore.PluginSpec.eventSchema)) {
   | result => result
   | exception _ => None
   }
@@ -55,7 +55,7 @@ let decodeUiFragmentRegistryEventEnvelope = (
   ->JSON.Decode.object
   ->Option.flatMap(d => d->Dict.get("event"))
   ->Option.map(payload =>
-    payload->S.parseJsonOrThrow(ReventlessCore.UiFragmentRegistry.eventSchema)
+    payload->Reventless.Util_Sury.fromJson(ReventlessCore.UiFragmentRegistry.eventSchema)
   ) {
   | result => result
   | exception _ => None
@@ -968,7 +968,7 @@ module MakeWithConfig = (
     let cmdJson: Reventless.Message.commandJson = {
       id: pluginName,
       meta: ReventlessCore.Message.generateMeta(~service=ReventlessCore.PluginSpec.name),
-      commandJson: command->S.reverseConvertToJsonOrThrow(ReventlessCore.PluginSpec.commandSchema),
+      commandJson: command->Reventless.Util_Sury.toJson(ReventlessCore.PluginSpec.commandSchema),
     }
     Bus.dispatchCommand(pluginCmdTopicKey, ReventlessCore.CommandTopic.encodeCommandJson(cmdJson))
   }
@@ -997,7 +997,7 @@ module MakeWithConfig = (
     let cmdJson: Reventless.Message.commandJson = {
       id: pluginName,
       meta: ReventlessCore.Message.generateMeta(~service=ReventlessCore.UiFragmentRegistry.name),
-      commandJson: command->S.reverseConvertToJsonOrThrow(
+      commandJson: command->Reventless.Util_Sury.toJson(
         ReventlessCore.UiFragmentRegistry.commandSchema,
       ),
     }
@@ -1057,7 +1057,7 @@ module MakeWithConfig = (
           ),
         )
       let manifestJson = (m: Reventless.Plugin.uiFragmentManifest) =>
-        m->S.reverseConvertToJsonOrThrow(Reventless.Plugin.uiFragmentManifestSchema)
+        m->Reventless.Util_Sury.toJson(Reventless.Plugin.uiFragmentManifestSchema)
       Bus.subscribeToEvents(pluginEventTopicKey, async (_service, _meta, eventJson) => {
         switch decodePluginEventEnvelope(eventJson) {
         | Some(VersionConnected(def))
@@ -1723,7 +1723,7 @@ module MakeWithConfig = (
         switch Bus.getQueryDbScan(pluginQueryDbName) {
         | Some(scanAll) =>
           scanAll()->Array.forEach(json =>
-            switch json->S.convertOrThrow(ReventlessCore.PluginsReadModelSpec.stateSchema) {
+            switch json->Reventless.Util_Sury.fromJson(ReventlessCore.PluginsReadModelSpec.stateSchema) {
             | state => statusByName->Dict.set(state.name, state.status)
             | exception _ => ()
             }
@@ -1805,7 +1805,7 @@ module MakeWithConfig = (
         switch Bus.getQueryDbScan(pluginQueryDbName) {
         | Some(scanAll) =>
           scanAll()->Array.forEach(json =>
-            switch json->S.convertOrThrow(ReventlessCore.PluginsReadModelSpec.stateSchema) {
+            switch json->Reventless.Util_Sury.fromJson(ReventlessCore.PluginsReadModelSpec.stateSchema) {
             | state =>
               let id = state.name ++ "@" ++ state.version
               dict->Dict.set(id, state.status)
@@ -1886,7 +1886,7 @@ module MakeWithConfig = (
         // mixed store never surfaces duplicates (mirrors Platform_UIFragments_Lambda.res).
         let latestByName = Dict.make()
         items->Array.forEach(item =>
-          switch item->S.parseOrThrow(ReventlessCore.UiFragments.stateSchema) {
+          switch item->S.parseOrThrow(~to=ReventlessCore.UiFragments.stateSchema) {
           | state =>
             let name = ReventlessCore.Plugin.name(state.pluginId)
             let version = ReventlessCore.Plugin.version(state.pluginId)
@@ -1932,7 +1932,7 @@ module MakeWithConfig = (
       switch Bus.getQueryDbScan(pluginQueryDbName) {
       | Some(scanAll) =>
         scanAll()->Array.findMap(json =>
-          switch json->S.convertOrThrow(ReventlessCore.PluginsReadModelSpec.stateSchema) {
+          switch json->Reventless.Util_Sury.fromJson(ReventlessCore.PluginsReadModelSpec.stateSchema) {
           | state if state.name == pluginName => Some(state.version)
           | _ => None
           | exception _ => None
@@ -2385,7 +2385,7 @@ module MakeWithConfig = (
           }
           items
           ->Array.filterMap(item =>
-            switch item->S.parseOrThrow(ReventlessCore.UiFragments.stateSchema) {
+            switch item->S.parseOrThrow(~to=ReventlessCore.UiFragments.stateSchema) {
             | state =>
               Some(ReventlessCore.Platform_UIFragmentsApi.encodeUIFragmentEntry(state))
             | exception _ => None

package/src/Platform.res.mjs

@@ -13,6 +13,7 @@ import * as Effect from "effect/Effect";
 import * as Pulumi from "@pulumi/pulumi";
 import * as Stdlib_Promise from "@rescript/runtime/lib/es6/Stdlib_Promise.js";
 import * as Plugin$Reventless from "@reventlessdev/reventless-spec/src/components/Plugin.res.mjs";
+import * as Util_Sury$Reventless from "@reventlessdev/reventless-spec/src/util/Util_Sury.res.mjs";
 import * as Logger$ReventlessCore from "@reventlessdev/reventless-core/src/util/Logger.res.mjs";
 import * as Plugin$ReventlessCore from "@reventlessdev/reventless-core/src/plugin/component/Plugin.res.mjs";
 import * as Message$ReventlessCore from "@reventlessdev/reventless-core/src/Message.res.mjs";
@@ -115,7 +116,7 @@ let platformMCPRef = {
 
 function decodePluginEventEnvelope(eventJson) {
   try {
-    return Stdlib_Option.map(Stdlib_Option.flatMap(Stdlib_JSON.Decode.object(eventJson), d => d["event"]), payload => S.parseJsonOrThrow(payload, PluginSpec$ReventlessCore.eventSchema));
+    return Stdlib_Option.map(Stdlib_Option.flatMap(Stdlib_JSON.Decode.object(eventJson), d => d["event"]), payload => Util_Sury$Reventless.fromJson(payload, PluginSpec$ReventlessCore.eventSchema));
   } catch (exn) {
     return;
   }
@@ -123,7 +124,7 @@ function decodePluginEventEnvelope(eventJson) {
 
 function decodeUiFragmentRegistryEventEnvelope(eventJson) {
   try {
-    return Stdlib_Option.map(Stdlib_Option.flatMap(Stdlib_JSON.Decode.object(eventJson), d => d["event"]), payload => S.parseJsonOrThrow(payload, UiFragmentRegistry$ReventlessCore.eventSchema));
+    return Stdlib_Option.map(Stdlib_Option.flatMap(Stdlib_JSON.Decode.object(eventJson), d => d["event"]), payload => Util_Sury$Reventless.fromJson(payload, UiFragmentRegistry$ReventlessCore.eventSchema));
   } catch (exn) {
     return;
   }
@@ -882,7 +883,7 @@ function MakeWithConfig(Config) {
   let pluginEventTopicKey = PluginSpec$ReventlessCore.name + "AggrEventTopic";
   let dispatchPluginCommand = (pluginName, command) => {
     let cmdJson_meta = Message$ReventlessCore.generateMeta(PluginSpec$ReventlessCore.name, undefined, undefined, undefined, undefined, undefined, undefined, undefined);
-    let cmdJson_commandJson = S.reverseConvertToJsonOrThrow(command, PluginSpec$ReventlessCore.commandSchema);
+    let cmdJson_commandJson = Util_Sury$Reventless.toJson(command, PluginSpec$ReventlessCore.commandSchema);
     let cmdJson = {
       id: pluginName,
       meta: cmdJson_meta,
@@ -893,7 +894,7 @@ function MakeWithConfig(Config) {
   let adminDcbCmdTopicKey = ComponentType$ReventlessCore.name(Platform_Admin_Structure$ReventlessCore.pluginId + "Dcb", "CommandTopic");
   let dispatchUiFragmentCommand = (pluginName, command) => {
     let cmdJson_meta = Message$ReventlessCore.generateMeta(UiFragmentRegistry$ReventlessCore.name, undefined, undefined, undefined, undefined, undefined, undefined, undefined);
-    let cmdJson_commandJson = S.reverseConvertToJsonOrThrow(command, UiFragmentRegistry$ReventlessCore.commandSchema);
+    let cmdJson_commandJson = Util_Sury$Reventless.toJson(command, UiFragmentRegistry$ReventlessCore.commandSchema);
     let cmdJson = {
       id: pluginName,
       meta: cmdJson_meta,
@@ -967,9 +968,9 @@ function MakeWithConfig(Config) {
       }
       switch (match.TAG) {
         case "UiFragmentRegistered" :
-          return publishUIFragment(match.pluginId, "Registered", S.reverseConvertToJsonOrThrow(match.manifest, Plugin$Reventless.uiFragmentManifestSchema));
+          return publishUIFragment(match.pluginId, "Registered", Util_Sury$Reventless.toJson(match.manifest, Plugin$Reventless.uiFragmentManifestSchema));
         case "UiFragmentUpdated" :
-          return publishUIFragment(match.pluginId, "Updated", S.reverseConvertToJsonOrThrow(match.newManifest, Plugin$Reventless.uiFragmentManifestSchema));
+          return publishUIFragment(match.pluginId, "Updated", Util_Sury$Reventless.toJson(match.newManifest, Plugin$Reventless.uiFragmentManifestSchema));
         case "UiFragmentDeregistered" :
           return publishUIFragment(match.pluginId, "Deregistered", null);
       }
@@ -1335,7 +1336,7 @@ function MakeWithConfig(Config) {
         scanAll().forEach(json => {
           let state;
           try {
-            state = S.convertOrThrow(json, PluginsReadModelSpec$ReventlessCore.stateSchema);
+            state = Util_Sury$Reventless.fromJson(json, PluginsReadModelSpec$ReventlessCore.stateSchema);
           } catch (exn) {
             return;
           }
@@ -1397,7 +1398,7 @@ function MakeWithConfig(Config) {
         scanAll().forEach(json => {
           let state;
           try {
-            state = S.convertOrThrow(json, PluginsReadModelSpec$ReventlessCore.stateSchema);
+            state = Util_Sury$Reventless.fromJson(json, PluginsReadModelSpec$ReventlessCore.stateSchema);
           } catch (exn) {
             return;
           }
@@ -1474,7 +1475,7 @@ function MakeWithConfig(Config) {
         return Stdlib_Array.findMap(scanAll(), json => {
           let state;
           try {
-            state = S.convertOrThrow(json, PluginsReadModelSpec$ReventlessCore.stateSchema);
+            state = Util_Sury$Reventless.fromJson(json, PluginsReadModelSpec$ReventlessCore.stateSchema);
           } catch (exn) {
             return;
           }
@@ -2612,7 +2613,7 @@ function Make($star) {
   let pluginEventTopicKey = PluginSpec$ReventlessCore.name + "AggrEventTopic";
   let dispatchPluginCommand = (pluginName, command) => {
     let cmdJson_meta = Message$ReventlessCore.generateMeta(PluginSpec$ReventlessCore.name, undefined, undefined, undefined, undefined, undefined, undefined, undefined);
-    let cmdJson_commandJson = S.reverseConvertToJsonOrThrow(command, PluginSpec$ReventlessCore.commandSchema);
+    let cmdJson_commandJson = Util_Sury$Reventless.toJson(command, PluginSpec$ReventlessCore.commandSchema);
     let cmdJson = {
       id: pluginName,
       meta: cmdJson_meta,
@@ -2623,7 +2624,7 @@ function Make($star) {
   let adminDcbCmdTopicKey = ComponentType$ReventlessCore.name(Platform_Admin_Structure$ReventlessCore.pluginId + "Dcb", "CommandTopic");
   let dispatchUiFragmentCommand = (pluginName, command) => {
     let cmdJson_meta = Message$ReventlessCore.generateMeta(UiFragmentRegistry$ReventlessCore.name, undefined, undefined, undefined, undefined, undefined, undefined, undefined);
-    let cmdJson_commandJson = S.reverseConvertToJsonOrThrow(command, UiFragmentRegistry$ReventlessCore.commandSchema);
+    let cmdJson_commandJson = Util_Sury$Reventless.toJson(command, UiFragmentRegistry$ReventlessCore.commandSchema);
     let cmdJson = {
       id: pluginName,
       meta: cmdJson_meta,
@@ -2697,9 +2698,9 @@ function Make($star) {
       }
       switch (match.TAG) {
         case "UiFragmentRegistered" :
-          return publishUIFragment(match.pluginId, "Registered", S.reverseConvertToJsonOrThrow(match.manifest, Plugin$Reventless.uiFragmentManifestSchema));
+          return publishUIFragment(match.pluginId, "Registered", Util_Sury$Reventless.toJson(match.manifest, Plugin$Reventless.uiFragmentManifestSchema));
         case "UiFragmentUpdated" :
-          return publishUIFragment(match.pluginId, "Updated", S.reverseConvertToJsonOrThrow(match.newManifest, Plugin$Reventless.uiFragmentManifestSchema));
+          return publishUIFragment(match.pluginId, "Updated", Util_Sury$Reventless.toJson(match.newManifest, Plugin$Reventless.uiFragmentManifestSchema));
         case "UiFragmentDeregistered" :
           return publishUIFragment(match.pluginId, "Deregistered", null);
       }
@@ -3060,7 +3061,7 @@ function Make($star) {
         scanAll().forEach(json => {
           let state;
           try {
-            state = S.convertOrThrow(json, PluginsReadModelSpec$ReventlessCore.stateSchema);
+            state = Util_Sury$Reventless.fromJson(json, PluginsReadModelSpec$ReventlessCore.stateSchema);
           } catch (exn) {
             return;
           }
@@ -3122,7 +3123,7 @@ function Make($star) {
         scanAll().forEach(json => {
           let state;
           try {
-            state = S.convertOrThrow(json, PluginsReadModelSpec$ReventlessCore.stateSchema);
+            state = Util_Sury$Reventless.fromJson(json, PluginsReadModelSpec$ReventlessCore.stateSchema);
           } catch (exn) {
             return;
           }
@@ -3199,7 +3200,7 @@ function Make($star) {
         return Stdlib_Array.findMap(scanAll(), json => {
           let state;
           try {
-            state = S.convertOrThrow(json, PluginsReadModelSpec$ReventlessCore.stateSchema);
+            state = Util_Sury$Reventless.fromJson(json, PluginsReadModelSpec$ReventlessCore.stateSchema);
           } catch (exn) {
             return;
           }

package/src/adapter/Auth/LocalAuth.res

@@ -253,7 +253,7 @@ module Login = {
       } {
       | Error(_) as e => e
       | Ok(minted) =>
-        let json = minted->S.reverseConvertToJsonOrThrow(Identity.schema)->JSON.stringify
+        let json = minted->Reventless.Util_Sury.toJson(Identity.schema)->JSON.stringify
         let payload = _b64urlEncode(json)
         let sig = _sign(payload)
         Ok(`${payload}.${sig}`)
@@ -293,7 +293,7 @@ module Login = {
     | (Some(payload), Some(sig)) if _sign(payload) === sig =>
       _b64urlDecode(payload)->Option.flatMap(json =>
         try {
-          Some(json->JSON.parseOrThrow->S.parseOrThrow(Identity.schema))
+          Some(json->JSON.parseOrThrow->S.parseOrThrow(~to=Identity.schema))
         } catch {
         | _ => None
         }
@@ -334,7 +334,7 @@ module Login = {
         } {
         | Error(_) as e => e
         | Ok(minted) =>
-          let json = minted->S.reverseConvertToJsonOrThrow(Identity.schema)->JSON.stringify
+          let json = minted->Reventless.Util_Sury.toJson(Identity.schema)->JSON.stringify
           let payload = _b64urlEncode(json)
           Ok(`${payload}.${_sign(payload)}`)
         }

package/src/adapter/Auth/LocalAuth.res.mjs

@@ -7,6 +7,7 @@ import * as Nodecrypto from "node:crypto";
 import * as Stdlib_Option from "@rescript/runtime/lib/es6/Stdlib_Option.js";
 import * as Pulumi from "@pulumi/pulumi";
 import * as Identity$Reventless from "@reventlessdev/reventless-spec/src/types/Identity.res.mjs";
+import * as Util_Sury$Reventless from "@reventlessdev/reventless-spec/src/util/Util_Sury.res.mjs";
 import * as Auth_ActiveRole$ReventlessCore from "@reventlessdev/reventless-core/src/adapter/Auth/Auth_ActiveRole.res.mjs";
 
 let defaultUser_groups = ["User"];
@@ -209,7 +210,7 @@ async function issue(username, password, activeRole) {
   if (e.TAG !== "Ok") {
     return e;
   }
-  let json = JSON.stringify(S.reverseConvertToJsonOrThrow(e._0, Identity$Reventless.schema));
+  let json = JSON.stringify(Util_Sury$Reventless.toJson(e._0, Identity$Reventless.schema));
   let payload = _b64urlEncode(json);
   let sig = _sign(payload);
   return {
@@ -269,7 +270,7 @@ function reissue(token, activeRole) {
   if (e.TAG !== "Ok") {
     return e;
   }
-  let json = JSON.stringify(S.reverseConvertToJsonOrThrow(e._0, Identity$Reventless.schema));
+  let json = JSON.stringify(Util_Sury$Reventless.toJson(e._0, Identity$Reventless.schema));
   let payload = _b64urlEncode(json);
   return {
     TAG: "Ok",

package/src/adapter/Auth/UserStore.res

@@ -33,7 +33,7 @@ let _entriesSchema = S.array(entrySchema)
 let parseString = (yamlText: string): result<array<entry>, string> =>
   try {
     let json = _yamlParse(yamlText)->Obj.magic
-    Ok(S.parseOrThrow(json, _entriesSchema))
+    Ok(S.parseOrThrow(json, ~to=_entriesSchema))
   } catch {
   | JsExn(err) => Error(JsExn.message(err)->Option.getOr("YAML parse error"))
   | _ => Error("YAML parse error")

package/src/adapter/Auth/UserStore.res.mjs

@@ -1,6 +1,7 @@
 // Generated by ReScript, PLEASE EDIT WITH CARE
 
 import * as S from "sury/src/S.res.mjs";
+import * as Sury from "sury";
 import * as Yaml from "yaml";
 import * as Nodefs from "node:fs";
 import * as Nodepath from "node:path";
@@ -10,14 +11,14 @@ import * as Stdlib_Result from "@rescript/runtime/lib/es6/Stdlib_Result.js";
 import * as Primitive_exceptions from "@rescript/runtime/lib/es6/Primitive_exceptions.js";
 import * as LocalAuth$ReventlessLocal from "./LocalAuth.res.mjs";
 
-let entrySchema = S.schema(s => ({
-  username: s.m(S.string),
-  password: s.m(S.string),
-  groups: s.m(S.array(S.string)),
-  userId: s.m(S.option(S.string))
+let entrySchema = Sury.$schema(s => ({
+  username: s.m(Sury.string),
+  password: s.m(Sury.string),
+  groups: s.m(Sury.array(Sury.string)),
+  userId: s.m(Sury.$option(Sury.string))
 }));
 
-let _entriesSchema = S.array(entrySchema);
+let _entriesSchema = Sury.array(entrySchema);
 
 function parseString(yamlText) {
   try {

package/src/adapter/CommandGenerator/CommandGeneratorResolvers_GraphQL.res

@@ -125,7 +125,7 @@ let extractCommandName = (fieldName: string) => {
 
 let extractVariantSchema = (commandSchema: S.t<unknown>, ~index=0) =>
   switch commandSchema {
-  | Union({anyOf}) => anyOf->Array.get(index)->Option.getOr(commandSchema)
+  | AnyOf({anyOf}) => anyOf->Array.get(index)->Option.getOr(commandSchema)
   | _ => commandSchema
   }
 

package/src/adapter/CommandGenerator/CommandGeneratorResolvers_GraphQL.res.mjs

@@ -120,7 +120,7 @@ function extractCommandName(fieldName) {
 
 function extractVariantSchema(commandSchema, indexOpt) {
   let index = indexOpt !== undefined ? indexOpt : 0;
-  if (commandSchema.type === "union") {
+  if (commandSchema.type === "anyOf") {
     return Stdlib_Option.getOr(commandSchema.anyOf[index], commandSchema);
   } else {
     return commandSchema;

package/src/adapter/CommandTopic/LocalCommandTopicRemoteChannel.res

@@ -14,7 +14,7 @@ module Make = (Bus: LocalBus.T) => {
               ("id", JSON.Encode.string(cmdJson.id)),
               (
                 "meta",
-                cmdJson.meta->S.reverseConvertToJsonOrThrow(Reventless.Message.metaSchema),
+                cmdJson.meta->Reventless.Util_Sury.toJson(Reventless.Message.metaSchema),
               ),
               ("command", cmdJson.commandJson),
             ]),

package/src/adapter/CommandTopic/LocalCommandTopicRemoteChannel.res.mjs

@@ -1,7 +1,7 @@
 // Generated by ReScript, PLEASE EDIT WITH CARE
 
-import * as S from "sury/src/S.res.mjs";
 import * as Message$Reventless from "@reventlessdev/reventless-spec/src/types/Message.res.mjs";
+import * as Util_Sury$Reventless from "@reventlessdev/reventless-spec/src/util/Util_Sury.res.mjs";
 
 function Make(Bus) {
   let make = resources => ({
@@ -15,7 +15,7 @@ function Make(Bus) {
           ],
           [
             "meta",
-            S.reverseConvertToJsonOrThrow(cmdJson.meta, Message$Reventless.metaSchema)
+            Util_Sury$Reventless.toJson(cmdJson.meta, Message$Reventless.metaSchema)
           ],
           [
             "command",
@@ -35,4 +35,4 @@ function Make(Bus) {
 export {
   Make,
 }
-/* S Not a pure module */
+/* Message-Reventless Not a pure module */

package/src/adapter/DcbEventLog/DcbEventLogStorage_Sqlite.res

@@ -275,7 +275,7 @@ let makeStorage = (
       let meta = switch row->Dict.get("meta") {
       | Some(JSON.String(s)) =>
         switch JSON.parseOrThrow(s) {
-        | metaJson => metaJson->S.parseJsonOrThrow(Reventless.Message.metaSchema)
+        | metaJson => metaJson->Reventless.Util_Sury.fromJson(Reventless.Message.metaSchema)
         | exception _ => JsError.throwWithMessage("invalid meta JSON in dcb_event row")
         }
       | _ => JsError.throwWithMessage("missing meta column in dcb_event row")
@@ -345,7 +345,7 @@ let makeStorage = (
         newEvents->Array.forEach(event => {
           mutable_ := mutable_.contents + 1
           let pos = mutable_.contents
-          let metaJson = event.meta->S.reverseConvertToJsonOrThrow(Reventless.Message.metaSchema)
+          let metaJson = event.meta->Reventless.Util_Sury.toJson(Reventless.Message.metaSchema)
           let recordedAt = ReventlessCore.Message.nowAsISOString()
           insertEventStmt->SqliteDriver.run([
             JSON.Encode.string(name),

package/src/adapter/DcbEventLog/DcbEventLogStorage_Sqlite.res.mjs

@@ -1,6 +1,5 @@
 // Generated by ReScript, PLEASE EDIT WITH CARE
 
-import * as S from "sury/src/S.res.mjs";
 import * as Stdlib_Int from "@rescript/runtime/lib/es6/Stdlib_Int.js";
 import * as Stdlib_JsExn from "@rescript/runtime/lib/es6/Stdlib_JsExn.js";
 import * as Stdlib_Option from "@rescript/runtime/lib/es6/Stdlib_Option.js";
@@ -11,6 +10,7 @@ import * as Stdlib_JsError from "@rescript/runtime/lib/es6/Stdlib_JsError.js";
 import * as Primitive_option from "@rescript/runtime/lib/es6/Primitive_option.js";
 import * as Message$Reventless from "@reventlessdev/reventless-spec/src/types/Message.res.mjs";
 import * as Primitive_exceptions from "@rescript/runtime/lib/es6/Primitive_exceptions.js";
+import * as Util_Sury$Reventless from "@reventlessdev/reventless-spec/src/util/Util_Sury.res.mjs";
 import * as Message$ReventlessCore from "@reventlessdev/reventless-core/src/Message.res.mjs";
 import * as SqliteDriver$ReventlessLocal from "../SqliteDriver.res.mjs";
 import * as ProjectionPending$ReventlessLocal from "../ProjectionPending.res.mjs";
@@ -219,7 +219,7 @@ function makeStorage(db, name, param, param$1, param$2) {
           meta = Stdlib_JsError.throwWithMessage("invalid meta JSON in dcb_event row");
         }
         if (exit === 1) {
-          meta = S.parseJsonOrThrow(metaJson, Message$Reventless.metaSchema);
+          meta = Util_Sury$Reventless.fromJson(metaJson, Message$Reventless.metaSchema);
         }
       } else {
         meta = Stdlib_JsError.throwWithMessage("missing meta column in dcb_event row");
@@ -284,7 +284,7 @@ function makeStorage(db, name, param, param$1, param$2) {
         newEvents.forEach(event => {
           mutable_.contents = mutable_.contents + 1 | 0;
           let pos = mutable_.contents;
-          let metaJson = S.reverseConvertToJsonOrThrow(event.meta, Message$Reventless.metaSchema);
+          let metaJson = Util_Sury$Reventless.toJson(event.meta, Message$Reventless.metaSchema);
           let recordedAt = Message$ReventlessCore.nowAsISOString();
           SqliteDriver$ReventlessLocal.run(insertEventStmt, [
             name,
@@ -382,4 +382,4 @@ export {
   buildQuerySql,
   makeStorage,
 }
-/* S Not a pure module */
+/* Stdlib_JsExn Not a pure module */

package/src/adapter/DomainGraphQL_Server.res

@@ -110,7 +110,7 @@ let handleLogin = (req: nodeRequest, res: nodeResponse): unit =>
           | None => Reventless.Identity.anonymous
           }
           let identityJson =
-            identity->S.reverseConvertToJsonOrThrow(Reventless.Identity.schema)
+            identity->Reventless.Util_Sury.toJson(Reventless.Identity.schema)
           _writeJson(
             res,
             ~status=200,
@@ -171,7 +171,7 @@ let handleSwitchRole = (req: nodeRequest, res: nodeResponse): unit =>
               ("token", JSON.Encode.string(newToken)),
               (
                 "identity",
-                identity->S.reverseConvertToJsonOrThrow(Reventless.Identity.schema),
+                identity->Reventless.Util_Sury.toJson(Reventless.Identity.schema),
               ),
             ]),
           ),

package/src/adapter/DomainGraphQL_Server.res.mjs

@@ -1,6 +1,5 @@
 // Generated by ReScript, PLEASE EDIT WITH CARE
 
-import * as S from "sury/src/S.res.mjs";
 import * as Http from "http";
 import * as Graphql from "graphql";
 import * as GraphqlYoga from "@reventlessdev/rescript-graphql-yoga/src/GraphqlYoga.res.mjs";
@@ -14,6 +13,7 @@ import * as Stdlib_JsError from "@rescript/runtime/lib/es6/Stdlib_JsError.js";
 import * as Primitive_option from "@rescript/runtime/lib/es6/Primitive_option.js";
 import * as Identity$Reventless from "@reventlessdev/reventless-spec/src/types/Identity.res.mjs";
 import * as Primitive_exceptions from "@rescript/runtime/lib/es6/Primitive_exceptions.js";
+import * as Util_Sury$Reventless from "@reventlessdev/reventless-spec/src/util/Util_Sury.res.mjs";
 import * as Logger$ReventlessCore from "@reventlessdev/reventless-core/src/util/Logger.res.mjs";
 import * as Api_Ids$ReventlessCore from "@reventlessdev/reventless-core/src/components/Api/Api_Ids.res.mjs";
 import * as LocalAuth$ReventlessLocal from "./Auth/LocalAuth.res.mjs";
@@ -75,7 +75,7 @@ function handleLogin(req, res) {
       if (result.TAG === "Ok") {
         let i = LocalAuth$ReventlessLocal.Login.mintedIdentity(username, activeRole);
         let identity = i !== undefined ? i : Identity$Reventless.anonymous;
-        let identityJson = S.reverseConvertToJsonOrThrow(identity, Identity$Reventless.schema);
+        let identityJson = Util_Sury$Reventless.toJson(identity, Identity$Reventless.schema);
         _writeJson(res, 200, Object.fromEntries([
           [
             "token",
@@ -130,7 +130,7 @@ function handleSwitchRole(req, res) {
       ],
       [
         "identity",
-        S.reverseConvertToJsonOrThrow(identity, Identity$Reventless.schema)
+        Util_Sury$Reventless.toJson(identity, Identity$Reventless.schema)
       ]
     ]));
   });

package/src/adapter/DomainMCP_Server.res

@@ -143,7 +143,7 @@ let extractIdentity = (req: McpSdk.incomingMessage): Reventless.Identity.t => {
     | Some(json) =>
       json
       ->JSON.parseOrThrow
-      ->S.parseOrThrow(Reventless.Identity.schema)
+      ->S.parseOrThrow(~to=Reventless.Identity.schema)
     | None => Reventless.Identity.anonymous
     }
   } catch {

package/src/adapter/MCP_ServerInstance.res

@@ -157,7 +157,7 @@ let make = (~label: string="MCP"): t => {
       | Some(json) =>
         json
         ->JSON.parseOrThrow
-        ->S.parseOrThrow(Reventless.Identity.schema)
+        ->S.parseOrThrow(~to=Reventless.Identity.schema)
       | None => Reventless.Identity.anonymous
       }
     } catch {