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

* adapted for removed funcretsym

Browse Source
This commit is contained in:
peter 2003-04-26 00:29:17 +00:00
parent 61a964729e
commit ab6df4aa5e
1 changed files with 4 additions and 8 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

12
compiler/browcol.pas
View File

@ -783,7 +783,6 @@ begin
labelsym : S:='label';
absolutesym : S:='abs';
propertysym : S:='prop';
funcretsym : S:='res';
macrosym : S:='macro';
else S:='';
end;
@ -1472,12 +1471,6 @@ end;
begin
Symbol^.Params:=TypeNames^.Add('...');
end;
funcretsym :
if Assigned(OwnerSym) then
with tfuncretsym(sym) do
if assigned(returntype.def) then
if assigned(returntype.def.typesym) then
SetVType(OwnerSym,returntype.def.typesym.name);
procsym :
begin
with tprocsym(sym) do
@ -2118,7 +2111,10 @@ begin
end.
{
$Log$
Revision 1.32 2002-12-29 14:57:50 peter
Revision 1.33 2003-04-26 00:29:17 peter
* adapted for removed funcretsym
Revision 1.32 2002/12/29 14:57:50 peter
* unit loading changed to first register units and load them
afterwards. This is needed to support uses xxx in yyy correctly
* unit dependency check fixed