Massive renaming

This commit is contained in:
Dmitry Boulytchev 2020-02-16 00:21:15 +03:00
parent 241ab0a9ae
commit 61296c51e7
152 changed files with 45 additions and 29 deletions

19
regression/test042.lama Normal file
View file

@ -0,0 +1,19 @@
local x, y, i;
fun f (x) {
case x of
Nil -> write (0)
| Cons (_, Nil) -> write (1)
| Cons (_, Cons (_, Nil)) -> write (2)
| Cons (_, Cons (_, Cons (_, Nil))) -> write (3)
| _ -> write (4)
esac
}
x := read ();
y := Nil;
for i := 0, i < 10, i := i + 1 do
f (y);
y := Cons (i, y)
od