diff options
Diffstat (limited to 'tiger-compiler/tests/good/fact.tig')
| -rw-r--r-- | tiger-compiler/tests/good/fact.tig | 11 |
1 files changed, 11 insertions, 0 deletions
diff --git a/tiger-compiler/tests/good/fact.tig b/tiger-compiler/tests/good/fact.tig new file mode 100644 index 0000000..e146034 --- /dev/null +++ b/tiger-compiler/tests/good/fact.tig @@ -0,0 +1,11 @@ +/* define a recursive function */ +let + /* calculate n! */ + function fact(n : int) : int = + if n = 0 + then 1 + else n * fact(n - 1) +in + print_int(fact(10)); + print("\n") +end |