syndicate-lang
/
preserves
mirror of https://gitlab.com/preserves/preserves.git
1
0
Fork 1
Code Releases Activity

Make Annotations preserveable

This commit is contained in:
Tony Garnock-Jones 2024-05-15 09:34:28 +02:00
parent 0533840bc0
commit 87ecdb7efe
1 changed files with 6 additions and 6 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
implementations/javascript/packages/core/src/pexpr.ts
View File

@ -82,6 +82,10 @@ export class BaseCompound<I> {
});
}
__as_preserve__(): Value {
return this.preservesValues();
}
map<R>(f: (item: Positioned<I>, index: number) => R, offset = 0): R[] {
const result: R[] = [];
for (let i = offset; i < this.exprs.length; i++) {
@ -106,11 +110,7 @@ export class BaseCompound<I> {
}
}
export class Document extends BaseCompound<Expr> {
__as_preserve__(): Value {
return this.preservesValues();
}
}
export class Document extends BaseCompound<Expr> {}
export class Annotations extends BaseCompound<SimpleExpr> {
wrap(v: Value): Value {
@ -352,4 +352,4 @@ export function asPreserves<T extends Embeddable>(
}
return walk(p);
}
}