"Minus" class operator can't determine which overloaded function to call
Original Reporter info from Mantis: ryan_joseph @genericptr
-
Reporter name: Ryan Joseph
Original Reporter info from Mantis: ryan_joseph @genericptr
- Reporter name: Ryan Joseph
Description:
Running the following program gives an error "Can't determine which overloaded function to call". From Sven: "Fixing it leads to some compilation problems in Generics.Collections that need to be solved as well."
Steps to reproduce:
{$mode objfpc}
{$modeswitch advancedrecords}
program generic_vector;
uses
Math;
type
generic TVec2<TScalar> = record
x, y: TScalar;
function Magnitude: TScalar;
function Distance (vec: TVec2): TScalar;
class operator - (left, right: TVec2): TVec2;
class operator - (left: TVec2; right: TScalar): TVec2;
end;
TVec2f = specialize TVec2<Float>;
TVec2i = specialize TVec2<Integer>;
function TVec2.Magnitude: TScalar;
begin
result := (x ** 2) + (y ** 2);
end;
function TVec2.Distance (vec: TVec2): TScalar;
begin
// ----->>> ERROR: Can't determine which overloaded function to call
result := (self - vec).Magnitude;
end;
class operator TVec2.- (left, right: TVec2): TVec2;
begin
result.x := left.x - right.x;
result.y := left.y - right.y;
end;
class operator TVec2.- (left: TVec2; right: TScalar): TVec2;
begin
result.x := left.x - right;
result.y := left.y - right;
end;
begin
end.
Mantis conversion info:
- Mantis ID: 36285
- Version: 3.3.1