coem-lang · colevandersWands · Aug 7, 2024 · Aug 7, 2024 · Aug 7, 2024 · Aug 7, 2024
diff --git a/examples/be.coem b/examples/be.coem
@@ -0,0 +1,7 @@
+#as palimpsest
+
+let flag be black
+let flag be yellow
+let flag be red
+
+know—flag—
diff --git a/examples/briefly.coem b/examples/briefly.coem
@@ -0,0 +1,6 @@
+say—surrender—
+say—alabaster—
+let (switchblade|honeysuckle|goldenrod)
+say—autumn— † despite the green    in my eyes.
+say—beauty— † despite    daylight.
+say—“i’d kill for it”—
diff --git a/examples/cat-detected.be.coem b/examples/cat-detected.be.coem
@@ -0,0 +1,10 @@
+let (ch|k)at(|tze) be “🐈”
+
+let savoir be know
+savoir—chat is “🐈”—
+
+let weten be know
+weten—kat is “🐈”— 
+
+let wissen be know
+wissen—katze is “🐈”—
diff --git a/examples/cat-detector.be.coem b/examples/cat-detector.be.coem
@@ -0,0 +1,12 @@
+#in dialogue
+
+let cat be learn—“how you say 🐈”—
+
+if—cat is “chat”—:
+  know—“français”—.
+
+if—cat is “kat”—:
+  know—vlaamse—.
+
+if—cat is “katze”—:
+  know—Deutsche—.
diff --git a/examples/docks.coem b/examples/docks.coem
@@ -0,0 +1,6 @@
+let se(e|a) be “blue”
+let mis(t|sed) be “thick”
+let mou?rning be “dark”
+let me be nothing
+know—see, mist, morning—
+know—sea, missed, mourning—
diff --git a/examples/index.html b/examples/index.html
@@ -0,0 +1,38 @@
+<!DOCTYPE html>
+<html lang="en">
+  <head>
+    <meta charset="utf-8" />
+    <meta name="viewport" content="width=device-width, initial-scale=1" />
+    <title>coem-lang sandbox</title>
+  </head>
+  <body>
+    <main>
+      <button id="echo">echo</button>
+      <label for="debug">debug</label><input id="debug" type="checkbox" />
+
+      <br />
+
+      <textarea id="coem" rows="30" cols="60"></textarea>
+
+      <hr />
+
+      <pre id="echoed"></pre>
+    </main>
+
+    <script type="module">
+      import { run, Environment } from "../src/main.js";
+
+      echo.addEventListener("click", () => {
+        try {
+          const echoem = run(coem.value, new Environment(), debug.checked);
+          echoed.innerText = echoem;
+          console.log(echoem);
+        } catch (e) {
+          echoed.innerText =
+            e.msg + "\n\n(full error description is logged to the console)";
+          console.error(e);
+        }
+      });
+    </script>
+  </body>
+</html>
diff --git a/examples/index.js b/examples/index.js
@@ -0,0 +1,23 @@
+// $ .../index.js file-name.coem
+
+import { readFile } from "fs/promises";
+import { join } from "path";
+
+import { run, Environment } from "../src/main.js";
+
+const coemFileName = process.argv[2];
+
+if (!coemFileName) {
+  console.log("no coem file name provided");
+  process.exit();
+}
+
+const coem = await readFile(join(import.meta.dirname, coemFileName), "utf8");
+
+const debug = false;
+try {
+  const echo = run(coem, new Environment(), debug);
+  console.log(echo);
+} catch (e) {
+  console.error(e);
+}
diff --git a/examples/reminder.coem b/examples/reminder.coem
@@ -0,0 +1,9 @@
+† this is a reminder
+
+to breathe?——:
+    † in and out, and thus to
+    know—myself—.
+
+let me|myself|I be “present”
+if—I am “present”—:
+    let me be breath——.
diff --git a/examples/sleep.coem b/examples/sleep.coem
@@ -0,0 +1,6 @@
+to sl?eep—when—:
+    “dreams”.
+
+sleep—“now”—
+sleep—“never”—
+seep—“continually”—
diff --git a/examples/snail-train.coem b/examples/snail-train.coem
@@ -0,0 +1 @@
+print—“i_@”—
diff --git a/index.js → examples/test.coem b/index.js → examples/test.coem
@@ -1,8 +1,4 @@
-import { run, Environment } from './src/main.js';
-
-const debug = true;
-
-const source = `#as palimpsest
+#as palimpsest
 
 to conditional——:
     let tomorrow be not coming
@@ -28,29 +24,11 @@ to conditional——:
     let end be “watching the sky burn”.
 
 † conditional——
+
 say—“It doesn’t matter.”—
 say—“That would be enough.”—
 let this be “us alive”
 let this be “right here”
 let this be “feeling lucky”
 let you be wanting
-this`;
-
-function handleError(e, source = "") {
-  if (!e) return null;
-  console.error(e);
-}
-
-function handleOutput(...txt) {
-  console.log(...txt);
-}
-
-const browserEnv = new Environment();
-try {
-  // console.log(run(source, browserEnv, handleOutput, false));
-  let echo = run(source, browserEnv, debug);
-  console.log(echo);
-  handleError(null);
-} catch (e) {
-  handleError(e, source);
-}
+this
diff --git a/examples/woman.coem b/examples/woman.coem
@@ -0,0 +1,10 @@
+† based on Emmy Meli's “I Am Woman”
+
+#as palimpsest
+
+let I|me|myself be “woman”
+let me be “fearless”
+let me be “sexy”
+let me be “divine”
+
+know—myself—
diff --git a/src/environment.js b/src/environment.js
@@ -1,7 +1,7 @@
-import { runtimeError } from './errors.js';
+import { runtimeError } from "./errors.js";
+import { CoemCallable } from "./interpreter.js";
 
 class Environment {
-
   constructor(enclosing = null) {
     this.values = new Map();
     this.enclosing = enclosing;
@@ -42,6 +42,23 @@ class Environment {
       Environment.asPalimpsest = true;
       return;
     }
+    if (name === "in" && value.literal === "dialogue") {
+      let _prompt;
+
+      if (typeof globalThis.prompt === "function") {
+        _prompt = new CoemCallable(null, this.env);
+        _prompt.call = (interpreter, args, callee) => prompt(args.join(", "));
+      } else {
+        _prompt = new CoemCallable(null, this.env);
+        _prompt.call = (interpreter, args, callee) => args.join(", ");
+      }
+
+      this.setBuiltin("input", _prompt);
+      this.setBuiltin("learn", _prompt);
+      this.setBuiltin("listen", _prompt);
+
+      return;
+    }
 
     let pattern = new RegExp(name);
     let set = this.getSet(name);
@@ -81,4 +98,4 @@ class Environment {
 
 Environment.asPalimpsest = false;
 
-export { Environment };
+export { Environment };
diff --git a/src/interpreter.js b/src/interpreter.js
@@ -268,4 +268,4 @@ class Interpreter {
   }
 }
 
-export { Interpreter };
+export { Interpreter, CoemCallable };
-Original file line number
+Diff line change
@@ Expand Up / @@ -268,4 +268,4 @@ class Interpreter { @@
       }
     }
-    export { Interpreter };
+    export { Interpreter, CoemCallable };