OpenE2K/gcc
2
0
Fork 0
Code Issues Pull Requests Projects Releases Wiki Activity

sem_case.adb (Expand_Others_Choice): Improve warning.

Browse Source 
2005-06-14  Ed Schonberg  <schonberg@adacore.com>

	* sem_case.adb (Expand_Others_Choice): Improve warning.

From-SVN: r101058
This commit is contained in:
Ed Schonberg 2005-06-16 10:45:45 +02:00 committed by Arnaud Charlet
parent bc49df98e8
commit 4875fbba52
1 changed files with 2 additions and 1 deletions
Show Stats Download Patch File Download Diff File Expand all files Collapse all files

3
gcc/ada/sem_case.adb
View File

@ -524,7 +524,8 @@ package body Sem_Case is
and then Comes_From_Source (Others_Choice)
and then Is_Empty_List (Choice_List)
then
Error_Msg_N ("?others choice is empty", Others_Choice);
Error_Msg_N ("?OTHERS choice is redundant", Others_Choice);
Error_Msg_N ("\previous choices cover all values", Others_Choice);
end if;
end Expand_Others_Choice;