From 6da602b0a29afcd2aa15725547375a80e30b3983 Mon Sep 17 00:00:00 2001 From: Marvin Borner Date: Wed, 27 Nov 2024 02:12:12 +0100 Subject: initial commit --- src/io.js | 9 +++++++++ 1 file changed, 9 insertions(+) create mode 100644 src/io.js (limited to 'src/io.js') diff --git a/src/io.js b/src/io.js new file mode 100644 index 0000000..27f46b6 --- /dev/null +++ b/src/io.js @@ -0,0 +1,9 @@ +import * as state from "./state.js" + +export const read = st => s => s(st)(st.read()) +export const write = ch => st => s => s(st)(st.write(ch)) + +export const unit = state.unit +export const bind = state.bind + +export const DO = state.DO -- cgit v1.2.3