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

* fixed strange error message about expecting erroneous types,

Browse Source 
usually this is caused by other errors so it isn't important
This commit is contained in:
florian 2003-11-08 17:08:44 +00:00
parent a9edc98c72
commit 585d13369c
1 changed files with 7 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

9
compiler/symtable.pas
View File

@ -1781,7 +1781,8 @@ implementation
if (def2.owner.symtabletype in [globalsymtable,staticsymtable]) then if (def2.owner.symtabletype in [globalsymtable,staticsymtable]) then
s2:=def2.owner.realname^+'.'+s2; s2:=def2.owner.realname^+'.'+s2;
end; end;
CGMessage2(type_e_incompatible_types,s1,s2); if def2.deftype<>errordef then
CGMessage2(type_e_incompatible_types,s1,s2);
end; end;
@ -2297,7 +2298,11 @@ implementation
end. end.
{ {
$Log$ $Log$
Revision 1.121 2003-10-30 16:23:13 peter Revision 1.122 2003-11-08 17:08:44 florian
* fixed strange error message about expecting erroneous types,
usually this is caused by other errors so it isn't important
Revision 1.121 2003/10/30 16:23:13 peter
* don't search for overloads in parents for constructors * don't search for overloads in parents for constructors
Revision 1.120 2003/10/23 14:44:07 peter Revision 1.120 2003/10/23 14:44:07 peter