Index: src/Parser/parser.yy
===================================================================
--- src/Parser/parser.yy	(revision c7c178b577f3c639ac7fa0d4d991c368b2e91e39)
+++ src/Parser/parser.yy	(revision c60ef6393bd5fd317ae2194ba30fb3a1d34b4678)
@@ -10,6 +10,6 @@
 // Created On       : Sat Sep  1 20:22:55 2001
 // Last Modified By : Peter A. Buhr
-// Last Modified On : Sun Mar 28 18:53:34 2021
-// Update Count     : 4940
+// Last Modified On : Tue Mar 30 18:39:23 2021
+// Update Count     : 4965
 //
 
@@ -1236,4 +1236,10 @@
 	| comma_expression ';' comma_expression inclexcl comma_expression '~' comma_expression // CFA
 		{ $$ = forCtrl( $3, $1, $3->clone(), $4, $5, $7 ); }
+
+	| comma_expression ';' TYPEDEFname					// CFA, array type
+		{
+			SemanticError( yylloc, "Array interator is currently unimplemented." ); $$ = nullptr;
+			$$ = forCtrl( new ExpressionNode( build_varref( $3 ) ), $1, nullptr, OperKinds::Range, nullptr, nullptr );
+		}
 
 		// There is a S/R conflicit if ~ and -~ are factored out.
@@ -2227,10 +2233,10 @@
 	| ENUM '(' cfa_abstract_parameter_declaration ')' attribute_list_opt '{' enumerator_list comma_opt '}'
 	 	{
-			if ( $3->storageClasses.val != 0 || $3->type->qualifiers.val != 0 ) { SemanticError( yylloc, "storage-class and CV qualifiers are not meaningful for constants." ); }
+			if ( $3->storageClasses.val != 0 || $3->type->qualifiers.val != 0 ) { SemanticError( yylloc, "storage-class and CV qualifiers are not meaningful for enumeration constants, which are const." ); }
 			SemanticError( yylloc, "Typed enumeration is currently unimplemented." ); $$ = nullptr;
 		}
 	| ENUM '(' cfa_abstract_parameter_declaration ')' attribute_list_opt identifier attribute_list_opt
 		{
-			if ( $3->storageClasses.val != 0 || $3->type->qualifiers.val != 0 ) { SemanticError( yylloc, "storage-class and CV qualifiers are not meaningful for constants." ); }
+			if ( $3->storageClasses.val != 0 || $3->type->qualifiers.val != 0 ) { SemanticError( yylloc, "storage-class and CV qualifiers are not meaningful for enumeration constants, which are const." ); }
 			typedefTable.makeTypedef( *$6 );
 		}
@@ -2241,5 +2247,5 @@
 	| ENUM '(' cfa_abstract_parameter_declaration ')' attribute_list_opt typedef_name attribute_list_opt '{' enumerator_list comma_opt '}'
 		{
-			if ( $3->storageClasses.val != 0 || $3->type->qualifiers.val != 0 ) { SemanticError( yylloc, "storage-class and CV qualifiers are not meaningful for constants." ); }
+			if ( $3->storageClasses.val != 0 || $3->type->qualifiers.val != 0 ) { SemanticError( yylloc, "storage-class and CV qualifiers are not meaningful for enumeration constants, which are const." ); }
 			typedefTable.makeTypedef( *$6->name );
 			SemanticError( yylloc, "Typed enumeration is currently unimplemented." ); $$ = nullptr;