lama_byterun/regression/test026.expr

local x, a, b, c;

fun test1 (a) {
  write (a);
  print ()
}

fun test2 (b) {
  write (b);
  print ()
}

fun test3 (c) {
  write (c);
  print ()
}

fun print () {
  write (a);
  write (b);
  write (c)
}

x := read ();

a := 100;
b := 200;
c := 300;

test1 (1);
print ();
test2 (2);
print ();
test3 (3);
print ()