M2compiler-V1/tests/d_from.mod

MODULE DFrom;
FROM DLib2 IMPORT Vec, Sum;
VAR a : Vec;
VAR ExitCode : INTEGER;
BEGIN
  a[1] := 1; a[2] := 2; a[3] := 3;
  ExitCode := Sum(a)
END DFrom.