<div dir="auto"><div><div class="gmail_quote"><div dir="ltr" class="gmail_attr">Michael Van Canneyt via fpc-pascal <<a href="mailto:fpc-pascal@lists.freepascal.org">fpc-pascal@lists.freepascal.org</a>> schrieb am Sa., 12. Feb. 2022, 12:14:<br></div><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex"><br>
<br>
On Sat, 12 Feb 2022, Mattias Gaertner via fpc-pascal wrote:<br>
<br>
> Hi,<br>
><br>
> This can't be right, can it?<br>
><br>
> type<br>
>  TBird = class<br>
>    procedure Fly;<br>
>  end;<br>
>  TEagle = TBird; // alias<br>
><br>
> procedure TEagle.Fly;<br>
> begin<br>
> end;<br>
<br>
Personally, I would not allow this. <br>
But Delphi compiles and runs it...<br>
<br>
Maybe something to check for {$mode objfpc} =-)<br></blockquote></div></div><div dir="auto"><br></div><div dir="auto">The compiler does not have any real tracking for non-type aliases... As far as the compiler is concerned these are interchangeable...</div><div dir="auto"><br></div><div dir="auto">Regards, </div><div dir="auto">Sven </div><div dir="auto"><div class="gmail_quote"><blockquote class="gmail_quote" style="margin:0 0 0 .8ex;border-left:1px #ccc solid;padding-left:1ex">
</blockquote></div></div></div>