diff options
| author | Gustav Sörnäs <gustav@sornas.net> | 2021-03-05 19:07:13 +0100 |
|---|---|---|
| committer | Gustav Sörnäs <gustav@sornas.net> | 2021-03-05 19:07:13 +0100 |
| commit | 2570830850c6dadadc2c86bf9d6f3203c9aba488 (patch) | |
| tree | f6d00459337da26261c16e39cb4241be6441bfb4 /progs/tests/auto/factorial.sy | |
| parent | 9d0a930d811b825b39ee16614e645b6934130cc1 (diff) | |
| download | sylt-2570830850c6dadadc2c86bf9d6f3203c9aba488.tar.gz | |
convert tests to files
Diffstat (limited to 'progs/tests/auto/factorial.sy')
| -rw-r--r-- | progs/tests/auto/factorial.sy | 12 |
1 files changed, 12 insertions, 0 deletions
diff --git a/progs/tests/auto/factorial.sy b/progs/tests/auto/factorial.sy new file mode 100644 index 0000000..770bc33 --- /dev/null +++ b/progs/tests/auto/factorial.sy @@ -0,0 +1,12 @@ +factorial :: fn n: int -> int { + if n <= 1 { + ret 1 + } + ret n * factorial(n - 1) +} + +start :: fn { + factorial(5) <=> 120 + factorial(6) <=> 720 + factorial(12) <=> 479001600 +} |
