Index: src/Parser/parser.yy
===================================================================
--- src/Parser/parser.yy	(revision afe9e454560ea0dd21509c0e11af7e348b940597)
+++ src/Parser/parser.yy	(revision d824715486d4311826abe5b90f4db546ac42412f)
@@ -10,6 +10,6 @@
 // Created On       : Sat Sep  1 20:22:55 2001
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Fri Feb 25 17:54:56 2022
-// Update Count     : 5262
+// Last Modified On : Mon Mar 14 16:35:29 2022
+// Update Count     : 5276
 //
 
@@ -652,5 +652,4 @@
 			// Historic, transitional: Disallow commas in subscripts.
 			// Switching to this behaviour may help check if a C compatibilty case uses comma-exprs in subscripts.
-		// { SemanticError( yylloc, "New array subscript is currently unimplemented." ); $$ = nullptr; }
 			// Current: Commas in subscripts make tuples.
 		{ $$ = new ExpressionNode( build_binary_val( OperKinds::Index, $1, new ExpressionNode( build_tuple( (ExpressionNode *)($3->set_last( $5 ) ) )) ) ); }
@@ -661,4 +660,8 @@
 		// equivalent to the old x[i,j].
 		{ $$ = new ExpressionNode( build_binary_val( OperKinds::Index, $1, $3 ) ); }
+	| constant '[' assignment_expression ']'			// 3[a], 'a'[a], 3.5[a]
+		{ $$ = new ExpressionNode( build_binary_val( OperKinds::Index, $1, $3 ) ); }
+	| string_literal '[' assignment_expression ']'		// "abc"[3], 3["abc"]
+		{ $$ = new ExpressionNode( build_binary_val( OperKinds::Index, new ExpressionNode( $1 ), $3 ) ); }
 	| postfix_expression '{' argument_expression_list_opt '}' // CFA, constructor call
 		{
