Improved timer example

Also pushed other half of system::fs rename
2023-10-12 17:41:27 +01:00
parent ff486a5f74
commit ce34777555
3 changed files with 15 additions and 14 deletions
--- a/examples/yes/main.orc
+++ b/examples/yes/main.orc
@@ -2,8 +2,9 @@ import system::async::(set_timer, yield)
 import system::io::(readln, println)
 import std::exit_status

-const main := (
-  set_timer true 1 (println "y" yield) \cancel.
-    readln \a.
-      cancel exit_status::success
-)
+const main := do{
+  cps cancel = set_timer true 1 (println "y" yield);
+  cps _ = readln;
+  cps cancel;
+  exit_status::success
+}