M2compiler-V3/compiler/tests/g_ordprog.mod

MODULE OrdProg;
FROM IntBox IMPORT Box;
VAR b : Box; ExitCode : INTEGER;
BEGIN b[0] := 5; b[3] := 37; ExitCode := b[0] + b[3] END OrdProg.