[Ada] Fix warning control character for message on IN OUT parameter
gcc/ada/ * sem_warn.adb (Output_Non_Modified_In_Out_Warnings): Use right warning control character 'k' in both comment and call to Errout_Msg_N.
This commit is contained in:
parent
758daef51b
commit
d983a9d050
@ -3077,14 +3077,14 @@ package body Sem_Warn is
|
||||
-- Here we generate the warning
|
||||
|
||||
else
|
||||
-- If -gnatwc is set then output message that we could be IN
|
||||
-- If -gnatwk is set then output message that we could be IN
|
||||
|
||||
if not Is_Trivial_Subprogram (Scope (E1)) then
|
||||
if Warn_On_Constant then
|
||||
Error_Msg_N
|
||||
("?u?formal parameter & is not modified!", E1);
|
||||
("?k?formal parameter & is not modified!", E1);
|
||||
Error_Msg_N
|
||||
("\?u?mode could be IN instead of `IN OUT`!", E1);
|
||||
("\?k?mode could be IN instead of `IN OUT`!", E1);
|
||||
|
||||
-- We do not generate warnings for IN OUT parameters
|
||||
-- unless we have at least -gnatwu. This is deliberately
|
||||
|
Loading…
Reference in New Issue
Block a user