@reventlessdev/reventless-core 3.0.0-alpha.277 → 3.0.0-alpha.278

package/CHANGELOG.md

@@ -3,6 +3,13 @@
 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.278 (2026-09-25)
+
+### Bug Fixes
+
+* **core:** an identity is published as a string, not a UUID ([f3781ba](https://github.com/ReventlessDev/reventless-core/commit/f3781ba5cae75f156175f649d51f32c3ca053907))
+
+
 # 3.0.0-alpha.277 (2026-09-25)
 
 **Note:** Version bump only for package @reventlessdev/reventless-core

package/package.json

@@ -1,6 +1,6 @@
 {
   "name": "@reventlessdev/reventless-core",
-  "version": "3.0.0-alpha.277",
+  "version": "3.0.0-alpha.278",
   "description": "Core package for Reventless framework",
   "license": "Apache-2.0",
   "jest": {
@@ -29,16 +29,16 @@
     "sury": "11.0.0",
     "uuid": "^13.0.0",
     "@reventlessdev/rescript-effect": "0.1.0-alpha.34",
-    "@reventlessdev/rescript-hash-object": "1.2.0-alpha.15",
     "@reventlessdev/rescript-fast-csv": "2.0.0-alpha.15",
     "@reventlessdev/rescript-jest": "1.0.0-alpha.11",
-    "@reventlessdev/rescript-pulumi-pulumi": "2.3.0-alpha.22",
+    "@reventlessdev/rescript-hash-object": "1.2.0-alpha.15",
     "@reventlessdev/rescript-node": "2.0.0-alpha.15",
     "@reventlessdev/rescript-ssh2": "2.0.0-alpha.15",
+    "@reventlessdev/rescript-pulumi-pulumi": "2.3.0-alpha.22",
     "@reventlessdev/rescript-uuid": "2.0.0-alpha.1",
-    "@reventlessdev/reventless-interop": "3.0.0-alpha.38",
+    "@reventlessdev/reventless-spec": "3.0.0-alpha.149",
     "@reventlessdev/reventless-infra": "3.0.0-alpha.177",
-    "@reventlessdev/reventless-spec": "3.0.0-alpha.149"
+    "@reventlessdev/reventless-interop": "3.0.0-alpha.38"
   },
   "devDependencies": {
     "rescript": "12.3.1",

package/src/components/Api/SuryToJsonSchema.res

@@ -203,7 +203,9 @@ let rec fromSchemaType = (~inputNames: bool=false, st: SchemaType.schemaType): J
   | ScalarInt => jsonObject([("type", str("integer"))])
   | ScalarBoolean => jsonObject([("type", str("boolean"))])
   | ScalarBigInt => jsonObject([("type", str("integer"))])
-  | EntityId => jsonObject([("type", str("string")), ("format", str("uuid"))])
+  // An identity is any string: `Id.Make.makeFromString` takes one, and so does the API.
+  // Claiming `format: uuid` made every generated form refuse an id it had not minted.
+  | EntityId => jsonObject([("type", str("string"))])
   | DateTime => jsonObject([("type", str("string")), ("format", str("date-time"))])
   | CalendarDate => jsonObject([("type", str("string")), ("format", str("date"))])
   | Nullable(inner) =>

package/src/components/Api/SuryToJsonSchema.res.mjs

@@ -193,17 +193,6 @@ function fromSchemaType(_inputNamesOpt, _st) {
               "type",
               "integer"
             ]]);
-        case "EntityId" :
-          return Object.fromEntries([
-            [
-              "type",
-              "string"
-            ],
-            [
-              "format",
-              "uuid"
-            ]
-          ]);
         case "DateTime" :
           return Object.fromEntries([
             [
@@ -227,6 +216,7 @@ function fromSchemaType(_inputNamesOpt, _st) {
             ]
           ]);
         case "ScalarString" :
+        case "EntityId" :
         case "Unknown" :
           return Object.fromEntries([[
               "type",

package/tests/api/SuryToJsonSchemaTest.res

@@ -1103,7 +1103,15 @@ describe("SuryToJsonSchema:", () => {
             },
         )->S.castToUnknown
         let json = SuryToJsonSchema.deriveObjectSchema(schema)
-        expect(formatOf(json, "orderId"))->toEqual(Some(JSON.Encode.string("uuid")))
+        expect(
+          SchemaType.fromSury(
+            ~parentName="T",
+            ~fieldName="orderId",
+            Reventless.DcbTag.string->S.castToUnknown,
+          ),
+        )->toEqual(SchemaType.EntityId)
+        // Published as a plain string: an identity is not a UUID.
+        expect(formatOf(json, "orderId"))->toEqual(None)
         expect(Reventless.Reference.getTarget(schema))->toBe(None)
       },
     )
@@ -1114,7 +1122,10 @@ describe("SuryToJsonSchema:", () => {
         let field = Reventless.Reference.toWithoutDcbTag("Customer")
         let schema = S.schema(s => {"customerId": s.matches(field)})->S.castToUnknown
         let json = SuryToJsonSchema.deriveObjectSchema(schema)
-        expect(formatOf(json, "customerId"))->toEqual(Some(JSON.Encode.string("uuid")))
+        expect(
+          SchemaType.fromSury(~parentName="T", ~fieldName="customerId", field->S.castToUnknown),
+        )->toEqual(SchemaType.EntityId)
+        expect(formatOf(json, "customerId"))->toEqual(None)
         expect(Reventless.DcbTag.isTagged(field->S.castToUnknown))->toBe(false)
       },
     )

package/tests/api/SuryToJsonSchemaTest.res.mjs

@@ -21,6 +21,7 @@ import * as Sensitive$Reventless from "@reventlessdev/reventless-spec/src/compon
 import * as StorageRef$Reventless from "@reventlessdev/reventless-spec/src/semantic/StorageRef.res.mjs";
 import * as CalendarDate$Reventless from "@reventlessdev/reventless-spec/src/semantic/CalendarDate.res.mjs";
 import * as FieldDefault$Reventless from "@reventlessdev/reventless-spec/src/components/FieldDefault.res.mjs";
+import * as SchemaType$ReventlessCore from "../../src/components/Api/SchemaType.res.mjs";
 import * as StateAnnotations$Reventless from "@reventlessdev/reventless-spec/src/components/StateAnnotations.res.mjs";
 import * as SuryToJsonSchema$ReventlessCore from "../../src/components/Api/SuryToJsonSchema.res.mjs";
 
@@ -859,7 +860,8 @@ globalThis.describe("SuryToJsonSchema:", () => {
         orderId: s.m(DcbTag$Reventless.string)
       }));
       let json = SuryToJsonSchema$ReventlessCore.deriveObjectSchema(undefined, undefined, schema);
-      globalThis.expect(formatOf(json, "orderId")).toEqual("uuid");
+      globalThis.expect(SchemaType$ReventlessCore.fromSury("T", "orderId", DcbTag$Reventless.string)).toEqual("EntityId");
+      globalThis.expect(formatOf(json, "orderId")).toEqual(undefined);
       globalThis.expect(Reference$Reventless.getTarget(schema)).toBe(undefined);
     });
     globalThis.test("a reference without a DCB tag is still an entity id", () => {
@@ -868,7 +870,8 @@ globalThis.describe("SuryToJsonSchema:", () => {
         customerId: s.m(field)
       }));
       let json = SuryToJsonSchema$ReventlessCore.deriveObjectSchema(undefined, undefined, schema);
-      globalThis.expect(formatOf(json, "customerId")).toEqual("uuid");
+      globalThis.expect(SchemaType$ReventlessCore.fromSury("T", "customerId", field)).toEqual("EntityId");
+      globalThis.expect(formatOf(json, "customerId")).toEqual(undefined);
       globalThis.expect(DcbTag$Reventless.isTagged(field)).toBe(false);
     });
     globalThis.test("Reference.to_ carries both facts", () => {