From 13872fafa8454e016f19c3fadcfb84947ad4bcab Mon Sep 17 00:00:00 2001
From: Ivan Bondarev <ibond84@googlemail.com>
Date: Sun, 14 Apr 2024 11:34:51 +0200
Subject: [PATCH] fix in read

---
 TreeConverter/TreeConversion/syntax_tree_visitor.cs | 6 ++++--
 1 file changed, 4 insertions(+), 2 deletions(-)

diff --git a/TreeConverter/TreeConversion/syntax_tree_visitor.cs b/TreeConverter/TreeConversion/syntax_tree_visitor.cs
index 14ae6a009..05bd65d6d 100644
--- a/TreeConverter/TreeConversion/syntax_tree_visitor.cs
+++ b/TreeConverter/TreeConversion/syntax_tree_visitor.cs
@@ -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
             {