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)
{
//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);
SystemLibrary.SystemLibInitializer.read_procedure = new SystemLibrary.UnitDefinitionItem(unit, compiler_string_consts.read_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
{