administrator/pascalabcnet
1
0
Fork 0
Code Issues Pull requests Actions Packages Projects Releases Wiki Activity

fix

Browse source
This commit is contained in:
Ivan Bondarev 2024-11-13 21:34:10 +01:00
parent c6505634f4
commit 591d9ebe60
1 changed files with 1 additions and 1 deletions
Show stats Download patch file Download diff file Expand all files Collapse all files

2
NETGenerator/NETGenerator.cs
View file

@ -4989,7 +4989,7 @@ namespace PascalABCCompiler.NETGenerator
if (expr != null && !(expr is IConstantNode) && !(expr is IArrayInitializer))
{
expr.visit(this);
if (expr.type != null && expr is ICompiledStaticMethodCallNode)
if (expr.type != null && (!(expr is IBasicFunctionCallNode) && expr is IFunctionCallNode fcn && (fcn.function.name == "op_Assign" || fcn.function.name == ":=")))
il.Emit(OpCodes.Pop);
}
il = ilgn;