[fpc-devel] bug report in snapshot fpc-2.1.3-20070411-i386-macosx.dmg

[Imperial College]

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

-------------- next part --------------
An HTML attachment was scrubbed...
URL: <http://lists.freepascal.org/pipermail/fpc-devel/attachments/20070412/381829fc/attachment.html>