lama_byterun/regression/test045.expr
2019-03-07 19:06:04 +03:00

12 lines
No EOL
266 B
Text

fun printString (s) local i {
for i := 0, i < s.length, i := i + 1 do
write (s[i])
od
}
x := read ();
printString (1.string);
printString ("abc".string);
printString ([].string);
printString ([1, 2, 3].string);
printString (Cons (1, Cons (2, Nil)).string)