11 lines
311 B
JavaScript
11 lines
311 B
JavaScript
import { typedFnType } from "../type_registry.js";
|
|
import {Type} from "../metacircular.js";
|
|
import {Char, Bool} from "./symbols.js";
|
|
|
|
const eq = x => y => x === y;
|
|
|
|
export const ModuleChar = {l:[
|
|
{i: Char, t: Type},
|
|
|
|
...typedFnType(eq, fnType => fnType({in: Char, out: fnType({in: Char, out: Bool})})),
|
|
]};
|