paweld/fpc
1
0
Fork 0
mirror of https://gitlab.com/freepascal.org/fpc/source.git synced 2025-09-11 19:09:27 +02:00
Code Issues Packages Projects Releases Wiki Activity

* don't check interfaces for class methods

Browse Source
This commit is contained in:
peter 2002-10-02 20:51:22 +00:00
parent eeae421d91
commit ff5f5b33cd
1 changed files with 5 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

6
compiler/pexpr.pas
View File

@ -1216,6 +1216,7 @@ implementation
begin
{ are we in a class method ? }
possible_error:=(srsym.owner.symtabletype=objectsymtable) and
not(is_interface(tdef(srsym.owner.defowner))) and
assigned(aktprocsym) and
(po_classmethod in aktprocdef.procoptions);
do_proc_call(srsym,srsymtable,
@ -2245,7 +2246,10 @@ implementation
end.
{
$Log$
Revision 1.83 2002-10-02 18:20:52 peter
Revision 1.84 2002-10-02 20:51:22 peter
* don't check interfaces for class methods
Revision 1.83 2002/10/02 18:20:52 peter
* Copy() is now internal syssym that calls compilerprocs
Revision 1.82 2002/09/30 07:00:48 florian