From 967be9e750221ab2ab783f95df79bb26d290a45e Mon Sep 17 00:00:00 2001
From: Martial Simon <msimon_fr@hotmail.com>
Date: Mon, 15 Sep 2025 01:07:58 +0200
Subject: add: added projects

---
 tiger-compiler/tests/good/mutually-recursive-procedures.tig | 12 ++++++++++++
 1 file changed, 12 insertions(+)
 create mode 100644 tiger-compiler/tests/good/mutually-recursive-procedures.tig

(limited to 'tiger-compiler/tests/good/mutually-recursive-procedures.tig')

diff --git a/tiger-compiler/tests/good/mutually-recursive-procedures.tig b/tiger-compiler/tests/good/mutually-recursive-procedures.tig
new file mode 100644
index 0000000..d1980fd
--- /dev/null
+++ b/tiger-compiler/tests/good/mutually-recursive-procedures.tig
@@ -0,0 +1,12 @@
+/* define valid mutually recursive procedures */
+let
+
+function do_nothing1(a : int, b : string)=
+                do_nothing2(a+1)
+
+function do_nothing2(d : int) =
+                if d < 10 then do_nothing1(d, "str")
+
+in
+        do_nothing1(0, "str2")
+end
-- 
cgit v1.2.3