From e0bbcd3fb41b54f8d72bf2d08a592def2e44d3b7 Mon Sep 17 00:00:00 2001 From: Michael Williamson Date: Tue, 10 Dec 2024 23:22:20 +0000 Subject: Add disabled example for struct positional fields --- examples/28-effect-in-handler/src/Example.shed | 44 ++++++++++++++++++++++++++ 1 file changed, 44 insertions(+) create mode 100644 examples/28-effect-in-handler/src/Example.shed (limited to 'examples/28-effect-in-handler/src/Example.shed') diff --git a/examples/28-effect-in-handler/src/Example.shed b/examples/28-effect-in-handler/src/Example.shed new file mode 100644 index 00000000..568d9ea8 --- /dev/null +++ b/examples/28-effect-in-handler/src/Example.shed @@ -0,0 +1,44 @@ +effect A { + fun a() -> Unit; +} + +effect B { + fun b() -> Unit; +} + +pub fun main() ! Io -> Unit { + try { + A.a!(); + + try { + A.a!(); + + try { + B.b!(); + } handle B { + fun b() { + print!("b start\n"); + A.a!(); + print!("b end\n"); + resume; + } + } + + A.a!(); + } handle A { + fun a() { + print!("a inner start\n"); + A.a!(); + print!("a inner end\n"); + resume; + } + } + + A.a!(); + } handle A { + fun a() { + print!("a outer\n"); + resume; + } + } +} -- cgit v1.2.3