61 lines
2.2 KiB
TypeScript
61 lines
2.2 KiB
TypeScript
import { SimpleType, Type } from "./type";
|
|
import { anglebrackets, braces, Item, keyvalue, opseq, seq } from "./block";
|
|
import { ModuleContext } from "./context";
|
|
|
|
export function variantInitFor(variantName: string | undefined) : Item[] {
|
|
return variantName === void 0 ? [] : [variantFor(variantName)];
|
|
}
|
|
|
|
export function variantFor(variantName: string): Item {
|
|
return keyvalue('_variant', JSON.stringify(variantName));
|
|
}
|
|
|
|
export function renderVariant(ctxt: ModuleContext, [variantName, t]: [string, SimpleType]): Item {
|
|
let fields: Item[];
|
|
switch (t.kind) {
|
|
case 'unit':
|
|
fields = [];
|
|
break;
|
|
case 'ref':
|
|
case 'set':
|
|
case 'dictionary':
|
|
case 'array':
|
|
fields = [keyvalue('value', renderType(ctxt, t))];
|
|
break;
|
|
case 'record':
|
|
fields = Array.from(t.fields).map(([nn, tt]) => keyvalue(nn, renderType(ctxt, tt)));
|
|
break;
|
|
default:
|
|
((_: never) => {})(t);
|
|
throw new Error("Unreachable");
|
|
}
|
|
return braces(variantFor(variantName), ... fields);
|
|
}
|
|
|
|
export function renderType(ctxt: ModuleContext, t: Type): Item {
|
|
switch (t.kind) {
|
|
case 'union': return opseq('never', ' | ', ...
|
|
Array.from(t.variants).flatMap(entry => renderVariant(ctxt, entry)));
|
|
case 'unit': return 'null';
|
|
case 'ref':
|
|
if (t.ref === null && t.typeName === '_embedded') {
|
|
return t.typeName;
|
|
} else {
|
|
return seq(t.typeName, ctxt.genericArgsFor(t));
|
|
}
|
|
case 'set': return seq('_.KeyedSet', anglebrackets(
|
|
renderType(ctxt, t.type),
|
|
'_embedded'));
|
|
case 'dictionary': return seq('_.KeyedDictionary', anglebrackets(
|
|
renderType(ctxt, t.key),
|
|
renderType(ctxt, t.value),
|
|
'_embedded'));
|
|
case 'array': return seq('Array', anglebrackets(renderType(ctxt, t.type)));
|
|
case 'record': return braces(... Array.from(t.fields).map(([nn, tt]) =>
|
|
keyvalue(nn, renderType(ctxt, tt))));
|
|
default:
|
|
((_: never) => {})(t);
|
|
throw new Error("Unreachable");
|
|
}
|
|
}
|