From a5ec24d9a0b3c7b21dbe7018e86df15a80ffd9f7 Mon Sep 17 00:00:00 2001
From: Mikhalkovich Stanislav <miks@math.sfedu.ru>
Date: Sat, 15 Jun 2024 19:26:46 +0300
Subject: [PATCH] =?UTF-8?q?await=20=D0=BF=D0=B5=D1=80=D0=B5=D0=BC=D0=B5?=
 =?UTF-8?q?=D1=81=D1=82=D0=B8=D0=BB?=
MIME-Version: 1.0
Content-Type: text/plain; charset=UTF-8
Content-Transfer-Encoding: 8bit

---
 Languages/Pascal/PascalABCParserNewSaushkin/ABCPascal.y | 6 ++++--
 Languages/Pascal/PascalABCParserNewSaushkin/PABC.ymc    | 2 ++
 2 files changed, 6 insertions(+), 2 deletions(-)

diff --git a/Languages/Pascal/PascalABCParserNewSaushkin/ABCPascal.y b/Languages/Pascal/PascalABCParserNewSaushkin/ABCPascal.y
index ebc8d14d3..3f4cf26a9 100644
--- a/Languages/Pascal/PascalABCParserNewSaushkin/ABCPascal.y
+++ b/Languages/Pascal/PascalABCParserNewSaushkin/ABCPascal.y
@@ -2761,6 +2761,8 @@ unlabelled_stmt
 		{ $$ = $1; }
     | proc_call
 		{ $$ = $1; }
+	| tkAwait expr_l1
+    	{ $$ = new await_node_statement(new await_node($2,@$),@$); }
     | goto_stmt
 		{ $$ = $1; }
     | compound_stmt
@@ -3373,8 +3375,6 @@ expr_l1_for_lambda
 expr_dq
 	: relop_expr
 		{ $$ = $1; }
-	| tkAwait relop_expr
-		{ $$ = $2; }
 	| expr_dq tkDoubleQuestion relop_expr
 		{ $$ = new double_question_node($1 as expression, $3 as expression, @$);}
 	;
@@ -4158,6 +4158,8 @@ factor
 			$$ = new nil_const();  
 			$$.source_context = @$;
 		}
+	| tkAwait factor
+		{ $$ = new await_node($2 as expression, @$); } 
     | literal_or_number
 		{ $$ = $1; }
     | default_expr
diff --git a/Languages/Pascal/PascalABCParserNewSaushkin/PABC.ymc b/Languages/Pascal/PascalABCParserNewSaushkin/PABC.ymc
index b5d315699..73c49eec8 100644
--- a/Languages/Pascal/PascalABCParserNewSaushkin/PABC.ymc
+++ b/Languages/Pascal/PascalABCParserNewSaushkin/PABC.ymc
@@ -378,6 +378,8 @@ script=
 
 
 
+
+