gcc/ada/
* par-ch3.adb (P_Modular_Type_Definition): Remove colon from
error message.
* sem_ch11.adb (Check_Duplication): Likewise.
* sem_ch3.adb (Derived_Type_Declaration): Likewise.
begin
if Ada_Version = Ada_83 then
- Error_Msg_SC ("(Ada 83): modular types not allowed");
+ Error_Msg_SC ("(Ada 83) modular types not allowed");
end if;
Typedef_Node := New_Node (N_Modular_Type_Definition, Token_Ptr);
and then Comes_From_Source (Id)
then
Error_Msg_N
- ("(Ada 83): duplicate exception choice&", Id);
+ ("(Ada 83) duplicate exception choice&", Id);
end if;
end if;
end if;
then
if Ada_Version = Ada_83 and then Comes_From_Source (Indic) then
Error_Msg_N
- ("(Ada 83): premature use of type for derivation", Indic);
+ ("(Ada 83) premature use of type for derivation", Indic);
end if;
end if;