fix in read

This commit is contained in:
Ivan Bondarev 2024-04-14 11:34:51 +02:00
parent c00a0f2c85
commit 13872fafa8

View file

@ -557,8 +557,10 @@ namespace PascalABCCompiler.TreeConverter
{ {
if (!from_pabc_dll) if (!from_pabc_dll)
{ {
//SystemLibrary.SystemLibInitializer.read_procedure = new SystemLibrary.UnitDefinitionItem(unit, compiler_string_consts.read_procedure_name); SystemLibrary.SystemLibInitializer.read_procedure = new SystemLibrary.UnitDefinitionItem(unit, compiler_string_consts.read_procedure_name);
//SystemLibrary.SystemLibInitializer.readln_procedure = new SystemLibrary.UnitDefinitionItem(unit, compiler_string_consts.readln_procedure_name); var si = SystemLibrary.SystemLibInitializer.read_procedure.SymbolInfo;
SystemLibrary.SystemLibInitializer.readln_procedure = new SystemLibrary.UnitDefinitionItem(unit, compiler_string_consts.readln_procedure_name);
si = SystemLibrary.SystemLibInitializer.readln_procedure.SymbolInfo;
} }
else else
{ {