From 7836f2d6ff0a966aff9a38e98b71f7c332ed9b99 Mon Sep 17 00:00:00 2001 From: charlet Date: Thu, 7 Oct 2010 12:33:30 +0000 Subject: 2010-10-07 Robert Dewar * exp_util.adb (Insert_Actions): Add handling of N_Parametrized_Expression. * par-ch6.adb (P_Subprogram): Add parsing of parametrized expression * sem.adb: Add entry for N_Parametrized_Expression * sem_ch6.adb (Analyze_Parametrized_Expression): New procedure * sem_ch6.ads (Analyze_Parametrized_Expression): New procedure * sinfo.ads, sinfo.adb: Add N_Parametrized_Expression * sprint.adb (Sprint_Node): Add handling for N_Parametrized_Expression * par-ch4.adb: Minor reformatting. git-svn-id: svn+ssh://gcc.gnu.org/svn/gcc/trunk@165098 138bc75d-0d04-0410-961f-82ee72b054a4 --- gcc/ada/par-ch4.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'gcc/ada/par-ch4.adb') diff --git a/gcc/ada/par-ch4.adb b/gcc/ada/par-ch4.adb index 2d388f67b5a..a7952c56534 100644 --- a/gcc/ada/par-ch4.adb +++ b/gcc/ada/par-ch4.adb @@ -2634,7 +2634,7 @@ package body Ch4 is -- Error_Recovery: cannot raise Error_Resync - function P_Qualified_Expression (Subtype_Mark : Node_Id) return Node_Id is + function P_Qualified_Expression (Subtype_Mark : Node_Id) return Node_Id is Qual_Node : Node_Id; begin Qual_Node := New_Node (N_Qualified_Expression, Prev_Token_Ptr); -- cgit v1.2.1