mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-11-04 02:39:40 +01:00
b0458b55a3
The changes are built up in a way that all operators on two given types are not allowed if a default implementation for that operator exists. This implies that there is a possibility to have a overload work for (in this order) type A and B, but not for B and A. This is for example the case for Set + Enum (which seems to have a default implementation) where Enum + Set is allowed. The added tests try to detect as many default implementations as feasible, but can't cover everything... git-svn-id: trunk@21975 -
12 lines
106 B
ObjectPascal
12 lines
106 B
ObjectPascal
{ %FAIL }
|
|
program toperator71;
|
|
|
|
operator = (left, right: TObject) res : Boolean;
|
|
begin
|
|
|
|
end;
|
|
|
|
begin
|
|
|
|
end.
|