From 027d73dea19c4154d27c77cd82dd4b28649cdf3f Mon Sep 17 00:00:00 2001 From: Michael Williamson Date: Sun, 12 Jan 2025 15:11:04 +0000 Subject: Support recursive project dependencies --- examples/29-effect-handler-nested/src/Example.shed | 42 ++++++++++++++++++++++ 1 file changed, 42 insertions(+) create mode 100644 examples/29-effect-handler-nested/src/Example.shed (limited to 'examples/29-effect-handler-nested/src/Example.shed') diff --git a/examples/29-effect-handler-nested/src/Example.shed b/examples/29-effect-handler-nested/src/Example.shed new file mode 100644 index 00000000..2a8e4781 --- /dev/null +++ b/examples/29-effect-handler-nested/src/Example.shed @@ -0,0 +1,42 @@ +effect A { + fun a() -> Unit; +} + +effect B { + fun b() -> Unit; +} + +pub fun main() ! Io -> Unit { + try { + A.a!(); + + try { + A.a!(); + + try { + A.a!(); + B.b!(); + A.a!(); + } handle B { + fun b() { + print!("b\n"); + resume; + } + } + + A.a!(); + } handle A { + fun a() { + print!("a inner\n"); + resume; + } + } + + A.a!(); + } handle A { + fun a() { + print!("a outer\n"); + resume; + } + } +} -- cgit v1.2.3