Index: src/Parser/parser.yy
===================================================================
--- src/Parser/parser.yy	(revision fb04321abbe18f5825d5080f9fab8fd2895bab07)
+++ src/Parser/parser.yy	(revision ef42b1433bc416cbf274adb71339c8b32a281a39)
@@ -412,7 +412,11 @@
 		{ $$ = new ExpressionNode( build_fieldSel( $1, build_field_name_REALFRACTIONconstant( *$2 ) ) ); }
 	| postfix_expression ARROW no_attr_identifier
-		{ $$ = new ExpressionNode( build_pfieldSel( $1, build_varref( $3 ) ) ); }
+		{
+			$$ = new ExpressionNode( build_pfieldSel( $1, *$3 == "0" || *$3 == "1" ? build_constantInteger( *$3 ) : build_varref( $3 ) ) );
+		}
 	| postfix_expression ARROW '[' push field_list pop ']' // CFA, tuple field selector
 			{ $$ = new ExpressionNode( build_pfieldSel( $1, build_tuple( $5 ) ) ); }
+	| postfix_expression ARROW INTEGERconstant			// CFA, tuple index
+		{ $$ = new ExpressionNode( build_pfieldSel( $1, build_constantInteger( *$3 ) ) ); }
 	| postfix_expression ICR
 	  	{ $$ = new ExpressionNode( build_unary_ptr( OperKinds::IncrPost, $1 ) ); }