mirror of
https://gitlab.com/freepascal.org/fpc/source.git
synced 2025-04-23 06:49:38 +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
|
||||
internalerror(2011061901);
|
||||
end;
|
||||
{$pop}
|
||||
end
|
||||
else if (left.nodetype=callparan) and assigned(tcallparanode(left).right) and
|
||||
(tcallparanode(tcallparanode(left).right).left.nodetype=ordconstn) then
|
||||
|
Loading…
Reference in New Issue
Block a user