tuple matching

Parsers/PascalABCParserNewSaushkin/ABCPascal.cs

@@ -2,7 +2,7 @@
 //  This CSharp output file generated by Gardens Point LEX
 //  Version:  1.1.3.301
 //  Machine:  DESKTOP-IF20NRO
-//  DateTime: 1/11/2019 12:57:33 PM
+//  DateTime: 1/22/2019 8:15:24 AM
 //  UserName: FatCow
 //  GPLEX input file <ABCPascal.lex>
 //  GPLEX frame file <embedded resource>

Parsers/PascalABCParserNewSaushkin/ABCPascal.y

@@ -176,6 +176,8 @@
 %type <ti> tkAssignOrEqual
 %type <stn> pattern pattern_optional_var match_with pattern_case pattern_cases pattern_out_param pattern_out_param_optional_var 
 %type <ob> pattern_out_param_list pattern_out_param_list_optional_var
+%type <ex> const_pattern_expression
+
 %%
 
 parse_goal                
@@ -3282,11 +3284,16 @@ pattern_optional_var
         { 
             $$ = new deconstructor_pattern($3 as List<pattern_deconstructor_parameter>, $1, @$); 
         }
-	| literal_or_number 
+	| const_pattern_expression  
 		{
 			$$ = new const_pattern($1, @$); 
 		}
-    ;    
+    ;  
+	
+const_pattern_expression
+	: literal_or_number  { $$ = $1; }
+	| tuple { $$ = $1; }
+	;
     
 pattern_out_param_list_optional_var
     : pattern_out_param_optional_var