Some more infos:

This gives the correct size with fpc <= 3.2.0:

function dynarrayelesize(const typinfo: pdynarraytypeinfo): sizeint; 
var
 ti: pdynarraytypeinfo;
begin
 ti:= typinfo;
 inc(pointer(ti),ord(pdynarraytypeinfo(ti)^.namelen)+2);
 result:= psizeint(ti)^;
end;

But with last trunk fpc 3.3.1 the result is always = 0.

Why?




-----
Many thanks ;-)
--
Sent from: http://free-pascal-general.1045716.n5.nabble.com/
_______________________________________________
fpc-pascal maillist  -  fpc-pascal@lists.freepascal.org
https://lists.freepascal.org/cgi-bin/mailman/listinfo/fpc-pascal

Reply via email to