diff --git a/Languages/Pascal/PascalABCParserNewSaushkin/ABCPascal.cs b/Languages/Pascal/PascalABCParserNewSaushkin/ABCPascal.cs
index 9e2c484d5..5d5dbd440 100644
--- a/Languages/Pascal/PascalABCParserNewSaushkin/ABCPascal.cs
+++ b/Languages/Pascal/PascalABCParserNewSaushkin/ABCPascal.cs
@@ -1,11 +1,9 @@
 //
 //  This CSharp output file generated by Gardens Point LEX
 //  Version:  1.1.3.301
-
-//  Machine:  LAPTOP-TE3HP881
-//  DateTime: 17.06.2024 10:51:32
-//  UserName: miks
-
+//  Machine:  DESKTOP-G8V08V4
+//  DateTime: 22.06.2024 20:49:25
+//  UserName: ?????????
 //  GPLEX input file <ABCPascal.lex>
 //  GPLEX frame file <embedded resource>
 //
@@ -2186,7 +2184,7 @@ if (parserTools.buildTreeForFormatter)
   parserTools.ParseDirective(yytext, CurrentLexLocation, out var directiveName, out var directiveParams);
   var orgDirectiveName = directiveName;
   
-  if (directiveName == "") // слÑ?Ñ?ай пÑ?сÑ?ой диÑ?екÑ?ивÑ?
+  if (directiveName == "") // сл�?�?ай п�?с�?ой ди�?ек�?ив�?
     break;
 
   directiveName = directiveName.ToUpper();
@@ -2283,7 +2281,7 @@ BEGIN(INITIAL);
 parserTools.ParseDirective(yytext, CurrentLexLocation, out directiveName, out directiveParams);
   orgDirectiveName = directiveName;
 
-  if (directiveName == "") // слÑ?Ñ?ай пÑ?сÑ?ой диÑ?екÑ?ивÑ?
+  if (directiveName == "") // сл�?�?ай п�?с�?ой ди�?ек�?ив�?
     break;
 	
   directiveName = directiveName.ToUpper();
diff --git a/Languages/Pascal/PascalABCParserNewSaushkin/ABCPascalYacc.cs b/Languages/Pascal/PascalABCParserNewSaushkin/ABCPascalYacc.cs
index 8d080c461..aee823319 100644
--- a/Languages/Pascal/PascalABCParserNewSaushkin/ABCPascalYacc.cs
+++ b/Languages/Pascal/PascalABCParserNewSaushkin/ABCPascalYacc.cs
@@ -1,11 +1,9 @@
 // (see accompanying GPPGcopyright.rtf)
 
 // GPPG version 1.3.6
-
-// Machine:  LAPTOP-TE3HP881
-// DateTime: 17.06.2024 10:51:33
-// UserName: miks
-
+// Machine:  DESKTOP-G8V08V4
+// DateTime: 22.06.2024 20:49:26
+// UserName: ?????????
 // Input file <ABCPascal.y>
 
 // options: no-lines gplex
diff --git a/SyntaxVisitors/Async/LoweringAsyncVisitor.cs b/SyntaxVisitors/Async/LoweringAsyncVisitor.cs
index e364d4e87..cdff73514 100644
--- a/SyntaxVisitors/Async/LoweringAsyncVisitor.cs
+++ b/SyntaxVisitors/Async/LoweringAsyncVisitor.cs
@@ -252,7 +252,7 @@ namespace SyntaxVisitors.Async
             {
                 var if0 = new if_node(un_expr.Not(ifn.condition), gtAfter);
                 //Replace(ifn, SeqStatements(gotoStartIfCondition, ifn.then_body, lbAfter));
-                ReplaceStatement(ifn, SeqStatements(if0, ifn.then_body, lbAfter));
+                ReplaceStatementUsingParent(ifn, SeqStatements(if0, ifn.then_body, lbAfter));
 
                 // в declarations ближайшего блока добавить описание labels
                 block bl = listNodes.FindLast(x => x is block) as block;
@@ -267,7 +267,7 @@ namespace SyntaxVisitors.Async
 
                 var if0 = new if_node(un_expr.Not(ifn.condition), gtAlt);
 
-                ReplaceStatement(ifn, SeqStatements(if0, ifn.then_body, gtAfter, lbAlt, lbAfter));
+                ReplaceStatementUsingParent(ifn, SeqStatements(if0, ifn.then_body, gtAfter, lbAlt, lbAfter));
 
                 // в declarations ближайшего блока добавить описание labels
                 block bl = listNodes.FindLast(x => x is block) as block;