mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-09-07 05:50:41 +02:00
* wrong location_copy for include/exclude
This commit is contained in:
parent
7bb0575f2d
commit
4cf63d5b32
@ -256,7 +256,6 @@ implementation
|
||||
pushedregs : TMaybesave;
|
||||
cgop : topcg;
|
||||
begin
|
||||
location_copy(location,left.location);
|
||||
secondpass(tcallparanode(left).left);
|
||||
if tcallparanode(tcallparanode(left).right).left.nodetype=ordconstn then
|
||||
begin
|
||||
@ -346,7 +345,10 @@ begin
|
||||
end.
|
||||
{
|
||||
$Log$
|
||||
Revision 1.59 2003-04-22 23:50:23 peter
|
||||
Revision 1.60 2003-04-23 09:50:31 peter
|
||||
* wrong location_copy for include/exclude
|
||||
|
||||
Revision 1.59 2003/04/22 23:50:23 peter
|
||||
* firstpass uses expectloc
|
||||
* checks if there are differences between the expectloc and
|
||||
location.loc from secondpass in EXTDEBUG
|
||||
|
Loading…
Reference in New Issue
Block a user