Compiler error with transferring dynamic arrays???

10 Jan 2000

      Hi all,

Is this a compiler error or a programming error we I get junk in B in =the
procedure the values are good enough. see below.

program

  Type
      MyArray ( m, n ) = array [ 1..m, 1..n ] of Integer;

    Var
      B: ^MyArray;

    [...]
 Procedure BuildArray(var NewArray : MyArray; k: Integer);
   begin

    New ( NewArray, k, k);
    [...]
    For i := 1 to k
    NewArray^[3 ,k ]:= i+k;
    [...]
  end;

begin
 buildArray(B, 10);
 For i := 1 to 10
  begin
   Writeln(b^[3,i];
  end;

Dispose ( B );
    [...]
end.

Klaus F. Østergaard
Laser Technical Services A/S
Sneppevang 3
3450 Allerød
tel +45 48 17 61 61
fax +45 48 17 10 65
e-mail Laser@lasertech.dk

Compiler error with transferring dynamic arrays???

Klaus Friis Østergaard