From 594fe0833cbf209b52b02bb1ddb7ecafff51f199 Mon Sep 17 00:00:00 2001 From: =?UTF-8?q?=D0=91=D0=BE=D0=BD=D0=B4=D0=B0=D1=80=D0=B5=D0=B2=20=D0=98?= =?UTF-8?q?=D0=B2=D0=B0=D0=BD?= Date: Tue, 28 Feb 2017 21:28:33 +0100 Subject: [PATCH] bug fix const obj: sometype = (name: 'test'); var k := Arr(obj); --- NETGenerator/NETGenerator.cs | 8 +++++--- 1 file changed, 5 insertions(+), 3 deletions(-) diff --git a/NETGenerator/NETGenerator.cs b/NETGenerator/NETGenerator.cs index bcc565c13..6e66b11cb 100644 --- a/NETGenerator/NETGenerator.cs +++ b/NETGenerator/NETGenerator.cs @@ -711,10 +711,11 @@ namespace PascalABCCompiler.NETGenerator il = cb.GetILGenerator(); if (cnn.IsMain) unit_cci = cb; ModulesInitILGenerators.Add(cur_type, il); - //переводим глобальные переменные модуля - ConvertGlobalVariables(cnn.variables); + //перводим константы ConvertNamespaceConstants(cnn.constants); + //переводим глобальные переменные модуля + ConvertGlobalVariables(cnn.variables); ConvertNamespaceEvents(cnn.events); //il.Emit(OpCodes.Ret); } @@ -725,10 +726,11 @@ namespace PascalABCCompiler.NETGenerator il = entry_meth.GetILGenerator(); ModulesInitILGenerators.Add(cur_type, il); il = init_variables_mb.GetILGenerator(); - ConvertGlobalVariables(cnn.variables); + il = entry_meth.GetILGenerator(); //перводим константы ConvertNamespaceConstants(cnn.constants); + ConvertGlobalVariables(cnn.variables); ConvertNamespaceEvents(cnn.events); //il.Emit(OpCodes.Ret); }