research/dope2
1
0
Fork 0
Code Issues Pull requests Projects Releases Packages Wiki Activity Actions

use static versioning module instead

Browse source
This commit is contained in:
Joeri Exelmans 2025-06-08 14:21:36 +02:00
parent 176bb5c109
commit 01dabaa219
3 changed files with 11 additions and 6 deletions
Download patch file Download diff file Expand all files Collapse all files

13
lib/stdlib.js
View file

@ -20,6 +20,9 @@ import { ModuleCompareDynamic } from "./compare/dynamic.types.js";
import { ModuleVersioning } from "./versioning/value_slot.js"; import { ModuleVersioning } from "./versioning/value_slot.js";
import { ModuleMerge } from "./versioning/merge.js"; import { ModuleMerge } from "./versioning/merge.js";
import { ModuleVersioningCompare } from "./versioning/compare.js"; import { ModuleVersioningCompare } from "./versioning/compare.js";
import { ModuleStaticVersioning } from "./versioning/static/value_slot.js";
import { ModuleStaticMerge } from "./versioning/static/merge.js";
import { ModuleStaticVersioningCompare } from "./versioning/static/compare.js";
export const ModuleStd = [ export const ModuleStd = [
// Symbols (for nominal types) // Symbols (for nominal types)
@ -52,7 +55,11 @@ export const ModuleStd = [
...ModuleCompareDynamic, ...ModuleCompareDynamic,
// Versioning // Versioning
...ModuleVersioning, // ...ModuleVersioning,
...ModuleMerge, // ...ModuleMerge,
...ModuleVersioningCompare, // ...ModuleVersioningCompare,
...ModuleStaticVersioning,
...ModuleStaticMerge,
...ModuleStaticVersioningCompare,
]; ];

2
lib/versioning/static/compare.js
View file

@ -46,7 +46,7 @@ const mkType = makeTypeParser({
], ],
}); });
export const ModuleVersioningCompare = [ export const ModuleStaticVersioningCompare = [
// comparison // comparison
["compareSlot" , newDynamic(compareSlot )(mkType("(a -> a -> Ordering) -> :=a=: -> :=a=: -> Ordering"))], ["compareSlot" , newDynamic(compareSlot )(mkType("(a -> a -> Ordering) -> :=a=: -> :=a=: -> Ordering"))],
["compareValue", newDynamic(compareValue)(mkType("(a -> a -> Ordering) -> *=a=* -> *=a=* -> Ordering"))], ["compareValue", newDynamic(compareValue)(mkType("(a -> a -> Ordering) -> *=a=* -> *=a=* -> Ordering"))],

2
lib/versioning/static/value_slot.js
View file

@ -130,5 +130,3 @@ export const ModuleStaticVersioning = [
["read" , newDynamic(read )(mkType(":=a=: -> *=a=*" ))], ["read" , newDynamic(read )(mkType(":=a=: -> *=a=*" ))],
["transform" , newDynamic(transform )(mkType("*=a=* -> *=(a->b)=* -> *=b=*"))], ["transform" , newDynamic(transform )(mkType("*=a=* -> *=(a->b)=* -> *=b=*"))],
]; ];