diff options
Diffstat (limited to 'gcc/ada/prj-strt.adb')
| -rw-r--r-- | gcc/ada/prj-strt.adb | 4 |
1 files changed, 2 insertions, 2 deletions
diff --git a/gcc/ada/prj-strt.adb b/gcc/ada/prj-strt.adb index aa637386b4f..271a913e762 100644 --- a/gcc/ada/prj-strt.adb +++ b/gcc/ada/prj-strt.adb @@ -74,8 +74,8 @@ package body Prj.Strt is Table_Initial => 10, Table_Increment => 100, Table_Name => "Prj.Strt.Choice_Lasts"); - -- Used to store the indices of the choices in table Choices, - -- to distinguish nested case constructions. + -- Used to store the indexes of the choices in table Choices, to + -- distinguish nested case constructions. Choice_First : Choice_Node_Id := 0; -- Index in table Choices of the first case label of the current |