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

* fixed compiler err

Browse Source
This commit is contained in:
peter 2004-02-20 22:15:26 +00:00
parent ff42d8657a
commit 90830261ed
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/nld.pas
View File

@ -937,7 +937,7 @@ implementation
on the location in which the elements will be found in on the location in which the elements will be found in
pass 2.} pass 2.}
if not do_variant then if not do_variant then
include(procinfo.flags,pi_do_call); include(current_procinfo.flags,pi_do_call);
firstpass(hp.left); firstpass(hp.left);
end; end;
hp:=tarrayconstructornode(hp.right); hp:=tarrayconstructornode(hp.right);
@ -1122,7 +1122,10 @@ begin
end. end.
{ {
$Log$ $Log$
Revision 1.123 2004-02-20 21:55:59 peter Revision 1.124 2004-02-20 22:15:26 peter
* fixed compiler err
Revision 1.123 2004/02/20 21:55:59 peter
* procvar cleanup * procvar cleanup
Revision 1.122 2004/02/20 20:21:16 daniel Revision 1.122 2004/02/20 20:21:16 daniel