diff options
Diffstat (limited to 'gcc/ada/ali.ads')
| -rw-r--r-- | gcc/ada/ali.ads | 6 |
1 files changed, 4 insertions, 2 deletions
diff --git a/gcc/ada/ali.ads b/gcc/ada/ali.ads index f789b0c3581..d04346de766 100644 --- a/gcc/ada/ali.ads +++ b/gcc/ada/ali.ads @@ -593,8 +593,10 @@ package ALI is No_Sdep_Id : constant Sdep_Id := Sdep_Id'First; -- Special value indicating no Sdep table entry - First_Sdep_Entry : constant Sdep_Id := No_Sdep_Id + 1; - -- Id of first actual entry in table + First_Sdep_Entry : Sdep_Id := No_Sdep_Id + 1; + -- Id of first Sdep entry for current ali file. This is initialized to + -- the first Sdep entry in the table, and then incremented appropriately + -- as successive ALI files are scanned. type Sdep_Record is record |