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

Pattern matching in X86

Browse source
This commit is contained in:
Dmitry Boulytchev 2018-05-16 16:50:36 +03:00 • committed by danyaberezun
parent 9f8391607d
commit bbe403de26
18 changed files with 179 additions and 3 deletions
Download patch file Download diff file Expand all files Collapse all files

12
regression/test043.expr Normal file
View file

@ -0,0 +1,12 @@
fun sum (x) {
case x of
`nil -> return 0
| `cons (x, tl) -> return x + sum (tl)
esac
}
x := read ();
write (sum (`nil));
write (sum (`cons (100, `nil)));
write (sum (`cons (100, `cons (200, `nil))))