Changes in src/Parser/parser.yy [0a6d8204:60a8062]

File:

• src/Parser/parser.yy (modified) (7 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 Apr 27 12:25:42 2020
-// Update Count     : 4483
+// Last Modified On : Sun Feb 16 08:22:14 2020
+// Update Count     : 4461
 //
 
@@ -278 +278 @@
 %token OTYPE FTYPE DTYPE TTYPE TRAIT                                    // CFA
 %token SIZEOF OFFSETOF
-// %token RESUME                                                                        // CFA
-%token SUSPEND                                                                  // CFA
+// %token SUSPEND RESUME                                                                        // CFA
 %token ATTRIBUTE EXTENSION                                                              // GCC
 %token IF ELSE SWITCH CASE DEFAULT DO WHILE FOR BREAK CONTINUE GOTO RETURN
@@ -919 +918 @@
         conditional_expression
         | unary_expression assignment_operator assignment_expression
-                {
-                        if ( $2 == OperKinds::AtAssn ) {
-                                SemanticError( yylloc, "C @= assignment is currently unimplemented." ); $$ = nullptr;
-                        } else {
-                                $$ = new ExpressionNode( build_binary_val( $2, $1, $3 ) );
-                        } // if
-                }
+                { $$ = new ExpressionNode( build_binary_val( $2, $1, $3 ) ); }
         | unary_expression '=' '{' initializer_list_opt comma_opt '}'
                 { SemanticError( yylloc, "Initializer assignment is currently unimplemented." ); $$ = nullptr; }
@@ -966 +959 @@
 
 tuple_expression_list:
-        assignment_expression
-        | '@'                                                                                           // CFA
-                { SemanticError( yylloc, "Eliding tuple element with '@' is currently unimplemented." ); $$ = nullptr; }
-        | tuple_expression_list ',' assignment_expression
+        assignment_expression_opt
+        | tuple_expression_list ',' assignment_expression_opt
                 { $$ = (ExpressionNode *)($1->set_last( $3 )); }
-        | tuple_expression_list ',' '@'
-                { SemanticError( yylloc, "Eliding tuple element with '@' is currently unimplemented." ); $$ = nullptr; }
         ;
 
@@ -1270 +1259 @@
         | RETURN '{' initializer_list_opt comma_opt '}' ';'
                 { SemanticError( yylloc, "Initializer return is currently unimplemented." ); $$ = nullptr; }
-        | SUSPEND ';'
-                { $$ = new StatementNode( build_suspend( nullptr ) ); }
-        | SUSPEND compound_statement
-                { $$ = new StatementNode( build_suspend( $2 ) ); }
-        | SUSPEND COROUTINE ';'
-                { $$ = new StatementNode( build_suspend( nullptr, SuspendStmt::Coroutine ) ); }
-        | SUSPEND COROUTINE compound_statement
-                { $$ = new StatementNode( build_suspend( $3, SuspendStmt::Coroutine ) ); }
-        | SUSPEND GENERATOR ';'
-                { $$ = new StatementNode( build_suspend( nullptr, SuspendStmt::Generator ) ); }
-        | SUSPEND GENERATOR compound_statement
-                { $$ = new StatementNode( build_suspend( $3, SuspendStmt::Generator ) ); }
+        // | SUSPEND ';'
+        //      { SemanticError( yylloc, "Suspend expression is currently unimplemented." ); $$ = nullptr; }
+        // | SUSPEND compound_statement ';'
+        //      { SemanticError( yylloc, "Suspend expression is currently unimplemented." ); $$ = nullptr; }
         | THROW assignment_expression_opt ';'                           // handles rethrow
                 { $$ = new StatementNode( build_throw( $2 ) ); }
@@ -1608 +1589 @@
                 // type_specifier can resolve to just TYPEDEFname (e.g., typedef int T; int f( T );). Therefore this must be
                 // flattened to allow lookahead to the '(' without having to reduce identifier_or_type_name.
-        cfa_abstract_tuple identifier_or_type_name '(' push cfa_parameter_ellipsis_list_opt pop ')' attribute_list_opt
+        cfa_abstract_tuple identifier_or_type_name '(' push cfa_parameter_ellipsis_list_opt pop ')'
                 // To obtain LR(1 ), this rule must be factored out from function return type (see cfa_abstract_declarator).
-                { $$ = DeclarationNode::newFunction( $2, $1, $5, 0 )->addQualifiers( $8 ); }
-        | cfa_function_return identifier_or_type_name '(' push cfa_parameter_ellipsis_list_opt pop ')' attribute_list_opt
-                { $$ = DeclarationNode::newFunction( $2, $1, $5, 0 )->addQualifiers( $8 ); }
+                { $$ = DeclarationNode::newFunction( $2, $1, $5, 0 ); }
+        | cfa_function_return identifier_or_type_name '(' push cfa_parameter_ellipsis_list_opt pop ')'
+                { $$ = DeclarationNode::newFunction( $2, $1, $5, 0 ); }
         ;
 
@@ -2096 +2077 @@
 aggregate_control:                                                                              // CFA
         GENERATOR
-                { yyy = true; $$ = AggregateDecl::Generator; }
-        | MONITOR GENERATOR
-                { SemanticError( yylloc, "monitor generator is currently unimplemented." ); $$ = AggregateDecl::NoAggregate; }
+                { yyy = true; $$ = AggregateDecl::Coroutine; }
         | COROUTINE
                 { yyy = true; $$ = AggregateDecl::Coroutine; }
         | MONITOR
                 { yyy = true; $$ = AggregateDecl::Monitor; }
-        | MONITOR COROUTINE
-                { SemanticError( yylloc, "monitor coroutine is currently unimplemented." ); $$ = AggregateDecl::NoAggregate; }
         | THREAD
                 { yyy = true; $$ = AggregateDecl::Thread; }
-        | MONITOR THREAD
-                { SemanticError( yylloc, "monitor thread is currently unimplemented." ); $$ = AggregateDecl::NoAggregate; }
         ;