dope2/primitives/byte.js

15 lines
562 B
JavaScript

import { fnType } from "../type_registry.js";
import {Type, Function} from "../metacircular.js";
import {Byte, Bool} from "./symbols.js";
const eqByte = x => y => x === y;
const Byte_to_Bool = fnType({in: Byte, out: Bool});
const Byte_to_Byte_to_Bool = fnType({in: Byte, out: Byte_to_Bool});
export const ModuleByte = {l:[
{i: Byte , t: Type },
{i: Byte_to_Bool , t: Function },
{i: Byte_to_Byte_to_Bool , t: Function },
{i: eqByte , t: Byte_to_Byte_to_Bool },
]};