sem_eval.adb: Give a more precise error message.

gcc/ada/ * sem_eval.adb: Give a more precise error message. From-SVN: r152619

sem_eval.adb: Give a more precise error message.
gcc/ada/ * sem_eval.adb: Give a more precise error message. From-SVN: r152619
fdfea49e · Samuel Tardieu · Samuel Tardieu · 9b99d0fd · fdfea49e · fdfea49e
Commit fdfea49e authored Oct 10, 2009 by Samuel Tardieu Committed by Samuel Tardieu Oct 10, 2009
Hide whitespace changes
Inline Side-by-side

Showing with 5 additions and 1 deletions

gcc/ada/ChangeLog
+4 -0

gcc/ada/sem_eval.adb
+1 -1

No files found.
--- a/gcc/ada/ChangeLog
+++ b/gcc/ada/ChangeLog
+2009-10-10  Samuel Tardieu  <sam@rfc1149.net>
+
+	* sem_eval.adb: Give a more precise error message.
+
 2009-10-06  Samuel Tardieu  <sam@rfc1149.net>

 	PR ada/41383

--- a/gcc/ada/sem_eval.adb
+++ b/gcc/ada/sem_eval.adb
@@ -5018,7 +5018,7 @@ package body Sem_Eval is

            if Attribute_Name (N) = Name_Size then
               Error_Msg_N
-                 ("size attribute is only static for scalar type " &
+                 ("size attribute is only static for static scalar type " &
                  "(RM 4.9(7,8))", N);

            --  Flag array cases