lama_byterun/regression/test041.expr
2019-09-19 18:37:08 +03:00

13 lines
No EOL
178 B
Text

global x;
fun f (a) {
case a of
A (x, y, z) -> write (x + y + z)
| B (x, y, z) -> write (x + y + z)
esac
}
x := read ();
f (A (100, 200, 300));
f (B (500, 600, 700))