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

* fixed web bug #3740

Browse Source
This commit is contained in:
Jonas Maebe 2005-03-03 19:36:42 +00:00
parent ed174f891c
commit 86765dcf57
1 changed files with 6 additions and 2 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

8
compiler/pinline.pas
View File

@ -178,7 +178,8 @@ implementation
{ we need the real called method }
do_resulttypepass(p2);
if (p2.nodetype=calln) then
if (p2.nodetype=calln) and
assigned(tcallnode(p2).procdefinition) then
begin
if is_new then
begin
@ -754,7 +755,10 @@ implementation
end.
{
$Log$
Revision 1.39 2005-02-14 17:13:07 peter
Revision 1.40 2005-03-03 19:36:42 jonas
* fixed web bug 3740
Revision 1.39 2005/02/14 17:13:07 peter
* truncate log
}