I defined the type matriceE as :

type
   vecteurF = array of extended;
   matriceF = array of vecteurF;
   matriceE = record
     err     :integer;
     x       :matriceF;
   end;

If I define a function such as :

function invM(A:matriceE):matriceE;

and when I call it such as :

invA := invM(A);

the matrix invA.x has zero dimension

If now, I replace this function by a procedure such as :

procedure invM2(A:matriceE;var B matriceE);

the call invM2(A,invA) produces a matrix invA.x of correct dimension.

I add that the function invM runs OK under Delphi 6.0.

Jean-Marie Cornuet

Please submit a compilable sample which demonstrates the problem as a bug report at
http://www.freepascal.org/mantis

Jonas