Sane parser rewrite

2026-05-16 14:29:35 -05:00
parent e2d035286d
commit 593aa96193
7 changed files with 469 additions and 315 deletions
--- a/demos/interactionTrees/forkAwait.tri
+++ b/demos/interactionTrees/forkAwait.tri
@@ -6,9 +6,9 @@
 -- fork spawns a concurrent task and returns a handle.
 -- await blocks until the task completes and returns its value.

-worker = (msg :
+worker = msg :
  bind (putStrLn (append "working: " msg)) (_ :
-  pure (append msg "-result")))
+  pure (append msg "-result"))

 main = io <|
  (bind (fork (worker "job1")) (h1 :