mirror of
https://github.com/ProgramSnail/Lama.git
synced 2025-12-06 06:48:48 +00:00
Massive renaming
This commit is contained in:
parent
241ab0a9ae
commit
61296c51e7
152 changed files with 45 additions and 29 deletions
40
regression/test046.lama
Normal file
40
regression/test046.lama
Normal file
|
|
@ -0,0 +1,40 @@
|
|||
local n;
|
||||
|
||||
n := read ();
|
||||
|
||||
case 3 of
|
||||
a -> write (a)
|
||||
| _ -> write (0)
|
||||
esac;
|
||||
|
||||
case 3 of
|
||||
a -> write (a)
|
||||
esac;
|
||||
|
||||
case 3 of
|
||||
a@_ -> write (a)
|
||||
esac;
|
||||
|
||||
case A (1, 2, 3) of
|
||||
A -> write (1)
|
||||
| a@A (_, _, _) -> case a of
|
||||
A (x, y, z) -> write (x); write (y); write (z)
|
||||
esac
|
||||
esac;
|
||||
|
||||
case A (1, 2, 3, 4, 5) of
|
||||
A -> write (0)
|
||||
| A (_) -> write (1)
|
||||
| A (_, _) -> write (2)
|
||||
| A (_, _, _) -> write (3)
|
||||
| A (_, _, _, _) -> write (4)
|
||||
| A (_, _, _, _, _) -> write (5)
|
||||
esac;
|
||||
|
||||
write (A (1, 2, 3, 4, 5).length);
|
||||
|
||||
write (A (1, 2, 3, 4, 5)[0]);
|
||||
write (A (1, 2, 3, 4, 5)[1]);
|
||||
write (A (1, 2, 3, 4, 5)[2]);
|
||||
write (A (1, 2, 3, 4, 5)[3]);
|
||||
write (A (1, 2, 3, 4, 5)[4])
|
||||
Loading…
Add table
Add a link
Reference in a new issue