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