MODULE WIo;
VAR ExitCode : INTEGER;
BEGIN
  WriteString("hi");
  WriteInt(42);
  ExitCode := 7
END WIo.