Tests in interpretation

This commit is contained in:
Dmitry Boulytchev 2018-04-03 07:21:59 +03:00
parent b4f6f48e30
commit 44b8a96e34
9 changed files with 89 additions and 53 deletions

14
regression/test031.expr Normal file
View file

@ -0,0 +1,14 @@
fun fact (n) {
if n <= 1
then return 1
else
return n * fact (n-1)
fi
}
read (n);
for i := n, i >= 1, i := i-1 do
write (i);
write (fact (i))
od