@astrale-os/kernel-dsl 1.0.0-beta.12 → 1.0.0-beta.14

package/dist/v1/schema/analysis/class.js

@@ -3,39 +3,48 @@ import { Key, PropertyKey } from '../../addressing/index.js';
 import { definitionRefIndex } from '../../addressing/ordering.js';
 import { composeMethods } from '../../language/callable/composition.js';
 import { canonicalizeValueSchema } from '../../language/value/profile/canonicalize.js';
+import { escapePointerToken } from '../../language/value/syntax/pointer.js';
 import { diagnostic } from '../diagnostic.js';
 const formatDefinitionRef = Key.of;
 export function analyzeDefinitions(environment) {
     const diagnostics = [];
     const result = new Map();
     const visiting = new Set();
+    // A dependency was accepted against this same exact closure: a rule breaks here only at a Class
+    // of the candidate, or on an incomplete closure, which the dependency diagnostics report. An
+    // unresolved parent is reported where the candidate names it, by Class validation.
+    const reporter = (owner) => (code, at, message, ref) => {
+        if (owner.origin !== environment.candidate.origin)
+            return;
+        const pointer = `/classes/${escapePointerToken(owner.name)}${at}`;
+        diagnostics.push(diagnostic(code, pointer, message, ref));
+    };
     const analyze = (ref) => {
         const key = definitionRefIndex(ref);
         const cached = result.get(key);
         if (cached !== undefined)
             return cached;
-        if (visiting.has(key)) {
-            diagnostics.push(diagnostic('DV_CLASS_ACYCLIC', '', `Inheritance cycle reaches ${formatDefinitionRef(ref)}.`, formatDefinitionRef(ref)));
-            return undefined;
-        }
         const resolved = environment.resolveAny(ref);
         if (resolved === undefined)
             return undefined;
         visiting.add(key);
+        const report = reporter(ref);
         const declaration = resolved.declaration;
         const parents = declaration.extends;
-        const parentAnalyses = parents.flatMap((parent) => {
+        const parentAnalyses = parents.flatMap((parent, index) => {
             const target = environment.resolveAny(parent);
-            if (target === undefined) {
-                diagnostics.push(diagnostic('DV_REF_RESOLVES', '', `Inheritance ref ${formatDefinitionRef(parent)} does not resolve.`, formatDefinitionRef(parent)));
+            if (target?.ref.kind !== 'class')
+                return [];
+            if (visiting.has(definitionRefIndex(target.ref))) {
+                report('DV_CLASS_ACYCLIC', `/extends/${index}`, `Inheritance cycle reaches ${formatDefinitionRef(parent)}.`, formatDefinitionRef(parent));
                 return [];
             }
-            const analysis = target.ref.kind === 'class' ? analyze(target.ref) : undefined;
+            const analysis = analyze(target.ref);
             return analysis === undefined ? [] : [analysis];
         });
         const properties = mergeFields(parentAnalyses.map((parent) => parent.properties), ownFields(ref, declaration));
-        const data = mergeData(ref, declaration, parentAnalyses, diagnostics);
-        const methods = mergeMethods(ref, declaration, parentAnalyses, diagnostics);
+        const data = mergeData(ref, declaration, parentAnalyses, report);
+        const methods = mergeMethods(ref, declaration, parentAnalyses, report);
         const analysis = {
             ref,
             declaration,
@@ -82,7 +91,7 @@ function mergeFields(inherited, own) {
     }
     return result;
 }
-function mergeData(owner, declaration, parents, diagnostics) {
+function mergeData(owner, declaration, parents, report) {
     let effective;
     for (const parent of parents) {
         if (parent.data === undefined)
@@ -92,14 +101,15 @@ function mergeData(owner, declaration, parents, diagnostics) {
             continue;
         }
         if (effective.identity !== parent.data.identity) {
-            diagnostics.push(diagnostic('DV_DATA_COMPOSITION', '', `Data has distinct declaring owners ${formatDefinitionRef(effective.owner)} and ${formatDefinitionRef(parent.data.owner)}.`));
+            const index = declaration.extends.findIndex((ref) => definitionRefIndex(ref) === definitionRefIndex(parent.ref));
+            report('DV_DATA_COMPOSITION', `/extends/${index}`, `Data has distinct declaring owners ${formatDefinitionRef(effective.owner)} and ${formatDefinitionRef(parent.data.owner)}.`);
         }
     }
     const own = 'data' in declaration ? declaration.data : undefined;
     if (own === undefined)
         return effective;
     if (effective !== undefined) {
-        diagnostics.push(diagnostic('DV_DATA_COMPOSITION', '', `Data redeclares the inherited contract from ${formatDefinitionRef(effective.owner)}.`));
+        report('DV_DATA_COMPOSITION', '/data', `Data redeclares the inherited contract from ${formatDefinitionRef(effective.owner)}.`);
     }
     return {
         identity: `${definitionRefIndex(owner)}\u0000data`,
@@ -107,12 +117,20 @@ function mergeData(owner, declaration, parents, diagnostics) {
         declaration: own,
     };
 }
-function mergeMethods(owner, declaration, parents, diagnostics) {
+function mergeMethods(owner, declaration, parents, report) {
     const own = new Map(Object.entries('methods' in declaration ? declaration.methods : {}).map(([name, method]) => [
         name,
         { key: `${Key.of(owner)}.method.${name}`, owner, name, declaration: method },
     ]));
-    return composeMethods(parents, own, declaration.abstract, (left, right) => sameMethodSignature(left.declaration, right.declaration), (message) => diagnostics.push(diagnostic('DV_METHOD_COMPOSITION', '', message, Key.of(owner))));
+    return composeMethods(parents, own, declaration.abstract, (left, right) => sameMethodSignature(left.declaration, right.declaration), 
+    // A changed signature is the local Method's; an ambiguous or missing one needs a local Method.
+    (message, issue) => {
+        const local = issue.kind === 'signature'
+            ? [...own.values()].find(({ key }) => key === issue.local)
+            : undefined;
+        const at = local === undefined ? '/methods' : `/methods/${escapePointerToken(local.name)}`;
+        report('DV_METHOD_COMPOSITION', at, message, Key.of(owner));
+    });
 }
 /** The exact signature required by abstract Method composition. */
 export function sameMethodSignature(left, right) {

package/dist/v1/schema/compatibility/api.d.ts

@@ -1,4 +1,4 @@
 export { compare, compareMeaning, compareStructure } from './compare.js';
 export { closedParents } from './extension.js';
 export { requiredBump } from './versioning/index.js';
-export type { Analysis, Assessment, Bump, Comparison, ComparisonEntry, ComparisonEvidence, ComparisonRequest, ComparisonScope, Facet, Fingerprint, MeaningComparison, Observation, RequiredBump, SchemaIdentity, StructureComparison, Subject, Usage, VersionChange, } from './model.js';
+export type { Analysis, Assessment, Bump, Comparison, ComparisonEntry, ComparisonEvidence, ComparisonRequest, ComparisonScope, DiagnosticCode, Facet, Fingerprint, MeaningComparison, Observation, RequiredBump, SchemaIdentity, StructureComparison, Subject, Usage, VersionChange, } from './model.js';

package/dist/v1/schema/compatibility/coordinate.js

@@ -20,10 +20,10 @@ export function keyForDefinitionRef(ref) {
 /** Interpret one canonical V1 Key as a Definition or a Class member location. */
 export function keyReference(key) {
     const semantic = key.slice(key.indexOf(':') + 1);
+    // A Core slug may hold `.`: the name of a Core key is the whole rest of its coordinate.
+    if (semantic.startsWith('core.'))
+        return { kind: 'core', name: semantic.slice('core.'.length) };
     const parts = semantic.split('.');
-    if (parts[0] === 'core' && parts.length === 2) {
-        return { kind: 'core', name: parts[1] };
-    }
     if (parts.length === 2) {
         return { kind: parts[0], name: parts[1] };
     }

package/dist/v1/schema/compatibility/diff.js

@@ -1,5 +1,6 @@
 import { compareUnicode } from '../../addressing/ordering.js';
 import { isValueObject as isJsonObject } from '../../language/value/model/object.js';
+import { escapePointerToken } from '../../language/value/syntax/pointer.js';
 /** Structural differences between two portable values, leaf by leaf, in JSON Pointer order. */
 export function differences(before, after) {
     const found = [];
@@ -17,7 +18,7 @@ function collect(before, after, path, found) {
     if (isJsonObject(before) && isJsonObject(after)) {
         const keys = [...new Set([...Object.keys(before), ...Object.keys(after)])].sort(compareUnicode);
         for (const key of keys) {
-            collect(before[key], after[key], `${path}/${escape(key)}`, found);
+            collect(before[key], after[key], `${path}/${escapePointerToken(key)}`, found);
         }
         return;
     }
@@ -34,6 +35,3 @@ function collect(before, after, path, found) {
         ...(after === undefined ? {} : { after }),
     }));
 }
-function escape(segment) {
-    return segment.replaceAll('~', '~0').replaceAll('/', '~1');
-}

package/dist/v1/schema/compatibility/meaning/footprint.js

@@ -1,59 +1,25 @@
-import { Key } from '../../../addressing/index.js';
-import { compareAddedProperties, compareLostProperties } from '../comparators/classes.js';
-import { compareFacet } from '../comparators/index.js';
-import { contextInvalid } from '../context.js';
 import { callableReferences, classReferences, inherits, memberReferences, valueReferences, } from '../references.js';
+import { walkReferences } from '../walk.js';
 /** Meaning follows complete callable contracts through the exact authored reference closure. */
 export function compareFootprint({ context, report, }) {
-    const queue = [...context.roots];
-    const visited = new Set();
-    for (const reference of queue) {
-        report.note(reference);
-        const { coordinate, usage } = reference;
-        const visit = `${coordinate.key}:${usage.relation}`;
-        if (visited.has(visit))
-            continue;
-        visited.add(visit);
-        const pair = context.pair(coordinate);
-        const subject = pair.source;
-        if (subject === undefined)
-            throw contextInvalid(`Retained acceptance context has no meaning for ${coordinate.key}.`, coordinate.key);
-        let facet;
+    walkReferences({ context, report }, (subject, { usage }, reach) => {
         switch (subject.kind) {
-            case 'class': {
-                facet = inherits(usage) ? 'class.inherit' : 'class.reference';
-                queue.push(...classReferences(subject, false));
+            case 'class':
+                reach(...classReferences(subject, false));
                 if (inherits(usage))
-                    queue.push(...classReferences(subject, true));
-                break;
-            }
+                    reach(...classReferences(subject, true));
+                return inherits(usage) ? 'class.inherit' : 'class.reference';
             case 'property':
-                facet = 'property';
-                queue.push(...valueReferences(subject));
-                break;
+                reach(...valueReferences(subject));
+                return 'property';
             case 'method':
-                facet = 'method.signature';
-                queue.push(...callableReferences(subject));
-                break;
-            case 'member': {
-                facet =
-                    subject.coordinate.ref.kind === 'function'
-                        ? 'function.signature'
-                        : subject.coordinate.ref.kind;
-                queue.push(...memberReferences(subject));
-            }
+                reach(...callableReferences(subject));
+                return 'method.signature';
+            case 'member':
+                reach(...memberReferences(subject));
+                return subject.coordinate.ref.kind === 'function'
+                    ? 'function.signature'
+                    : subject.coordinate.ref.kind;
         }
-        if (Key.origin(coordinate.key) !== context.source.origin)
-            continue;
-        report.record({
-            pair,
-            facet,
-            ...compareFacet({ context, pair, facet }),
-            requirement: { kind: facet },
-        });
-        if (facet === 'class.inherit')
-            compareAddedProperties({ context, pair, report });
-        if (subject.kind === 'class')
-            compareLostProperties({ pair, report });
-    }
+    });
 }

package/dist/v1/schema/compatibility/model.d.ts

@@ -4,6 +4,11 @@ import type { DomainSchema } from '../model/schema.js';
 import type { ReferenceSite } from '../resolution/origins.js';
 import type { MeaningDifference } from './diff.js';
 export type Fingerprint = `sha256:${string}`;
+/**
+ * The codes a comparison request is refused with: the request, not a Schema, is invalid. A
+ * `schema.Error` carries them beside the codes of a refused Schema document.
+ */
+export type DiagnosticCode = 'DM_CAPABILITY_INVALID' | 'DM_DEPENDENCY_CONTEXT_INVALID' | 'DM_DEPENDENCY_NOT_RETAINED' | 'DM_MEMBER_ORIGIN_MISMATCH' | 'DM_MEMBER_ROOT_INVALID';
 /** Inputs carry accepted schemas; a dependency's source is always its retained exact context. */
 export interface ComparisonRequest {
     readonly scope: {

package/dist/v1/schema/compatibility/structure/requirements.js

@@ -1,79 +1,47 @@
-import { Key } from '../../../addressing/index.js';
 import { inheritanceOf } from '../../../language/class/inheritance.js';
-import { compareAddedProperties, compareLostProperties, inheritanceMeaning, } from '../comparators/classes.js';
+import { inheritanceMeaning } from '../comparators/classes.js';
 import { compareFacet } from '../comparators/index.js';
 import { fingerprintMeaning } from '../comparators/values.js';
 import { contextInvalid } from '../context.js';
 import { methodCoordinate } from '../coordinate.js';
 import { closedParents } from '../extension.js';
 import { callableReferences, classReferences, inherits, memberReferences, usageOf, valueReferences, } from '../references.js';
+import { walkReferences } from '../walk.js';
 /** Structure follows data and abstract obligations; concrete IO never expands its requirements. */
 export function compareRequirements({ context, report, }) {
-    const queue = [...context.roots];
-    const visited = new Set();
-    for (const reference of queue) {
-        report.note(reference);
-        const { coordinate, usage } = reference;
-        const visit = `${coordinate.key}:${usage.relation}`;
-        if (visited.has(visit))
-            continue;
-        visited.add(visit);
-        const pair = context.pair(coordinate);
-        const subject = pair.source;
-        if (subject === undefined)
-            throw contextInvalid(`Retained acceptance context has no meaning for ${coordinate.key}.`, coordinate.key);
-        let facet;
+    walkReferences({ context, report }, (subject, { coordinate, usage }, reach) => {
         switch (subject.kind) {
-            case 'class': {
-                facet = inherits(usage) ? 'class.inherit' : 'class.reference';
-                queue.push(...classReferences(subject, false));
+            case 'class':
+                reach(...classReferences(subject, false));
                 if (inherits(usage)) {
-                    queue.push(...classReferences(subject, true));
+                    reach(...classReferences(subject, true));
                     for (const method of subject.analysis.requirements.values())
-                        queue.push({
+                        reach({
                             coordinate: methodCoordinate(method.owner, method.name),
                             usage: usageOf(subject.schema, 'abstract', coordinate.key),
                         });
                 }
-                break;
-            }
+                return inherits(usage) ? 'class.inherit' : 'class.reference';
             case 'property':
-                facet = 'property';
-                queue.push(...valueReferences(subject));
-                break;
-            case 'method': {
-                facet = usage.relation === 'abstract' ? 'method.inheritance' : 'method.existence';
-                if (facet === 'method.inheritance')
-                    queue.push(...callableReferences(subject));
-                break;
-            }
-            case 'member': {
-                facet =
-                    subject.coordinate.ref.kind === 'function'
-                        ? 'function.existence'
-                        : subject.coordinate.ref.kind;
-                if (facet !== 'function.existence')
-                    queue.push(...memberReferences(subject));
-            }
+                reach(...valueReferences(subject));
+                return 'property';
+            case 'method':
+                if (usage.relation !== 'abstract')
+                    return 'method.existence';
+                reach(...callableReferences(subject));
+                return 'method.inheritance';
+            case 'member':
+                if (subject.coordinate.ref.kind === 'function')
+                    return 'function.existence';
+                reach(...memberReferences(subject));
+                return subject.coordinate.ref.kind;
         }
-        if (Key.origin(coordinate.key) !== context.source.origin)
-            continue;
-        // Class membership does not establish an invocation dependency. Explicit member selection,
-        // a Method the dependent declares as a capability, and inherited abstract obligations do.
-        const required = facet !== 'method.existence' ||
-            usage.relation === 'selection' ||
-            usage.relation === 'capability';
-        report.record({
-            pair,
-            facet,
-            ...compareFacet({ context, pair, facet }),
-            ...(required ? { requirement: { kind: facet } } : {}),
-        });
-        if (facet === 'class.inherit')
-            compareAddedProperties({ context, pair, report });
-        if (subject.kind === 'class')
-            compareLostProperties({ pair, report });
-    }
+    }, 
+    // Class membership does not establish an invocation dependency. Explicit member selection,
+    // a Method the dependent declares as a capability, and inherited abstract obligations do.
+    (facet, usage) => facet !== 'method.existence' ||
+        usage.relation === 'selection' ||
+        usage.relation === 'capability');
     compareReliance({ context, report });
     compareExtension({ context, report });
 }

package/dist/v1/schema/compatibility/walk.d.ts

@@ -0,0 +1,17 @@
+import type { Usage } from './model.js';
+import type { Reference } from './references.js';
+import type { Report } from './report.js';
+import type { ComparisonContext } from './scope.js';
+import type { ResolvedSubject } from './subjects.js';
+import { compareFacet } from './comparators/index.js';
+type WalkedFacet = Parameters<typeof compareFacet>[0]['facet'];
+/**
+ * Follow the reference closure from the roots once per coordinate and usage relation. `expand`
+ * names the facet a reached subject is compared under and `reach`es what it references; a subject
+ * of the compared origin is then recorded, as a requirement when `required` says so.
+ */
+export declare function walkReferences({ context, report }: {
+    readonly context: ComparisonContext;
+    readonly report: Report;
+}, expand: (subject: ResolvedSubject, reference: Reference, reach: (...references: readonly Reference[]) => void) => WalkedFacet, required?: (facet: WalkedFacet, usage: Usage) => boolean): void;
+export {};

package/dist/v1/schema/compatibility/walk.js

@@ -0,0 +1,41 @@
+import { Key } from '../../addressing/index.js';
+import { compareAddedProperties, compareLostProperties } from './comparators/classes.js';
+import { compareFacet } from './comparators/index.js';
+import { contextInvalid } from './context.js';
+/**
+ * Follow the reference closure from the roots once per coordinate and usage relation. `expand`
+ * names the facet a reached subject is compared under and `reach`es what it references; a subject
+ * of the compared origin is then recorded, as a requirement when `required` says so.
+ */
+export function walkReferences({ context, report }, expand, required = () => true) {
+    const queue = [...context.roots];
+    const reach = (...references) => {
+        queue.push(...references);
+    };
+    const visited = new Set();
+    for (const reference of queue) {
+        report.note(reference);
+        const { coordinate, usage } = reference;
+        const visit = `${coordinate.key}:${usage.relation}`;
+        if (visited.has(visit))
+            continue;
+        visited.add(visit);
+        const pair = context.pair(coordinate);
+        const subject = pair.source;
+        if (subject === undefined)
+            throw contextInvalid(`Retained acceptance context has no meaning for ${coordinate.key}.`, coordinate.key);
+        const facet = expand(subject, reference, reach);
+        if (Key.origin(coordinate.key) !== context.source.origin)
+            continue;
+        report.record({
+            pair,
+            facet,
+            ...compareFacet({ context, pair, facet }),
+            ...(required(facet, usage) ? { requirement: { kind: facet } } : {}),
+        });
+        if (facet === 'class.inherit')
+            compareAddedProperties({ context, pair, report });
+        if (subject.kind === 'class')
+            compareLostProperties({ pair, report });
+    }
+}

package/dist/v1/schema/diagnostic.d.ts

@@ -1,11 +1,25 @@
-export type SchemaDiagnosticCode = 'DM_CAPABILITY_INVALID' | 'DM_MEMBER_ROOT_INVALID' | 'DM_DEPENDENCY_CONTEXT_INVALID' | 'DM_DEPENDENCY_NOT_RETAINED' | 'DM_MEANING_INCONSISTENT' | 'DM_MEMBER_ORIGIN_MISMATCH' | 'DV_ACCEPTANCE_CONTEXT' | 'DV_CALLABLE_ADMISSION' | 'DV_CALLABLE_AUTH' | 'DV_CALLABLE_IO' | 'DV_CALLABLE_POLICY_AUTH' | 'DV_CLASS_ABSTRACT' | 'DV_CLASS_ACYCLIC' | 'DV_CLASS_INHERITANCE' | 'DV_CLASS_KIND' | 'DV_CORE_EDGE_CLASS' | 'DV_CORE_EDGE_CONSTRAINTS' | 'DV_CORE_EDGE_KEY' | 'DV_CORE_EDGE_PROPERTIES' | 'DV_CORE_EDGE_UNIQUE' | 'DV_CORE_NODE_CLASS' | 'DV_CORE_NODE_PROPERTIES' | 'DV_CORE_NODE_UNIQUE' | 'DV_CORE_REF' | 'DV_DATA_COMPOSITION' | 'DV_DEPENDENCY_ACYCLIC' | 'DV_DEPENDENCY_DIRECT' | 'DV_DEPENDENCY_EXACT' | 'DV_DEPENDENCY_LIMITS' | 'DV_DEPENDENCY_REVISION_COHERENCE' | 'DV_DEPENDENCY_UNIQUE' | 'DV_EDGE_ACCEPTS' | 'DV_EDGE_CLASS_COMPOSITION' | 'DV_EDGE_CONSTRAINT' | 'DV_EDGE_FOREIGN_MINIMUM' | 'DV_EDGE_LIFETIME' | 'DV_EDGE_ROLE' | 'DV_EDGE_UNDIRECTED' | 'DV_EDGE_UNIQUE' | 'DV_ENTRYPOINT' | 'DV_JSON_VALUE' | 'DV_METHOD_ABSTRACT' | 'DV_METHOD_COMPOSITION' | 'DV_NODE_UNIQUE' | 'DV_PROPERTY_AUTO' | 'DV_PROPERTY_COMPOSITION' | 'DV_PROPERTY_IMMUTABLE' | 'DV_PROPERTY_STATE' | 'DV_REF_RESOLVES' | 'DV_VALUE_SCHEMA' | 'PL_BUDGET' | 'PL_COMPOSITION' | 'PL_CONNECTIVITY' | 'PL_REF' | 'PL_REPEAT' | 'PL_TARGET' | 'PL_TYPING' | 'PL_USE' | 'PL_VARIABLE_SCOPE' | 'STRUCTURE_ABSTRACT_POLICY' | 'STRUCTURE_CALLABLE_POLICY_AUTH' | 'STRUCTURE_DUPLICATE_ITEM' | 'STRUCTURE_EDGE_ORIENTATION' | 'STRUCTURE_FORMAT' | 'STRUCTURE_INVALID' | 'STRUCTURE_KEY' | 'STRUCTURE_MAXIMUM' | 'STRUCTURE_MINIMUM' | 'STRUCTURE_MULTIPLE' | 'STRUCTURE_REQUIRED' | 'STRUCTURE_TYPE' | 'STRUCTURE_UNION' | 'STRUCTURE_UNKNOWN_FIELD' | 'STRUCTURE_VALUE' | 'UNSUPPORTED_DOCUMENT_FORMAT' | 'UNSUPPORTED_DSL_VERSION';
-export interface SchemaDiagnostic<out Code extends SchemaDiagnosticCode = SchemaDiagnosticCode> {
+import type { DiagnosticCode as LanguageDiagnosticCode } from '../language/validation/diagnostic.js';
+import type { Diagnostic as LanguageDiagnostic } from '../language/validation/diagnostic.js';
+import type { DiagnosticCode as CompatibilityDiagnosticCode } from './compatibility/model.js';
+/** The codes a Schema document is refused with, one per rule of `RULES`. */
+export type SchemaDiagnosticCode = 'DV_ACCEPTANCE_CONTEXT' | 'DV_CALLABLE_ADMISSION' | 'DV_CALLABLE_AUTH' | 'DV_CALLABLE_IO' | 'DV_CLASS_ABSTRACT' | 'DV_CLASS_ACYCLIC' | 'DV_CLASS_INHERITANCE' | 'DV_CLASS_KIND' | 'DV_CORE_EDGE_CLASS' | 'DV_CORE_EDGE_CONSTRAINTS' | 'DV_CORE_EDGE_KEY' | 'DV_CORE_EDGE_PROPERTIES' | 'DV_CORE_EDGE_UNIQUE' | 'DV_CORE_NODE_CLASS' | 'DV_CORE_NODE_PROPERTIES' | 'DV_CORE_NODE_UNIQUE' | 'DV_CORE_REF' | 'DV_DATA_COMPOSITION' | 'DV_DEPENDENCY_ACYCLIC' | 'DV_DEPENDENCY_DIRECT' | 'DV_DEPENDENCY_EXACT' | 'DV_DEPENDENCY_LIMITS' | 'DV_DEPENDENCY_REVISION_COHERENCE' | 'DV_DEPENDENCY_UNIQUE' | 'DV_EDGE_ACCEPTS' | 'DV_EDGE_CLASS_COMPOSITION' | 'DV_EDGE_FOREIGN_MINIMUM' | 'DV_EDGE_LIFETIME' | 'DV_EDGE_ROLE' | 'DV_EDGE_UNIQUE' | 'DV_ENTRYPOINT' | 'DV_JSON_VALUE' | 'DV_METHOD_ABSTRACT' | 'DV_METHOD_COMPOSITION' | 'DV_NODE_UNIQUE' | 'DV_PROPERTY_AUTO' | 'DV_PROPERTY_IMMUTABLE' | 'DV_PROPERTY_STATE' | 'DV_REF_RESOLVES' | 'DV_VALUE_SCHEMA' | 'PL_BUDGET' | 'PL_COMPOSITION' | 'PL_CONNECTIVITY' | 'PL_REF' | 'PL_REPEAT' | 'PL_TARGET' | 'PL_TYPING' | 'PL_USE' | 'PL_VARIABLE_SCOPE' | 'STRUCTURE_BINARY_INPUT' | 'STRUCTURE_CALLABLE_POLICY_AUTH' | 'STRUCTURE_DEPENDENCY_ALIAS' | 'STRUCTURE_DOMAIN_NAME' | 'STRUCTURE_DUPLICATE_ITEM' | 'STRUCTURE_EDGE_BLOB' | 'STRUCTURE_EDGE_ORIENTATION' | 'STRUCTURE_FORMAT' | 'STRUCTURE_KEY' | 'STRUCTURE_MAXIMUM' | 'STRUCTURE_MINIMUM' | 'STRUCTURE_PROPERTY_KEY' | 'STRUCTURE_PROTO_KEY' | 'STRUCTURE_REQUIRED' | 'STRUCTURE_STATE_TRANSITIONS' | 'STRUCTURE_TYPE' | 'STRUCTURE_UNION' | 'STRUCTURE_UNKNOWN_FIELD' | 'STRUCTURE_VALUE' | 'UNSUPPORTED_DOCUMENT_FORMAT' | 'UNSUPPORTED_DSL_VERSION';
+/**
+ * A Schema refuses a document with its own codes, and a comparison request with the
+ * compatibility codes. `pointer` names the position the refused rule applies to, in the document
+ * or in the request; it is empty, the root, only when text does not parse or the document is not
+ * an object.
+ */
+export interface SchemaDiagnostic<out Code extends SchemaDiagnosticCode | CompatibilityDiagnosticCode = SchemaDiagnosticCode | CompatibilityDiagnosticCode> {
     readonly code: Code;
     readonly pointer: string;
     readonly message: string;
     readonly ref?: string;
+    /** The code of the value-language refusal the diagnostic carries; its message is the message. */
+    readonly valueCode?: LanguageDiagnosticCode;
 }
-export declare function diagnostic<const Code extends SchemaDiagnosticCode>(code: Code, pointer: string, message: string, ref?: string): SchemaDiagnostic<Code>;
+export declare function diagnostic<const Code extends SchemaDiagnosticCode | CompatibilityDiagnosticCode>(code: Code, pointer: string, message: string, ref?: string): SchemaDiagnostic<Code>;
+/** A Schema diagnostic carrying one value-language refusal, at its position and with its code. */
+export declare function valueDiagnostic<const Code extends SchemaDiagnosticCode>(code: Code, refusal: LanguageDiagnostic): SchemaDiagnostic<Code>;
 export declare class SchemaError extends Error {
     readonly diagnostics: readonly SchemaDiagnostic[];
     constructor(diagnostics: readonly SchemaDiagnostic[]);

package/dist/v1/schema/diagnostic.js

@@ -1,21 +1,24 @@
-import { compareUnicode } from '../addressing/ordering.js';
+import { formatDiagnostics, orderDiagnostics } from '../language/validation/diagnostic.js';
 export function diagnostic(code, pointer, message, ref) {
     return Object.freeze({ code, pointer, message, ...(ref === undefined ? {} : { ref }) });
 }
+/** A Schema diagnostic carrying one value-language refusal, at its position and with its code. */
+export function valueDiagnostic(code, refusal) {
+    const { pointer, message, ref } = refusal;
+    return Object.freeze({
+        code,
+        pointer,
+        message,
+        ...(ref === undefined ? {} : { ref }),
+        valueCode: refusal.code,
+    });
+}
 export class SchemaError extends Error {
     diagnostics;
     constructor(diagnostics) {
-        const ordered = [...diagnostics].sort(compareDiagnostic);
-        super(ordered.map(formatDiagnostic).join('\n'));
+        const ordered = orderDiagnostics(diagnostics);
+        super(formatDiagnostics(ordered));
         this.name = 'SchemaError';
         this.diagnostics = Object.freeze(ordered);
     }
 }
-function compareDiagnostic(left, right) {
-    return (compareUnicode(left.pointer, right.pointer) ||
-        compareUnicode(left.code, right.code) ||
-        compareUnicode(left.message, right.message));
-}
-function formatDiagnostic(value) {
-    return `${value.pointer || '/'} [${value.code}] ${value.message}`;
-}

package/dist/v1/schema/index.d.ts

@@ -1,7 +1,7 @@
 /** Admit, encode, inspect, and semantically resolve canonical V1 DomainSchemas. */
 import type { SourceDomain } from '../domain/index.js';
 import type { DomainSchema } from './model/schema.js';
-export type { DomainSchema, DomainSchemaIR, DomainOfSchema as DomainOf } from './model/schema.js';
+export type { DomainSchema, DomainSchemaIR, DomainSchemaDocument as Document, DomainOfSchema as DomainOf, } from './model/schema.js';
 export type ResolvedDomainOf<Schema extends DomainSchema> = SourceDomain<Schema>;
 export interface Resolve {
     <const Schema extends DomainSchema>(schema: Schema): ResolvedDomainOf<Schema>;
@@ -20,6 +20,8 @@ export { compile, load } from '../compiled/index.js';
 export type { CompiledSchema, DomainOfCompiled } from '../compiled/index.js';
 export { SchemaError as Error } from './diagnostic.js';
 export type { SchemaDiagnostic as Diagnostic } from './diagnostic.js';
+export { RULES } from './rule.js';
+export type { SchemaRule as Rule, SchemaRuleStage as RuleStage } from './rule.js';
 export type { DomainSchemaLookup as Lookup } from './dependency/lookup.js';
 export type { DomainSchemaHeader as Header } from './codec/header.js';
 export type { DomainDependency } from '../addressing/index.js';

package/dist/v1/schema/index.js

@@ -10,5 +10,6 @@ export { header } from './codec/header.js';
 export { DOMAIN_FORMAT as FORMAT, DOMAIN_VERSION as VERSION } from './model/format.js';
 export { compile, load } from '../compiled/index.js';
 export { SchemaError as Error } from './diagnostic.js';
+export { RULES } from './rule.js';
 /** The versioned value-schema grammar embedded in declarations. */
 export * as values from './validation/value-api.js';

package/dist/v1/schema/model/schema.d.ts

@@ -1,8 +1,10 @@
-import type { Key } from '../../addressing/index.js';
+import type { Value as JsonValue } from '@astrale-os/kernel-dsl/value';
+import type { Key, Revision } from '../../addressing/index.js';
 import type { DomainDependencyMap, ViewRef } from '../../addressing/index.js';
 import type { Domain, DomainOfSource, DomainSource } from '../../domain/model/domain.js';
 import type { FunctionDefinition } from '../../language/callable/model/callable.js';
 import type { ClassDefinition } from '../../language/class/model/class.js';
+import type { PropertyValues } from '../../language/class/property-values.js';
 import type { CoreContent } from '../../language/core/model/core.js';
 import type { PolicyDefinition } from '../../language/policy/model/policy.js';
 import type { ViewDefinition } from '../../language/view/model/view.js';
@@ -21,6 +23,22 @@ export interface DomainSchemaIR {
     readonly views: Readonly<Record<string, ViewDefinition>>;
     readonly core: CoreContent;
 }
+/**
+ * The JSON document of a Domain schema, as tools write and exchange it: `DomainSchemaIR` without
+ * its in-process proofs. The structure the Kernel enforces has this type, which the build checks
+ * (`validation/domain.structure.typecheck.ts`), and the published JSON Schema describes it.
+ */
+export type DomainSchemaDocument = DocumentOf<DomainSchemaIR>;
+/**
+ * The JSON document a model type describes. A `Revision` and `PropertyValues` are in-process
+ * proofs: the document carries them as plain text and plain values.
+ */
+export type DocumentOf<Model> = [JsonValue] extends [Model] ? Model : DocumentOfEach<Model>;
+type DocumentOfEach<Model> = Model extends Revision ? string : Model extends PropertyValues ? {
+    readonly [Key in keyof Model as Key extends string ? Key : never]: DocumentOf<Model[Key]>;
+} : Model extends string | number | boolean | null | undefined ? Model : {
+    readonly [Key in keyof Model]: DocumentOf<Model[Key]>;
+};
 declare const DOMAIN_SCHEMA_BRAND: unique symbol;
 /**
  * Accepted canonical schema carrying its exact resolved Domain projection.

package/dist/v1/schema/normalization/domain.js

@@ -172,6 +172,7 @@ function canonicalizeProperty(value) {
             ? {}
             : {
                 auto: {
+                    // The distinct events of a non-empty list are a non-empty list.
                     on: [...new Set(value.auto.on)].sort(compareUnicode),
                     set: value.auto.set,
                 },

package/dist/v1/schema/resolution/closure.js

@@ -20,8 +20,9 @@ export function requireDomainClosure(schema) {
     const closure = knownDomainClosure(schema);
     if (closure !== undefined)
         return closure;
+    // What the value lacks is the exact closure of its dependencies, retained only by acceptance.
     throw new SchemaError([
-        diagnostic('DV_ACCEPTANCE_CONTEXT', '', `DomainSchema ${schema.origin} has no retained acceptance context; accept it again against its exact lookup.`),
+        diagnostic('DV_ACCEPTANCE_CONTEXT', '/dependencies', `DomainSchema ${schema.origin} has no retained acceptance context; accept it again against its exact lookup.`),
     ]);
 }
 export function lookupForDomainClosure(schema) {

package/dist/v1/schema/resolution/context.js

@@ -1,6 +1,7 @@
 import { dependencyLimits } from '../../addressing/domain-dependency.js';
 import { definitionRefIndex } from '../../addressing/ordering.js';
 import { DOMAIN_REVISION_PATTERN } from '../../addressing/patterns.js';
+import { escapePointerToken } from '../../language/value/syntax/pointer.js';
 import { revisionOfDomainSchema } from '../canonical/revision.js';
 import { diagnostic } from '../diagnostic.js';
 import { indexSchemaDefinitions } from './definition.index.js';
@@ -14,7 +15,7 @@ export function buildDomainResolutionContext(candidate, lookup) {
         diagnostics.push(diagnostic('DV_DEPENDENCY_LIMITS', '/dependencies', `A Domain may declare at most ${dependencyLimits.direct} direct dependency aliases.`));
     }
     for (const [alias, dependency] of Object.entries(candidate.dependencies)) {
-        const pointer = `/dependencies/${escapeToken(alias)}`;
+        const pointer = `/dependencies/${escapePointerToken(alias)}`;
         if (!DOMAIN_REVISION_PATTERN.test(dependency.revision))
             continue;
         if (dependency.origin === candidate.origin) {
@@ -94,7 +95,7 @@ function loadDependencyClosure(candidate, dependencies, lookup, diagnostics) {
             continue;
         }
         const [alias, dependency] = edge;
-        const pointer = frames.length === 1 ? `/dependencies/${escapeToken(alias)}` : '/dependencies';
+        const pointer = frames.length === 1 ? `/dependencies/${escapePointerToken(alias)}` : '/dependencies';
         if (activeOrigins.has(dependency.origin)) {
             diagnostics.push(diagnostic('DV_DEPENDENCY_ACYCLIC', pointer, `Dependency cycle reaches ${dependency.origin}.`));
             continue;
@@ -146,13 +147,12 @@ function loadDependencyClosure(candidate, dependencies, lookup, diagnostics) {
     }
 }
 function validateDependencyUse(candidate, directOrigins, diagnostics) {
+    // Each reference that cannot resolve is reported where it is written; the dependency it lacks
+    // belongs in the dependency map.
     const used = collectUsedForeignOrigins(candidate);
     for (const origin of used) {
         if (!directOrigins.has(origin)) {
-            diagnostics.push(diagnostic('DV_DEPENDENCY_DIRECT', '', `Foreign origin ${origin} is referenced without an exact direct dependency.`));
+            diagnostics.push(diagnostic('DV_DEPENDENCY_DIRECT', '/dependencies', `Foreign origin ${origin} is referenced without an exact direct dependency.`));
         }
     }
 }
-function escapeToken(value) {
-    return value.replaceAll('~', '~0').replaceAll('/', '~1');
-}