diff options
| author | Piotr Trojanek <trojanek@adacore.com> | 2020-10-19 16:57:01 +0200 |
|---|---|---|
| committer | Pierre-Marie de Rodat <derodat@adacore.com> | 2020-11-26 03:39:36 -0500 |
| commit | 8593037b17ddbdad375954e59838e6f4083f44ba (patch) | |
| tree | 1f06b32ebeeaef76dad18673f298cde9b0bcc6f5 | |
| parent | 32b0abb24b8702ec9954448739682ace6fa5ccf5 (diff) | |
| download | gcc-8593037b17ddbdad375954e59838e6f4083f44ba.zip gcc-8593037b17ddbdad375954e59838e6f4083f44ba.tar.gz gcc-8593037b17ddbdad375954e59838e6f4083f44ba.tar.bz2 | |
[Ada] Fix casing of "circular instantiation" error
gcc/ada/
* sem_ch12.adb: Fix casing from "Instantiation" to
"instantiation".
| -rw-r--r-- | gcc/ada/sem_ch12.adb | 8 |
1 files changed, 4 insertions, 4 deletions
diff --git a/gcc/ada/sem_ch12.adb b/gcc/ada/sem_ch12.adb index 99a62c4..dfb0765 100644 --- a/gcc/ada/sem_ch12.adb +++ b/gcc/ada/sem_ch12.adb @@ -4306,7 +4306,7 @@ package body Sem_Ch12 is elsif Contains_Instance_Of (Gen_Unit, Current_Scope, Gen_Id) then Error_Msg_Node_2 := Current_Scope; Error_Msg_NE - ("circular Instantiation: & instantiated in &!", N, Gen_Unit); + ("circular instantiation: & instantiated in &!", N, Gen_Unit); Circularity_Detected := True; Restore_Env; goto Leave; @@ -5682,7 +5682,7 @@ package body Sem_Ch12 is if Contains_Instance_Of (Gen_Unit, Current_Scope, Gen_Id) then Error_Msg_Node_2 := Current_Scope; Error_Msg_NE - ("circular Instantiation: & instantiated in &!", N, Gen_Unit); + ("circular instantiation: & instantiated in &!", N, Gen_Unit); Circularity_Detected := True; Restore_Hidden_Primitives (Vis_Prims_List); goto Leave; @@ -7800,7 +7800,7 @@ package body Sem_Ch12 is if Node (Elmt) = Scop then Error_Msg_Node_2 := Inner; Error_Msg_NE - ("circular Instantiation: & instantiated within &!", + ("circular instantiation: & instantiated within &!", N, Scop); return True; @@ -7810,7 +7810,7 @@ package body Sem_Ch12 is elsif Contains_Instance_Of (Node (Elmt), Scop, N) then Error_Msg_Node_2 := Inner; Error_Msg_NE - ("circular Instantiation: & instantiated within &!", + ("circular instantiation: & instantiated within &!", N, Node (Elmt)); return True; end if; |