Changes in src/Parser/parser.yy [9fb1367:ec3f9c8]

File:

• src/Parser/parser.yy (modified) (8 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 : Wed Feb 17 09:03:07 2021
-// Update Count     : 4722
+// Last Modified On : Wed Jan 27 08:58:56 2021
+// Update Count     : 4680
 //
 
@@ -282 +282 @@
 %token ATTRIBUTE EXTENSION                                                              // GCC
 %token IF ELSE SWITCH CASE DEFAULT DO WHILE FOR BREAK CONTINUE GOTO RETURN
-%token CHOOSE DISABLE ENABLE FALLTHRU FALLTHROUGH TRY THROW THROWRESUME AT WITH WHEN WAITFOR // CFA
+%token CHOOSE DISABLE ENABLE FALLTHRU FALLTHROUGH TRY CATCH CATCHRESUME FINALLY THROW THROWRESUME AT WITH WHEN WAITFOR // CFA
 %token ASM                                                                                              // C99, extension ISO/IEC 9899:1999 Section J.5.10(1)
 %token ALIGNAS ALIGNOF GENERIC STATICASSERT                             // C11
 
 // names and constants: lexer differentiates between identifier and typedef names
-%token<tok> IDENTIFIER          QUOTED_IDENTIFIER       TYPEDEFname             TYPEGENname
-%token<tok> TIMEOUT                     WOR                                     CATCH                   RECOVER                 CATCHRESUME             FIXUP           FINALLY         // CFA
-%token<tok> INTEGERconstant     CHARACTERconstant       STRINGliteral
+%token<tok> IDENTIFIER                  QUOTED_IDENTIFIER               TYPEDEFname                             TYPEGENname
+%token<tok> TIMEOUT                             WOR
+%token<tok> INTEGERconstant             CHARACTERconstant               STRINGliteral
 %token<tok> DIRECTIVE
 // Floating point constant is broken into three kinds of tokens because of the ambiguity with tuple indexing and
@@ -462 +462 @@
 // Order of these lines matters (low-to-high precedence). THEN is left associative over WOR/TIMEOUT/ELSE, WOR is left
 // associative over TIMEOUT/ELSE, and TIMEOUT is left associative over ELSE.
-%precedence THEN                // rule precedence for IF/WAITFOR statement
-%precedence WOR                 // token precedence for start of WOR in WAITFOR statement
-%precedence TIMEOUT             // token precedence for start of TIMEOUT in WAITFOR statement
-%precedence CATCH               // token precedence for start of TIMEOUT in WAITFOR statement
-%precedence RECOVER             // token precedence for start of TIMEOUT in WAITFOR statement
-%precedence CATCHRESUME // token precedence for start of TIMEOUT in WAITFOR statement
-%precedence FIXUP               // token precedence for start of TIMEOUT in WAITFOR statement
-%precedence FINALLY             // token precedence for start of TIMEOUT in WAITFOR statement
-%precedence ELSE                // token precedence for start of else clause in IF/WAITFOR statement
-
+%precedence THEN        // rule precedence for IF/WAITFOR statement
+%precedence WOR         // token precedence for start of WOR in WAITFOR statement
+%precedence TIMEOUT     // token precedence for start of TIMEOUT in WAITFOR statement
+%precedence ELSE        // token precedence for start of else clause in IF/WAITFOR statement
 
 // Handle shift/reduce conflict for generic type by shifting the '(' token. For example, this string is ambiguous:
@@ -550 +544 @@
         TIMEOUT
         | WOR
-        | CATCH
-        | RECOVER
-        | CATCHRESUME
-        | FIXUP
-        | FINALLY
         ;
 
@@ -629 +618 @@
 postfix_expression:
         primary_expression
-        | postfix_expression '[' assignment_expression ',' comma_expression ']'
-                // { $$ = new ExpressionNode( build_binary_val( OperKinds::Index, $1, new ExpressionNode( build_binary_val( OperKinds::Index, $3, $5 ) ) ) ); }
-                { SemanticError( yylloc, "New array subscript is currently unimplemented." ); $$ = nullptr; }
         | postfix_expression '[' assignment_expression ']'
                 // CFA, comma_expression disallowed in this context because it results in a common user error: subscripting a
@@ -1377 +1363 @@
 
 exception_statement:
-        TRY compound_statement handler_clause                                   %prec THEN
+        TRY compound_statement handler_clause
                 { $$ = new StatementNode( build_try( $2, $3, 0 ) ); }
         | TRY compound_statement finally_clause
@@ -1400 +1386 @@
 handler_key:
         CATCH                                                                           { $$ = CatchStmt::Terminate; }
-        | RECOVER                                                                       { $$ = CatchStmt::Terminate; }
         | CATCHRESUME                                                           { $$ = CatchStmt::Resume; }
-        | FIXUP                                                                         { $$ = CatchStmt::Resume; }
         ;
 
@@ -3203 +3187 @@
         | '[' ']' multi_array_dimension
                 { $$ = DeclarationNode::newArray( 0, 0, false )->addArray( $3 ); }
-        | '[' push assignment_expression pop ',' comma_expression ']'
-                { $$ = DeclarationNode::newArray( $3, 0, false )->addArray( DeclarationNode::newArray( $6, 0, false ) ); }
-                // { SemanticError( yylloc, "New array dimension is currently unimplemented." ); $$ = nullptr; }
         | multi_array_dimension
         ;