st/lama_byterun
1
0
Fork 0
mirror of https://github.com/ProgramSnail/Lama.git synced 2025-12-26 08:38:47 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Better value control

Browse source
This commit is contained in:
Dmitry Boulytchev 2019-04-10 22:15:08 +03:00
parent d8ddf25a7f
commit 9bec185603
14 changed files with 147 additions and 100 deletions
Download patch file Download diff file Expand all files Collapse all files

6
regression/test053.expr
View file

@ -16,14 +16,14 @@ infix "===" at "==" (v1, v2) local s1, s2, i {
infix "?" before "+" (v, l) {
case l of
{} -> return 0
| h : tl -> if h === v then return 1 else return v ? tl fi
| h : tl -> if h === v then return 1 else return (v ? tl) fi
esac
}
infix "+++" at "+" (l1, l2) {
case l1 of
{} -> return l2
| h : tl -> return h : tl +++ l2
| h : tl -> return (h : tl +++ l2)
esac
}
@ -35,5 +35,3 @@ write (1+2 ? {1, 2, 3});
write (1*3+2 ? {1, 2, 3});
write (1*3+2 ? {1, 2, 5});
write (8*4 ? {1, 2, 3} +++ {5, 7, 32, 6})