summaryrefslogtreecommitdiff
path: root/tiger-compiler/tests/good/escapes_series.tig
diff options
context:
space:
mode:
Diffstat (limited to 'tiger-compiler/tests/good/escapes_series.tig')
-rw-r--r--tiger-compiler/tests/good/escapes_series.tig19
1 files changed, 19 insertions, 0 deletions
diff --git a/tiger-compiler/tests/good/escapes_series.tig b/tiger-compiler/tests/good/escapes_series.tig
new file mode 100644
index 0000000..d71a013
--- /dev/null
+++ b/tiger-compiler/tests/good/escapes_series.tig
@@ -0,0 +1,19 @@
+let
+ var i := 69
+ function print_a_number(k: int) = print_int(k)
+ function serial_print(value: int) = (print_a_number(value); print_a_number(i))
+ function conditional_print(value: int) = if (value <> 0) then print_a_number(value) else print_a_number(i)
+in
+ print_a_number(i);
+ print("\n");
+ serial_print(10);
+ print("\n");
+ serial_print(i);
+ print("\n");
+ conditional_print(0);
+ print("\n");
+ conditional_print(i);
+ print("\n");
+ conditional_print(68);
+ print("\n")
+end