diff options
Diffstat (limited to 'gcc/ada/par-ch10.adb')
| -rw-r--r-- | gcc/ada/par-ch10.adb | 1 |
1 files changed, 0 insertions, 1 deletions
diff --git a/gcc/ada/par-ch10.adb b/gcc/ada/par-ch10.adb index e321affbfb9..c7dfee88150 100644 --- a/gcc/ada/par-ch10.adb +++ b/gcc/ada/par-ch10.adb @@ -634,7 +634,6 @@ package body Ch10 is -- Check we did not with any child units Item := First (Context_Items (Comp_Unit_Node)); - while Present (Item) loop if Nkind (Item) = N_With_Clause and then Nkind (Name (Item)) /= N_Identifier |