st/lama_byterun
1
0
Fork 0
mirror of https://github.com/ProgramSnail/Lama.git synced 2025-12-30 02:28:27 +00:00
Code Issues Projects Releases Packages Wiki Activity Actions

Moved x86only tests into stdlib/regression

Browse source
This commit is contained in:
Dmitry Boulytchev 2020-03-22 21:58:11 +03:00
parent e4b34a3ec1
commit eeab48ed33
39 changed files with 10 additions and 59 deletions
Download patch file Download diff file Expand all files Collapse all files

19
regression/x86only/test001.lama
View file

@ -1,19 +0,0 @@
fun insert (tree, value) {
case tree of
Empty -> return Node (value, Empty, Empty)
| Node (x, left, right) ->
if x > value
then return Node (x, insert (left, value), right)
else return Node (x, left, insert (right, value))
fi
esac
}
local i, tree = Empty;
for i := 0, i <= 10, i := i+1 do
printf ("%s\n", tree.string);
tree := insert (tree, i)
od;
printf ("%s\n", tree.string)