Program returns "Prelude.(!!): index too large" when multiple variable lines are declared

[iduhetonas]

Here is the code that was run.

program Program1;
  var A : integer;
    Fred : integer;
    begin
      A := 1;
    end.