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

* remove firstcallparan which looks obsolete

Browse Source
This commit is contained in:
peter 1999-05-16 17:06:31 +00:00
parent d60283c76d
commit b9d655b118
1 changed files with 5 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

7
compiler/pexpr.pas
View File

@ -613,7 +613,7 @@ unit pexpr;
if (p2^.treetype<>errorn) and getprocvar then
handle_procvar(pprocvardef(ppropertysym(sym)^.proptype),p2);
p1^.left:=gencallparanode(p2,p1^.left);
firstcallparan(p1^.left,nil);
{ firstcallparan(p1^.left,nil); }
getprocvar:=false;
end
else if ppropertysym(sym)^.writeaccesssym^.typ=varsym then
@ -1988,7 +1988,10 @@ unit pexpr;
end.
{
$Log$
Revision 1.105 1999-05-12 22:36:09 florian
Revision 1.106 1999-05-16 17:06:31 peter
* remove firstcallparan which looks obsolete
Revision 1.105 1999/05/12 22:36:09 florian
* override isn't allowed in objects!
Revision 1.104 1999/05/07 10:35:23 florian