Interner Fehler C1537 - result Fehler???

[Dezipaitor]

Delphi-Quellcode:

function TBigInteger.copy:TBigInteger;
var
   r : PBigInteger;
begin
     //r.BigInteger(BigIntegerToStr());
   new(r,BigInteger(BigIntegerToStr()));
   result := r^;
end;

Das würde ich nicht so machen, besonders da hier ein Zeiger übrigbleibt.

Delphi-Quellcode:

function TBigInteger.copy : PBigInteger;
begin
   new(Result,BigInteger(BigIntegerToStr()));
end;