Changeset 11ab0b4a for src/Parser/parser.yy

Timestamp:

Oct 3, 2023, 5:31:46 PM (7 months ago)

Author:

Peter A. Buhr <pabuhr@…>

Branches:

master

Children:

cf34e82

Parents:

46f9f02

Message:

add corun/cofor statement, update old cofor

File:

• src/Parser/parser.yy (modified) (5 diffs)

src/Parser/parser.yy

@@ -10 +10 @@
 // Created On       : Sat Sep  1 20:22:55 2001
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Mon Sep  4 18:28:12 2023
-// Update Count     : 6393
+// Last Modified On : Tue Oct  3 17:14:12 2023
+// Update Count     : 6396
 //
 
@@ -350 +350 @@
 %token IF ELSE SWITCH CASE DEFAULT DO WHILE FOR BREAK CONTINUE GOTO RETURN
 %token CHOOSE FALLTHRU FALLTHROUGH WITH WHEN WAITFOR WAITUNTIL // CFA
+%token CORUN COFOR
 %token DISABLE ENABLE TRY THROW THROWRESUME AT                  // CFA
 %token ASM                                                                                              // C99, extension ISO/IEC 9899:1999 Section J.5.10(1)
@@ -422 +423 @@
 %type<stmt> with_statement
 %type<expr> with_clause_opt
+%type<stmt> corun_statement                             cofor_statement
 %type<stmt> exception_statement
 %type<clause> handler_clause                    finally_clause
@@ -1140 +1142 @@
         | waitfor_statement
         | waituntil_statement
+        | corun_statement
+        | cofor_statement
         | exception_statement
         | enable_disable_statement
@@ -1713 +1717 @@
         wor_waituntil_clause                                                            %prec THEN
                 { $$ = new StatementNode( build_waituntil_stmt( yylloc, $1 ) ); }
+        ;
+
+corun_statement:
+        CORUN statement
+                { SemanticError( yylloc, "corun statement is currently unimplemented." ); $$ = nullptr; }
+        ;
+
+cofor_statement:
+        COFOR '(' for_control_expression_list ')' statement
+                { SemanticError( yylloc, "cofor statement is currently unimplemented." ); $$ = nullptr; }
         ;