diff options
Diffstat (limited to 'gcc/ada/par-load.adb')
| -rw-r--r-- | gcc/ada/par-load.adb | 7 |
1 files changed, 6 insertions, 1 deletions
diff --git a/gcc/ada/par-load.adb b/gcc/ada/par-load.adb index b69bbbb49a7..d73546843bb 100644 --- a/gcc/ada/par-load.adb +++ b/gcc/ada/par-load.adb @@ -84,7 +84,12 @@ procedure Load is -- Unit number of loaded unit Limited_With_Found : Boolean := False; - -- Set True if a limited WITH is found, used to ??? + -- We load the context items in two rounds: the first round handles normal + -- withed units and the second round handles Ada 2005 limited-withed units. + -- This is required to allow the low-level circuitry that detects circular + -- dependencies of units the correct notification of errors (see comment + -- bellow). This variable is used to indicate that the second round is + -- required. function Same_File_Name_Except_For_Case (Expected_File_Name : File_Name_Type; |