From 03f050b6b4f0b051bbd9ddf7061b5002808ed052 Mon Sep 17 00:00:00 2001 From: Arnaud Charlet Date: Fri, 17 Apr 2009 12:01:17 +0200 Subject: [multiple changes] 2009-04-17 Nicolas Roche * initialize.c (__gnat_initialize): remove MAX_PATH limitation on each argument length. 2009-04-17 Gary Dismukes * sem_elim.adb (Eliminate_Error_Msg): Minor change to error message to cover both calls and attribute references ("call" => "reference"). 2009-04-17 Ed Schonberg * sem_ch3.adb (Analyze_Subtype_Declaration): A subtype of an access type for which Storage_Size is set to 0 is legal in a pure unit. From-SVN: r146237 --- gcc/ada/sem_elim.adb | 2 +- 1 file changed, 1 insertion(+), 1 deletion(-) (limited to 'gcc/ada/sem_elim.adb') diff --git a/gcc/ada/sem_elim.adb b/gcc/ada/sem_elim.adb index c15f9cfb..6dd7021 100644 --- a/gcc/ada/sem_elim.adb +++ b/gcc/ada/sem_elim.adb @@ -671,7 +671,7 @@ package body Sem_Elim is for J in Elim_Entities.First .. Elim_Entities.Last loop if E = Elim_Entities.Table (J).Subp then Error_Msg_Sloc := Sloc (Elim_Entities.Table (J).Prag); - Error_Msg_NE ("cannot call subprogram & eliminated #", N, E); + Error_Msg_NE ("cannot reference subprogram & eliminated #", N, E); return; end if; end loop; -- cgit v1.1