M2compiler-V1/tests/w_str2.mod

MODULE WStr2;
VAR s : ARRAY [1 .. 10] OF CHAR; ExitCode : INTEGER;
BEGIN
  s := "ok";
  WriteString(s);
  WriteInt(8);
  ExitCode := 3
END WStr2.