Hello together!

I've installed FPC 2.4.2 and after reading the page about the changes since 2.4.0, I've compiled Lazarus and noticed a warning in imglist.pp regarding a Equals method (already reported). Now I remembered that http://wiki.freepascal.org/User_Changes_2.4.2#TObject_class_declaration mentions that FPC warns in mode delphi, but generates an error in mode objfpc. So I looked at the top of the unit, but did found "{$mode objfpc}".

Puzzled, I wrote the following test program:

==== source begin ====

program tobjectmethods;
{$mode objfpc}
type
   TTestObject = class
   public
     function ToString: String;
     function Equals(aObject: TObject): Boolean;
   end;
function TTestObject.ToString: String;
begin
   Result := 'FooBar';
end;
function TTestObject.Equals(aObject: TObject): Boolean;
begin
   Result := aObject.ToString = Self.ToString;
end;
begin
end.

==== source end ====

Compiling it with FPC 2.4.2 (and 2.5.1 as well) results only in warnings regarding the methods Equals and ToString and not errors as expected after reading the wiki.

So who is right?
a) the wiki (thus there is a bug in FPC - very bad, because 2.4.2 is already released)
b) the compiler (thus the wiki is wrong)

Regards,
Sven

You are just redeclaring the method. Try to add ToString property or declare a ToString argument in some method and you should get an error.

Best regards,
Paul Ishenin.

The compiler is right. You can always re-introduce methods. But if you call 'TObject.Equals', your (wrongly declared) method will not be called. Standard OOP inheritance/overriding rules.

Michael.

Ahhhh... that explains it. In that case I've misunderstood the wiki entry ^^

Thanks for explaining.

Regards,
Sven

As told to Paul I've misunderstood the wiki entry. More precisely the part "identifier". :)

Now the world is beautiful again :P

Regards,
Sven