mirror of
https://github.com/ProgramSnail/Lama.git
synced 2025-12-06 06:48:48 +00:00
Fixed bug in sexp arity
This commit is contained in:
parent
dc38319a13
commit
99fdd176f4
6 changed files with 42 additions and 31 deletions
|
|
@ -14,8 +14,17 @@ case 3 of
|
|||
esac;
|
||||
|
||||
case `a (1, 2, 3) of
|
||||
`b -> write (1)
|
||||
`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
|
||||
Loading…
Add table
Add a link
Reference in a new issue