Hello Martin.
Wow.
Indeed, I did a check in mse code and only exists, in msearrayutils.pas:
function aligntoptr(p: pointer): pointer; inline;
begin
{$ifdef FPC_REQUIRES_PROPER_ALIGNMENT}
result:= align(p,sizeof(p));
{$else FPC_REQUIRES_PROPER_ALIGNMENT}
result:=p;
{$endif FPC_REQUIRES_PROPER_ALIGNMENT}
end;
And nothing about aligntoqword()
I dont know if a function aligntoqword(p: pointer): pointer; inline;
must be added in msearrayutils.pas.
I will try using aligntoqword() of fpc and adapting mse code for it (ti:=
aligntoqword(ti);
If you see a other way, please advice.
Many, many, many thanks.
Fre;D
-----
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
