mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-08-16 09:59:17 +02:00
* added the missing pop directive after the push directive in handle_const_rox
git-svn-id: trunk@36043 -
This commit is contained in:
parent
855cd616f0
commit
c028362f31
@ -2107,6 +2107,7 @@ implementation
|
|||||||
else
|
else
|
||||||
internalerror(2011061901);
|
internalerror(2011061901);
|
||||||
end;
|
end;
|
||||||
|
{$pop}
|
||||||
end
|
end
|
||||||
else if (left.nodetype=callparan) and assigned(tcallparanode(left).right) and
|
else if (left.nodetype=callparan) and assigned(tcallparanode(left).right) and
|
||||||
(tcallparanode(tcallparanode(left).right).left.nodetype=ordconstn) then
|
(tcallparanode(tcallparanode(left).right).left.nodetype=ordconstn) then
|
||||||
|
Loading…
Reference in New Issue
Block a user