diff options
Diffstat (limited to 'gcc/ada/lib-writ.adb')
| -rw-r--r-- | gcc/ada/lib-writ.adb | 3 |
1 files changed, 2 insertions, 1 deletions
diff --git a/gcc/ada/lib-writ.adb b/gcc/ada/lib-writ.adb index ea5ec34..fcb5f19 100644 --- a/gcc/ada/lib-writ.adb +++ b/gcc/ada/lib-writ.adb @@ -214,7 +214,8 @@ package body Lib.Writ is Item := First (Context_Items (Cunit)); while Present (Item) loop - -- limited_with_clauses do not create dependencies. + -- Ada0Y (AI-50217): limited with_clauses do not create + -- dependencies if Nkind (Item) = N_With_Clause and then not (Limited_Present (Item)) |