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

_______________________________________________
fpc-devel maillist  -  [EMAIL PROTECTED]
http://lists.freepascal.org/mailman/listinfo/fpc-devel

Reply via email to